VB中怎么读取网页TXT文件,并且逐行显示在text中,与网页...

如题所述

'添加一个command1,webBrowser1,richtextbox1.3个控件
Public Function Counter(Optional Times As Long)
On Error Resume Next
Counter = Timer Times / 1000
Do
DoEvents
If Timer
温馨提示:答案为网友推荐,仅供参考
第1个回答  2011-02-17
'需要添加Microsft Internet Transfer control 6.0部件
'程序例子======================================
'取消所有操作
Inet1.Cancel
'设定协议为 HTTP
Inet1.Protocol = icHTTP
'设定 URL 属性
Inet1.URL = "<a href="http://www.baidu.com" target="_blank">http://www.baidu.com</a>"
'将读取的 HTML 数据附给string1
string1 = " "
string1 = Inet1.OpenURL
MsgBox (string1)
第2个回答  2011-02-17
这个网页和TXT是2种文件吧,VB用OPEN语句可以打开文件读写。
相似回答
大家正在搜