Question

VB 如何获取网页源代码中的某段文字？大神们帮帮忙

我已经用 Dim b() As Byte Inet1.Cancel Inet1.Protocol = icHTTP b() = Inet1.OpenURL(" http://www.baidu.com ", icByteArray) Text1.Text = StrConv(b, vbUnicode) 这段代码获得了百度网页的源代码 可是如何整理得出<title>和</title>间的“百度一下，你就知道” 急急急急急急呀 ！ 做得好一定加分！！！！！！！！！！

Answer 1

用instr() 函数查找 “百度一下，你就知道” 的位置，然后在用mid()函数截取字符就可以了吧！ 或者用instr()函数查找 <title>和</title>的位置，然后再截取他们之间的字符也行啊！ 最难的第一步你都搞定了，这个应该比较简单吧！！