海南高铁站点:这段代码是什么意思

来源：百度文库编辑：杭州交通信息网时间：2024/04/29 23:11:38

Private Sub Command1_Click()
a = "<html><body><h1>Hello!</h1></body></html>"
Open "C:\tmp.htm" For Output As #1
Print #1, a
Close #1
WebBrowser1.Navigate "C:\123.htm"
End Sub

什么意思

Private Sub Command1_Click()
a = "<html><body><h1>Hello!</h1></body></html>" '给a赋值，这里就是要写
‘入文件的内容
Open "C:\tmp.htm" For Output As #1 ’打开C:\tmp.htm文件，文件号为1
Print #1, a ‘向1号文件写入a的内容
Close #1 ’关闭文件
WebBrowser1.Navigate "C:\123.htm" 'webBrowser在webBrowser中打开
' C:\123.htm
End Sub

用vb生成文件C:\tmp.htm 然后在VB中用webbrowser控件显示tmp.htm

a = "<html><body><h1>Hello!</h1></body></html>" '文件内容
Open "C:\tmp.htm" For Output As #1 '创建文件
Print #1, a '把A变量写入文件
Close #1 '关闭文件
WebBrowser1.Navigate "C:\123.htm" '用VB打开123.htm

这段代码是什么意思? 这段代码是什么意思？！这段代码是什么意思？？？这段代码是什么意思？这段代码是什么意思这段代码是什么意思这段代码是什么意思？这段代码是什么意思？这段代码是什么意思? 这段代码是什么意思？