这是一个计算器里面拿出来的，有十个数字按钮和加减乘除按钮，请问代码这样写是什么意思？？？
Private Sub Command1_Click()
If Len(Text1.Text) = 0 Then
Text1.Text = "0"
Else
Text1.Text = Text1.Text + "1"
End If
Text1.SetFocus
End Sub Private Sub Command10_Click()
If Len(Text1.Text) = 0 Then
Text1.Text = "9"
Else
Text1.Text = Text1.Text + "9"
End If
Text1.SetFocus
End Sub

这个就是按钮啊 比如：text1 中没有数据 那么按几 就是几了 ； 如果text1中已经有了个1，在按个1，然后就显示11.......