想在主窗口上放一个 记事本    让窗体一启动就读取http://tianqi.上面的文字到记事里，不知道该怎么读取网页的关键文字，请哪位高手帮个忙写一个程序，谢谢！

首先谢谢版主热情的回答，请问版主，我想将显示结果显示在Label1上  这个代码怎么写呢？能否解释一下这几行代码的原理，我真的很想搞懂！以后就可以举一反三！

[ 本帖最后由 事业男儿 于 2013-8-14 17:57 编辑 ]

谢谢楼上的解答。

Private Sub Timer1_Timer()
  Dim a As String, i As Integer, j As Integer
  a = Inet1.OpenURL("http://tianqi., icString)
  i = InStr(a, "description")
  j = InStr(a, "北京天气预报代码免费调用")
  lable1.caption = Mid(a, i + 22, j - i - 23)
End Sub
 在软件正常显示天气后，我人为短掉网络，可是怎么lable1.caption还是在显示有天气预报，我想让他在突然断网后显示为零  或者没有数据。谢谢！