[VB6 ] 字串轉換的問題
我在用vb6寫一個rs232傳輸的程式
程式裡有一個timer計時 每1ms就去抓rs232裡的資料
程式片段如下
Dim a1 As String
Private Sub Timer1_Timer()
Dim buf$
buf = Trim(MSComm1.Input)
If Len(buf) = 0 Then
Text1 = ""
Else
Text1 = buf
a1 = Text1
現在抓進來的值放在a1裡面
我現在要對a1的值做運算
比如說 如果a1="m" 的話 我希望能轉成109(10進位的ascii code)
因為剛接觸VB 所以不太熟
不知道有沒有函數或程式可以做轉換?
我知道有關的是兩個函數val()和asc()
但是由於我的a1抓進來不一定是數字字串 所以如果用val的話會變成0
至於asc()的話 我有試過 如果寫asc("A")是沒問題的
但若照我抓進來的資料 asc(a1)的話則會出現
程式呼叫或引數不正確的error message
不知道還有什麼方法可以解決?
感謝各位
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.113.138.112
推
05/06 19:07, , 1F
05/06 19:07, 1F
討論串 (同標題文章)
完整討論串 (本文為第 1 之 3 篇)：