Question

vb post提交的问题?

Private Sub Command1_Click()
Inet1.Execute "http://www.baidu.com", "Post"
......
......
......
End Sub

Private Sub Inet1_StateChanged(ByVal State As Integer)
If State = 12 Then
......
......
......
End If
End Sub

我的问题是上面这段代码怎样让它判断当Inet1_StateChanged中的Start=12时再执行Command1_Click()中Inet1.Execute "http://www.baidu.com", "Post"后面的语句

Answer 1

整理一下代码:

Private Sub Command1_Click()
Inet1.Execute "http://www.baidu.com", "Post"
ABC
End Sub

Private Sub Inet1_StateChanged(ByVal State As Integer)
If State = 12 Then
ABC
End If
End Sub

Sub ABC()
...........
............
.........
End Sub