Private Sub Command8_Click()
Dim str_by As String
str_by = Inet1.OpenURL("http://www.shishicai.cn/")
Text2.Text = str_by
MsgBox Len(str_by)
End Sub
求解,谢谢。
...全文
522打赏收藏
帮我看一下,inet为何打开这个网页返回的字符串为0.谢谢。
我打开其它网页时正常,但打开这个网页时返回的总是"" Private Sub Command8_Click() Dim str_by As String str_by = Inet1.OpenURL("http://www.shishicai.cn/") Text2.Text = str_by MsgBox Len(str_by) End Sub 求解,谢谢。