5555555555 VB有问题
Private Sub Form_Click()
Dim a(2) As Byte
Dim b(1 To 1024) As Byte
Dim i As Integer
For i = 1 To 2
a(1) = a
a(2) = 2
b(i) = Asc(a(i))
Print b(i)
Next
End Sub
运行起来a显示是49，哪位高手指点一下，怎么能传去a的ASC码？
Private Sub Form_Click()
Dim a(2) As Byte
Dim b(1 To 1024) As Byte
Dim i As Integer
For i = 1 To 2
a(1) = a
a(2) = 2
b(i) = Asc(a(i))
Print b(i)
Next
End Sub
运行起来a显示是49，哪位高手指点一下，怎么能传去a的ASC码？
2006-04-08 09:26
2006-04-08 09:47
2006-04-08 09:56
谢谢了 问题解决了 真是谢谢你们了 
2006-04-08 10:36