vb 怎么改才好

Dim StrIn As String
Private Sub Form_Load()
Inet1.Execute "http://img.lingd.net/att.php?id=********", "GET"
End Sub

Private Sub Inet1_StateChanged(ByVal State As Integer)
If State = 12 Then
StrIn = Inet1.GetChunk(0, icString)
Text1.Text = StrIn
End If
End Sub
这样正常
现在要把Text1.Text = StrIn写到Private Sub Form_Load()下该如何写，因为将来要在Form_Load()下比较一些数据，该如何写
Public StrIn As String
Private Sub Form_Load()
Inet1.Execute "http://img.lingd.net/att.php?id=***********", "GET"
Text1.Text = StrIn
End Sub

Private Sub Inet1_StateChanged(ByVal State As Integer)
If State = 12 Then
StrIn = Inet1.GetChunk(0, icString)
End If
End Sub
这么写不行，不出数据的
Text1.Text

怎么学好VB啊 怎么下载VB软件 递归怎么解释 VB vb换行怎么用 怎么才能学会VB VB怎么申请内存 怎么去学VB VB怎么连接ODBC? vb怎么退出循环???? 怎么用VB？