VB 中想根據字串首尾兩個字符來判斷是否為我想要的資料,今天突然tight不能用了
我用兩個文本框,顯示提取的第一個和最后一個字符,結果第一個提取出來了,最后一個提取不出來
程式如下
Private Sub Winsockserver_DataArrival(ByVal bytesTotal As Long) '接收到資料的函式
Dim tmpstr As String
Winsockserver.GetData tmpstr
Text3.Text = Left(tmpstr, 1)
Text2.Text = Right(tmpstr, 1)
textget.Text = tmpstr
If Left(tmpstr, 1) = "@" And Right(tmpstr, 1) = "#" Then
Text1.Text = Mid(tmpstr, 2, 5)
End If
End Sub
uj5u.com熱心網友回復:
正常情況下能用,用wincock建立服務器,通過GPRS模塊向VB發程式,結果right函式不好用了uj5u.com熱心網友回復:
debug一下看看right(tmpstr,1)是多少,然后len(right(tmpstr,1)看看是否大于0如果是
說明你定義的tmpstr的長度比你實際得到的資料長度長,, 有可能你取到的只是一個空格....
uj5u.com熱心網友回復:
Debug.Print Len(tmpstr), "|" & tempstr & "|"
檢查下接受到資料,可能末尾有其它內容。
uj5u.com熱心網友回復:
try to use:VBA.Right
uj5u.com熱心網友回復:
同意,接收到的資料很可能包含其他資料.
uj5u.com熱心網友回復:
感謝各位的回答,謝謝轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/84123.html
標籤:非技術類
下一篇:vb6操作圖片檔案
