小白我编程了一个小软件是和单片机交互的,我向单片机发命令,他回给我一条回复。现在遇到是问题是,
1.如果我用循环发命令,比如FOR循环,如何能实现在接到回复后,在发下一条呢?
2.VB 的socket有没有延时机制呢?
1.如果我用循环发命令,比如FOR循环,如何能实现在接到回复后,在发下一条呢?
2.VB 的socket有没有延时机制呢?
解决方案 »
- VB读取mysql的问题。。懂的大大一定进来!!
- 如何创建自己的协议,金山词霸的“dic协议”是如何实现的?
- 请教大侠二问题,问题解决后马上结贴,请大侠一定帮我一下,谢谢!!
- 那位大虾帮忙看一下,非常奇怪的问题!
- 关于取时间段量的问题
- DataGridView的列显示与隐藏功能
- 谁有开发文档的格式啊?高分送上
- 我是 52694 (寒鱼啄冰) 我因邮箱有问题,没有收到csdn 发的确认信,现在帐号被停止了,如何再激活?当时的注册信息忘了。
- mshflexgrid控件能否打印????急!!!!!
- 怎样才能得到当前显示的分辨率,是用API函数吗?
- VB实现3g网络监控怎么实现
- 串口助手+GSM猫 怎么发不了短信 很着急!!!!
Winsock1.SendData Data
DoEvents
Next
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Winsock1.SendData Data
End Sub
Dim f As BooleanPrivate Sub Command1_Click()
Dim i As Integer, x As String
Winsock1.SendData x
For i = 1 To 20
While Not f
DoEvents
Wend
....
....
Winsock1.SendData x
f = False
Next
End SubPrivate Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim data1 As String
Winsock1.GetData data1
....
....
If data1符合要求 Then f = True
End Sub