想请教各位大侠些问题
我通过串口获得了一个数据,我知道这是一个1001到1500之间的数,那么我要通过怎样知道到底是哪一个具体的数呢?
假设这个数是X,通过定义一个
dim i as Long
for i=1001 To 1500
    if X=i Then
        break
    End If
Next i
或者通过4层嵌套switch case语句么?

希望各位大虾指条明路...

Dim i As Long
For i=101 To 1500
    If X=i Then Break
Next i
测试一下就知道啦！

你通过串口获得了数据，可以直接取数据位把它显示出来！
Buffer = MSComm1.Input
mychar = Chr(2)  
Where = InStr(StrConv(Buffer, vbUnicode), mychar)   
 If Where > 0 Then   
    Text2 = Mid(StrConv(Buffer, vbUnicode), Where + 1, 5)
    Text2.SelStart = 1   
    Text2.SelLength = 5  
    Text1.Text = Text2.SelText
 End If

通过串口通信工具（就是很像电话那个）空间，与文本框配合将其直接显示出来！

exit for 'break