equal = Num1 / Num2 如果num2为“0”的话，肯定出错还有和100度说的那样，定义变量的问题
开头部分：Dim Num1 As Single , Num2 As Single Dim StrNum1 As String , StrNum2 As String
5分对于这个问题来说太难了，我做不出来
