如题

解决方案 »

  1.   

    valdim s as string
    dim i as long
    s="123"
    i=val(s)
      

  2.   

    dim s as string
    dim t as long
    s="11" 
    t=val(s)
      

  3.   


    dim str as string
    dim dec as longstr = "11"
    dec = clng(str)
      

  4.   

    Sub Macro1()
    Dim text As String
    Dim number As Integertext = "11" 'full size charactor letter
    text = Application.Clean(text) 'edit text into full size charactor letter
    number = CLng(text) 'edit full size charactor into numberEnd Sub