將數字字符串轉換成數值?
新建一個VB的EXE程序,畫一個TEXT1,將文本改為110,再畫一個COMMAND1,復制以下代碼 Option Explicit Private Sub Command1_Click() Dim a As Single a = CSng(Text1.Text) Print a End Sub 將字符串轉換成數字的函數還有,CInt和Val都是整型,CLng長整型,用法和本例差不多的。本例中的CSng是單精度型的也就是小數型的。
將數字字符串轉換成數值?
新建一個VB的EXE程序,畫一個TEXT1,將文本改為110,再畫一個COMMAND1,復制以下代碼 Option Explicit Private Sub Command1_Click() Dim a As Single a = CSng(Text1.Text) Print a End Sub 將字符串轉換成數字的函數還有,CInt和Val都是整型,CLng長整型,用法和本例差不多的。本例中的CSng是單精度型的也就是小數型的。