怎样把字符串“123”转化成整数123

Question

谢谢！

Answer 1

dim a as integer
dim s as string
s="123"
a=s

Answer 2

同样的问题是字符串内有字母就报错
Dim a As String
Dim e As String
Dim c As Integer
Dim i As Integer
Dim j As Integer
a = "123ww"For j = 1 To Len(a)
   If Asc(Mid(a, j, 1)) < Asc(0) Or Asc(Mid(a, j, 1)) > Asc(9) Then
    Exit For
   End If
Nexta = Mid(a, 1, j - 1)
c = a

Answer 3

cint(arg)--把arg转成整数
cstr(arg)--把arg转成字符串

Answer 4

val123 = val("123")得到的是Long
Cint(val123)就可以了

Answer 5

Cint函数,这种简单的问题没必要给分。