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 IndexCase 0 To 9If FirstNum Then ←有这个if 然后firstnum then 是什么意思呢?是说它为真还是为假还是代表着什么意思?StrNum1 = Str(Index)’实型转字符型
FirstNum = False’初赋值为假  ←然后这个又是代表什么?Else’非初赋值StrNum1 = StrNum1 + Str(Index)End IfText1.Text = StrNum1’显示<还有其他语句,等待插入>End SelectEnd Sub