题目

小李利用所学的VB知识,编写了一个简单计算器:在文本框Text1中输入一个加减算式(只包含数字和“+”“一”符号,以“=”结束),点击“计算”按钮 Command1,计算结果在标签 Label上显示,程序运行界面如图所示。 (1) 要实现程序运行时,单击文本框Text1即可将文本框清空,则应在。 (A .Command1_Click        B .Form_load     C .Text1_Click)事件处理过程中添加语句 Text1. Text=“”。 (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       Elself ch ="+" Then         fh=1       End If     End If   Next i   Labell. Caption= Str(sum) End Sub ① ②  (3) 若文本框Text1中输入的内容为“12*10=”(不包括双引号),单击“计算”按钮后,标签 Label1上将显示(A .120    B .22        C .0        D .程序出错无法显示) 答案: 【1】C 【1】p*10+Val(ch)【2】sum+fh*p 【1】B
信息技术 试题推荐
最近更新