vb如果text1内容等于www.xxx.com/xx这页里的内容，点击按纽就弹form2代码

单击菜单“工程”“部件”勾选“microsoft internet transfer control”,画一个Command1,Inet1，Text1, 设置Text1的Multiline属性为True.，建Form2.代码如下。 不过话说达到你的要求可不容易，得Text1里面内容 与网站内容完全一致。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
Private Sub Command1_Click()
If Text1.Text = Inet1.OpenURL("www.xxx.com/xx") Then form2.Show
End Sub

单击菜单“工程”“部件”勾选“microsoft internet transfer control”,画一个Command1,Inet1，Text1, 设置Text1的Multiline属性为True.，建Form2.代码如下。 不过话说达到你的要求可不容易，得Text1里面内容 与网站内容完全一致。www.dszxs.com/

if text1.text="www.xxx.com/xx" then
form2.show

对呀