- 1
- 0
- 约7.95千字
- 约 8页
- 2018-02-24 发布于河南
- 举报
我的计算器
你编程的思路非常混乱,简直不知道你的程序在干什么。要进行计算,你必须先使用Val函数将字符型的Text属性转换为数字型,否则你进行“+”运算只能是字符串加法而不是你想要的数学运算。 ????下面是葡萄提供的一个例子: ????1、建立14个按钮,按钮的名字都要Command1,设置Index属性,0~9分别对应数字0~9,10为小数点,11为等号,12~14分别对应+、-、*和/。 ????2、输入如下代码: ????Dim Num1, Num2 As Single ????Dim StrNum1, StrNum2 As String ????Dim FirstNum As Boolean ????Dim PointFlag As Boolean ????Dim Runsign As Integer ????Dim SignFlag As Boolean ????Private Sub Command1_Click(Index As Integer) ????Select Case Index ???? Case 0 To 9 ???? If FirstNum Then ???? StrNum1 = Str(Index) ???? FirstNum = False ???? Else ???? StrNum1 = LTrim(StrNum1) +
原创力文档

文档评论(0)