vb.net浏览 vbnet web

用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

相关问答

Q1: 如何编写vb.net程序，打开IE浏览器

如下两种方法，

1，

采用默认的浏览器打开FTP站点,不需要知道IE在什么地方，建议采用。

Shell("rundll32

url.dll

FileProtocolHandler

")

2，采用IE打开，只要更改为你的ie路径就可以了。不建议使用这个方法。

Shell("C:\Program

Files\Internet

Explorer\iexplore.exe

")

Q2: vb.net如何重置IE浏览器设置？或vb.net如何设置IE浏览器忽略网页上指定的

VB.NET调用IE代码示例：

Dim p As New Process

'获得URL

aURL = GetURL()

'获得IE路径

p.StartInfo.FileName =

System.Environment.

GetFolderPath( _

Environment.SpecialFolder.

ProgramFiles).Trim() _

"\Internet Explorer\

IEXPLORE.EXE"

p.StartInfo.Arguments

= aDenURL

'启动IE

'p.Start(aDenURL)

p.Start()

'主程序开始等待IE结束

p.WaitForExit()

另一种VB.NET调用IE的方法

Imports System.Threading

Private Sub Button1_Click(ByVal

sender As System.Object, ByVal e

As System.EventArgs) Handles

Button1.Click

Dim webobj As Object

webobj = CreateObject("Internet

Explorer.Application")

With webobj

.visible = True

.Navigate2(";)

Do While (.busy Or .readyState 4)

Thread.Sleep(100)

Loop

.Document.f.q.Value = Me.TextBox1.Text

.Document.f.btng.Click()

End With

MsgBox("completed.")

End Sub

关于vb.net浏览和vbnet web的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。