vb.net文件选择窗口 vb 选择文件夹

VB.NET及可以选择文件夹，也可以选择文件的对话框

新建立个窗体，放入文件夹控件等，然后点确定返回一个字符串即可。

创新互联-专业网站定制、快速模板网站建设、高性价比大同网站开发、企业建站全套包干低至880元,成熟完善的模板库,直接使用。一站式大同网站制作公司更省心,省钱,快速模板网站建设找我们，业务覆盖大同地区。费用合理售后完善，10多年实体公司更值得信赖。

选择文件或者选择文件夹时，显示这个窗体，然后取这个字符串。

vb.net 如何实现文件选择

给你一个遍历所有盘符下的文件夹的例子

加一个遍历文件的就可以了。

TreeNode node = new TreeNode("我的电脑");

treeView.Nodes.Add(node); //加入一个我的电脑节点

string[] drivesName = System.IO.Directory.GetLogicalDrives() //取得驱动器列表的集合

foreach(string name in drivesName) //用foreach遍历集合

{

TreeNode drivesNode = new TreeNode(name);

node.Nodes.Add(drivesNode); //加到我的电脑节点下

用VB（或者VB.net）怎样打开“浏览文件夹窗口”？（如图）

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

VB.net怎么弹出文件夹路径选择框

选择文件夹  在工具箱 - 对话框 里选择 FolderBrowserDialog 添加 到设计器中

然后 代码写在  按钮事件里

FolderBrowserDialog1.ShowDialog()

textbox1.text =FolderBrowserDialog1.SelectedPath

选择文件 在工具箱 - 对话框 里选择 OpenFileDialog

把 OpenFileDialog1.ShowDialog()

TextBox1.Text = OpenFileDialog1.FileName

写到按钮事件下

如图

点击按钮会弹出 通用对话框  选择好路径后 确定 ，编辑框里就会显示选择的路径

VB.NET命令窗口

Vb不是人机对话窗口，而是编程工具，可以编写代码进行调试执行或者生成可执行文件。

用Visual Studio .Net开发"Hello World!"程序：

我们知道"Hello World"一般是命令行程序，而这种程序在Visual Studio .Net中被称为"控制台程序"。下面是Visual Studio .Net编写控制台"Hello World！"程序的具体步骤：

（1）、启动Visual Studio .Net。

（2）、选择菜单【文件】|【新建】|【项目】后，弹出【新建项目】对话框。

（3）、将【项目类型】设置为【Visual Basic项目】。

（4）、将【模板】设置为【控制台应用程序】。

（5）、在【名称】文本框中输入【Hello World】。

（6）、在【位置】的文本框中输入【E:VS.NET项目】，然后单击【确定】按钮，则Visual Studio .Net会按照上面设定的参数创建一个控制台应用程序项目，具体如图01所示。

图01："Hello World"控制台程序的【新建项目】界面

（7）、在【解决方案资源管理器】窗口中，双击Module1.vb文件，进入Module1.vb文件的编辑界面。

（8）、Visual Studio .Net已经为产生Main()函数。在系统创建的Main()函数中加入下面一行代码就可以了：

Console.WriteLine ("Hello World!")

（9）、选择【文件】|【保存Module1.vb】菜单或者按快捷键Ctrl＋S，保存所做的修改。

（10）、此时单击快捷键Ctrl＋F5运行程序就可以得到图02所示运行界面：

vb.net中,如何点击按钮调出选择文件窗口选中图片并在picturebox中显示出来?

button , OpenFileDialog , PictureBox , textbox 控件，我把图片显示在 picturebox 中，而路

径存放在 textbox 中，不知道这样行不行。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim filename As String

OpenFileDialog1.Filter = "jpg files (*.jpg)|*.jpg"

OpenFileDialog1.FilterIndex = 1

If OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then

filename = OpenFileDialog1.FileName

Else

End

End If

If Not (PictureBox1.Image Is Nothing) Then

PictureBox1.Image.Dispose()

PictureBox1.Image = Nothing

End If

'PictureBox1.Image = System.Drawing.Image.FromFile(filename)

去掉注释后就显示图片

TextBox1.Text = filename

End Sub

picturebox中只记录文件存放的路径，我找了一个 ImageLocation 函数

PictureBox1.ImageLocation = filename 不过还是会显示图片