字串轉成數值的函數是：Val( )直接將字串帶入函數內，就可轉成數字，不過若帶入非數字資料，會得到０若帶入英數混合的字串（例:4b123a），則會得到 4 Private Sub Command1_Click() '舉例：有Text1、Text2、Text3、Text4這四個文字方塊 '先將Text1與Text2相加、Text3與Text4相減 '然後再把兩個結果相乘 '將這個相乘的結果顯示在Label1上 'Label2先設定一數值 10 '將兩Label的數值作相加, 輸出 Label1 = (Val(Text1) + Val(Text2)) * (Val(Text3) - Val(Text4)) Print Val(Label1) + Val(Label2)End SubLabels: VBA generate qrcode barcode in Word Convert a String to a Number (Integer)
已經是好久前幫忙改的程式了，謝謝再詳細說明 :)
字串轉成數值的函數是：Val( )
回覆刪除直接將字串帶入函數內，就可轉成數字，不過若帶入非數字資料，會得到０
若帶入英數混合的字串（例:4b123a），則會得到 4
Private Sub Command1_Click()
'舉例：有Text1、Text2、Text3、Text4這四個文字方塊
'先將Text1與Text2相加、Text3與Text4相減
'然後再把兩個結果相乘
'將這個相乘的結果顯示在Label1上
'Label2先設定一數值 10
'將兩Label的數值作相加, 輸出
Label1 = (Val(Text1) + Val(Text2)) * (Val(Text3) - Val(Text4))
Print Val(Label1) + Val(Label2)
End Sub
Labels: VBA generate qrcode barcode in Word Convert a String to a Number (Integer)
已經是好久前幫忙改的程式了，謝謝再詳細說明 :)
刪除