锐客网

  1. 首页 > 生活百科 > it技术 > >

vb.net数组保存 vbscript 数组

IT技术数组

在VB.net中，如何遍历指定路径下的文件夹并把文件夹名存储在数组中？给你一个提示吧！呵呵，剩下的要自己思考哦！
Path：是初始目录的路径
Private Sub WriteArray(ByVal Path As String)
'写入数组代码在这里 ， 直接将Path写到数组就行了 。
Dim dir As New IO.DirectoryInfo(Path)
For Each d As IO.DirectoryInfo In dir.GetDirectories
WriteArray(d.FullName)'递归
Next
End Sub
如果子目录较多那么递归会比较费时间，在调用递归前加入application.doevent就行了，这样在应对大递归时不会死机 。
至于数组嘛使用 arraylist 最好了 。
回答补充：
把递归去掉就行了?。?
读取csv文件保存到数组 vb.net代码csv文件可以当做文本文件来处理vb.net数组保存！
主要处理代码如下vb.net数组保存：
Dim t As String, b() As stirng, s(10) As String, cj(10) As Single
t = "" '这里是你读取vb.net数组保存的CSV文件内容
b() = Split(t, vbCrLf)
For j = 0 To 9
s(j) = b(j) '这个就是每一行的数据了
c() = Split(s(j), ",")
cj(j) = Val(c(1)) '这个就是每一行的成绩数据了
Next
'然后进行排序和显示处理
VB.NET读取TXT文件数据保存为数组VB.NET编程读取txt文本文档中的数据，并把数据保存为数组，代码如下：
'写配件文件
Private Sub saveIni(ByVal filePath As String, ByVal str As String)
Dim sw As StreamWriter = New StreamWriter(filePath, True) 'true是指以追加的方式打开指定文件
sw.WriteLine(str)
sw.Flush()
sw.Close()
sw = Nothing
【vb.net数组保存 vbscript 数组】End Sub
'读配件文件
Private Function readIni(ByVal filePath As String)
Dim iniDt As New DataTable
iniDt.Columns.Add("text")
iniDt.Columns.Add("value")
Try
Dim sr As StreamReader = New StreamReader(filePath, System.Text.Encoding.Default)
Dim line As String = ""
While Not sr.EndOfStream
Dim str = sr.ReadLine()'读取当前行
iniDt.Rows.Add(New String() {
str(0),
str(1)
})
End While
sr.Close()
sr = Nothing
Catch ex As Exception
End Try
Return iniDt
End Function
关于vb.net数组保存和vbscript 数组的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

    推荐阅读


    上一篇：如何快速更换代理服务器？ 怎么快速切换代理服务器

    下一篇：路由器上为什么显示红灯，路由器上为什么显示红灯和绿灯