作者poneponecar ()
看板Visual_Basic
标题[VB6 ] 字串转换的问题
时间Wed May 6 18:17:22 2009
我在用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
1F:推 Peruheru:会不会是你的a1被识别成不只函有一个字? 05/06 19:07