重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
vb.net:
成都创新互联专业为企业提供上海网站建设、上海做网站、上海网站设计、上海网站制作等企业网站建设、网页设计与制作、上海企业网站模板建站服务,10多年上海做网站经验,不只是建网站,更提供有价值的思路和整体网络服务。
Dim
path
=
System.IO.Directory.GetFiles("D:\Log\abc",
"*.txt",
SearchOption.AllDirectories):搜索该路径下的所有txt类型的目录及子目录
path.AddRange(path)
Dim
_RecordInfo
As
String
Dim
_Reader
As
StreamReader
_Reader
=
New
StreamReader(file,
System.Text.Encoding.Default):'以Default编码的形式读取file文件(文件写入的编码要与读取的编码一致)
添加一个OpenFileDialog控件。
代码如下:OpenFileDialog1.ShowDialog()‘打开文件选择框OpenFileDialog1.FileName’得到选择的文件
Visual Basic.NET是基于微软.NET Framework之上的面向对象的编程语言。
其在调试时是以解释型语言方式运作,而输出为EXE程序是是以编译型语言方式运作。
可以看作是Visual Basic在.Net Framework平台上的升级版本,增强了对面向对象的支持。大多的VB.Net程序员使用Visual Studio .Net作为IDE(integrated development environment).SharpDevelop是另一种可用的开源的IDE。
Private Sub Command1_Click()
Dim sf As Object
Set sf = CreateObject("Shell.Application").BrowseForFolder(0, "选择文件夹", 0, "")
If Not sf Is Nothing Then
MsgBox "选择的文件夹是" vbCrLf sf.self.Path
End If
Set sf = Nothing
End Sub
您指的是"我的电脑"中左边的资源管理器窗口吗?它实际上是一个TreeView控件
默认情况下,该控件是不会出现在工具箱中的,您可以这样做:
右击工具箱,选择"部件"菜单,在弹出的窗口中
在"控件"选项卡中选择"Microsoft
windows
common
control
6.0(SP6)"
选中其前面的对勾,单击确定后,你将会在工具箱中发现多出了好几个控件
有一个类似于楼梯的图标,它就是您要找的控件了.
说到使用它,还真有点惭愧,本人还真不会呢,祝您好运了,
记得加分哦,楼主
System.Windows.Forms.OpenFileDialog
System.Windows.Forms.SaveFileDialog
System.Windows.Forms.FolderBrowserDialog
以上三个类均能够很好的解决楼主的需求。
具体的请lz自己查msdn
vb.net使用控件FolderBrowserDialog1,在程序中:
'设置对话框中在树视图控件上显示的说明文本
Me.FolderBrowserDialog1.Description = "请选择输出报表所在路径:"
'设置从其开始浏览的根文件夹
Me.FolderBrowserDialog1.SelectedPath = "c:\"
If Me.FolderBrowserDialog1.ShowDialog() = DialogResult.OK Then
'取得全路径(包含文件名)
reportPath1 = System.IO.Path.GetFullPath(Me.FolderBrowserDialog1.SelectedPath)
'设定text显示文件名
txtReport1.Text = reportPath1
setReportList()
End If
在setReportList()中针对你所需要的文件进行操作等