全國計算機等級考試二級vb上機試題庫以與解析(已修改)
2025-04-05 07:36 本頁面
【正文】 . . . . .全國計算機等級考試二級VB上機題庫(一) 圖1 圖2=+1400=+400=*3最后單擊保存按鈕，,。 =LCase() =UCase()一、 簡單應用題（2小題，每小題20分，共計40分）。包含所有控件和部分程序，如圖所示。要求：1)利用屬性窗口向列表框添加四個項目：Visual Basic,Turbo C,C++,Java。2)請編寫適當的程序完成以下功能：當選擇列表框中的一項和單選按鈕Option1,然后單擊“確定”命令按鈕，則文本框中顯示“XXX筆試”；當選擇列表框中的一項和單選按鈕Option2，然后單擊“確定”命令按鈕，則文本框中的一項和單選按鈕Option2，然后單擊“確定”命令按鈕，則文本框中顯示“XXX上機”。其中“XXX”是在列表框中所選擇的項目。If =True then =()+End IfIf =True then =()+End If最后單擊保存按鈕。2．。在窗體上已經有一個命令按鈕。其名稱為Command1,標題為“計算并輸出”；程序運行后，如果單擊命令按鈕，程序將計算500以內兩個數之間（包括開頭和結尾的數）所有連續(xù)數的和為1250的正整數，并在窗體上顯示出來，這樣的數有多組，程序輸出每組開頭和結尾的正整數，并用“～”連接起來,如圖所示，這個程序不完整，請把它補充完整。要求：去掉程序中的注釋符，把程序中的？該為正確的內容，使其實現上述功能，但不得修改程序中的其他部分。最后把修改的文件按原文件存盤。Private Sub Command1_Click() Dim i As Integer, j As Integer, iSum As Integer Print 連續(xù)和為1250的正整數是： For i = 1 To 500 39。 isum = 0 賦初值 For j = i To 50039。 iSum = j+iSum 進行累加 If iSum = 1250 Then Exit For Next39。 If iSum = 1250 Then 和是否為1250 Print i。 ～ 。 j End If NextEnd Sub答
醫(yī)療健康相關推薦
鄂ICP備17016276號-1