当前位置: 高中信息技术 / 综合题
  • 1. (2020·浙江模拟) 小李利用所学的VB知识,编写了一个简单计算器:在文本框 Text1 中输入一个加减算式(只包含数字和“ +”、“ -”符号,以“ =”结束),点击“计算”按钮 Command1,计算结果在标签 Label1 上显示。程序运行界面如下图所示:

    1. (1) 要实现程序运行时,单击文本框 Text1 即可将文本框清空 , 则应在(A . Command1_Click/B . Form_Load/C . Text1_Click)事件处理过程中添加语句Text1.text=“”)。
    2. (2) 实现上述功能的VB程序如下,请在划线处填入合适的代码

      Private Sub Command1_Click

          Dim s As String, ch As String, sum As Integer

          Dim fh As Integer

          s = Text1.Text: fh = 1: p = 0: sum=0

          For i = 1 To Len(s)

              ch = Mid(s, i, 1)

              If ch >= "0" And ch <= "9" Then

                  p =

              Else

                  sum =

                  p = 0

                  If ch = "-" Then

                      fh = -1

                  ElseIf ch = "+" Then

                      fh = 1

                  End If

              End If

          Next i

          Label1.Caption = Str(sum)

      End Sub

    3. (3) 若文本框 Text1 中输入的内容为“ 12*10=”(不包括双引号),单击“计算”按钮后,标签Label1 上将显示:(A . 120 / B . 22 / C . 0 /D .程序出错无法显示)

微信扫码预览、分享更方便