2 u012627425 u012627425 于 2016.01.27 15:13 提问

VB.NET高手请指导!小弟跪求

下面是VB语句,能用;现在想用VB.NET写,不知道怎么写……请指导!

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

    Dim baiWinFolder As New ShellWindows
    For Each baiIE In baiWinFolder
        If InStr(1, baiIE.FullName, "", vbTextCompare) <> 0 Then
            If InStr(1, baiIE.LocationURL, "baidu.com", vbTextCompare) <> 0 Then
                Exit For
            End If
        End If
    Next
End Sub

2个回答

danielinbiti
danielinbiti   Ds   Rxr 2016.01.27 15:36
caozhy
caozhy   Ds   Rxr 2016.01.27 18:45

这就是VB.NET语句,唯一需要注意的是,你需要在VB.NET中用项目-引用,添加com引用,引用shell32.dll和shdocvw.dll。

Csdn user default icon
上传中...
上传图片
插入图片
准确详细的回答,更有利于被提问者采纳,从而获得C币。复制、灌水、广告等回答会被删除,是时候展现真正的技术了!