Dim Num1, Num2 As Single
Dim StrNum1, StrNum2 As String
Dim FirstNum As Boolean '判斷是否是數字開頭
上面的是在宣告里面的
Form_Load
Num1 = 0
Num2 = 0
StrNum1 = ""
StrNum2 = ""
FirstNum = True ←這個不懂 為真代表的是什么呢?
Private Sub Command1_Click(Index As Integer)
Select Case Index
Case 0 To 9
If FirstNum Then ←有這個if 然后firstnum then 是什么意思呢?是說它為真還是為假還是代表著什么意思?
StrNum1 = Str(Index)’實型轉字符型
FirstNum = False’初賦值為假 ←然后這個又是代表什么?
Else’非初賦值
StrNum1 = StrNum1 + Str(Index)
End If
Text1.Text = StrNum1’顯示
<還有其他陳述句,等待插入>
End Select
End Sub
uj5u.com熱心網友回復:
記住當前是否為從左往右數第一個數字。我猜。uj5u.com熱心網友回復:
我覺得他應該是沿用了C語言的風格習慣,if 真 then怎樣怎樣,也就是判斷為真后把index賦值給strnum1,然后再把strnum1賦值給text顯示出來uj5u.com熱心網友回復:
FirstNum = True '說明輸入的0-9,可以作為新資料的第一位轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/101100.html
標籤:VB基礎類
