試卷征集
          加入會員
          操作視頻

          某簡單計算器功能如下:在文本框Text1中輸入一個加減算式,點擊“計算”按鈕Command1,計算結果在標簽Label3上顯示,同時在列表框List1中記錄每次算式及結果。已知文本框Text1只包含正整數和“+”、“-”符號,同時以“=”結束。程序運行界面如圖a所示,請回答下列問題。

          (1)設計應用程序界面時,為添加“計算”按鈕,應使用圖b所示“控件工具箱”中的
          4
          4
          (填寫相應編號)控件,并在圖c所示的“屬性窗口”中,將
          Caption
          Caption
          屬性的值設置為“計算”。
          (2)要實現程序運行時,單擊文本框Text1即可將文本框清空,則應在
          B
          B
          (選填字母:A.Command1_Click (  )/B.Text1_Click (  )/C.Form_Load (  ))過程中添加語句Text1.Text=““。
          (3)實現上述功能的VB程序如下,請在橫線處填入合適的代碼。
          Private Sub Command1_Click
          (  )
          (  )

          Dim s As String,ch As String
          Dim fh As Integer,p As Integer,sum As Integer
          s=Text1.Text:fh=1:p=0:sum=0
          For i=1To Len(s)
          ch=Mid(s,i,1)
          If ①
          ch>=“0“Andch<=“9“
          ch>=“0“Andch<=“9“
           Then'判斷取出的字符是否為數字
          p=p*10+Val(ch)
          Else
          sum=sum+p*fh
          p=0
          If ch=“-“Then
          fh=-1
          fh=-1

          ElseIf ch=“+“Then
          fh=1
          End If
          End If
          Next i
          Label3.Caption=Str(sum)
          List1.AddItem ③
          s&“=“&Str(sum)
          s&“=“&Str(sum)

          End Sub
          (4)運行程序,在文本框Text1中輸入“5+5-2”,單擊“計算“按鈕后,標簽Label3上將顯示:
          A
          A
          。(選填字母:A.10/B.8/C.程序出錯無法顯示)。

          【答案】4;Caption;B;(  );ch>=“0“Andch<=“9“;fh=-1;s&“=“&Str(sum);A
          【解答】
          【點評】
          聲明:本試題解析著作權屬菁優網所有,未經書面同意,不得復制發布。
          發布:2024/6/27 10:35:59組卷:2引用:2難度:0.4
          相似題
          • 1.有如下VB程序段:

            在文本框Text 1中輸入“985-3+-”,執行該程序段后,文本框Text2中顯示的值為(  )

            發布:2025/1/2 11:0:1組卷:1引用:1難度:0.4
          • 2.某 vb 工程的代碼窗口如圖所示,則下列說法正確的是(  )

            發布:2025/1/2 11:0:1組卷:0引用:1難度:0.4
          • 3.小李編寫了按奇數位數字升序和偶數位數字降序排列的 VB 程序,功能如下:程序運行時,在標簽 Label1 中顯示排序前的數字,單擊“排序”按鈕,在標簽 Label2 中輸出排序的結果,運行界面如圖所示。

            實現上述功能的 VB 程序如下。


            (1)根據程序代碼,窗體中顯示“排序”文字的按鈕對象名稱為_____。
            (2)程序代碼中,加框處代碼有錯,請改正。
            (3)程序代碼中,將 Label2.Caption 賦值語句補充完整。
            (4)程序代碼中,與下劃線語句 i Mod 2=0 功能相同的是_____ (單選,填字母:A.j Mod2=1/B.(i+j) Mod 2=0/C.k<>i)

            發布:2025/1/2 11:0:1組卷:0引用:1難度:0.9
          APP開發者:深圳市菁優智慧教育股份有限公司| 應用名稱:菁優網 | 應用版本:5.0.7 |隱私協議|第三方SDK|用戶服務條款
          本網部分資源來源于會員上傳,除本網組織的資源外,版權歸原作者所有,如有侵犯版權,請立刻和本網聯系并提供證據,本網將在三個工作日內改正