【導(dǎo)讀】1以下4種描述中，錯(cuò)誤的是_______。2下面合法的常量是_______。類型，其中表示貨幣型的是_______。4以下關(guān)鍵字中，不能定義變量的是_______。5用十六進(jìn)制表示VisualBasic的整型常數(shù)時(shí)，前面要加上的符號(hào)是_______。6VisualBasic日期常量的定界符是_______。7數(shù)學(xué)關(guān)系3≤x<10表示成正確的VB表達(dá)式為_(kāi)______。8\，/，Mod，*四個(gè)算術(shù)運(yùn)算符中，優(yōu)先級(jí)別最低的是_______。9下面語(yǔ)句中有非法調(diào)用的是_______。10表達(dá)式23/、23\、23Mod_______。21窗體里有兩個(gè)對(duì)象，分別是圖片框Picture1和標(biāo)簽Label1。那么下面關(guān)于Print方法的使用中，錯(cuò)誤。當(dāng)輸入分別為111和222時(shí)，程序輸出為_(kāi)_____。標(biāo)簽label不支持print方法；26以下程序段運(yùn)行后，輸出字符的排列順序是_______。27用MSGBOX函數(shù)顯示的對(duì)話框，以下敘述正確的是_______。32VisualBasic表達(dá)式Cos+Abs+Int的值是_______。34當(dāng)函數(shù)MsgBox返回值為1，對(duì)應(yīng)的符號(hào)常量是vbOK，那么此時(shí)表示用戶做的操作是_______。35在VisualBasic中，InputBox函數(shù)的默認(rèn)返回值類型為字符串，用InputBox函數(shù)輸入數(shù)值型數(shù)據(jù)時(shí)，下。列操作中可以有效防止程序出錯(cuò)的操作是_______。獨(dú)處于一行則為賦值語(yǔ)句，

　　

【正文】 C. 789 456 D. 0 85 在窗體上添加一個(gè)文本框，然后編寫(xiě)如下事件過(guò)程： Private Sub Form_Load() = For i = 1 To 10 Sum = Sum + i Next i = Sum End Sub 上述程序的運(yùn)行結(jié)果是 _______。 A A. 在文本框 Text1 中輸出 55 B. 在文本框 Text1 中輸出 0 C. 出錯(cuò) D. 在文本框 Text1 中輸出不定值 86 在窗體上添加一命令按鈕 Command1，并將其 Caption 屬性設(shè)置為 cmdAA、名稱屬性設(shè)置為 cmdBB，則關(guān)于該控件的下列 _______語(yǔ)句是正確的。 C A. =100 B. cmdAA. Left=100 C. cmdBB. Left=100 D. 以上語(yǔ)句都不對(duì) 87 在窗體上畫(huà)一個(gè)名稱為 List1 的列表框，一個(gè)名稱為 Label1 的標(biāo)簽。列表框中顯示若干城市的名稱。當(dāng)單擊列表框中的某個(gè)城市名時(shí)，在標(biāo)簽中顯示選中城市的名稱。在 List1 的單擊事件過(guò)程中能正確實(shí)現(xiàn)上述功能的語(yǔ)句是 _______。 D A） = B. = List1. ListIndex C） = D） = 88 下面對(duì)語(yǔ)句 Open For Output As 1 的功能描述錯(cuò)誤的是 _______。 C A. 以順序輸出模式打開(kāi)文件 B. 如果文件 不存在，則建立一個(gè)新文件 C. 如果文件 已存在，則打開(kāi)該文件，新寫(xiě)入的的數(shù)據(jù)將添加到文件末尾 D. 如果文件 已存在，則打開(kāi)該文件，新寫(xiě)入的的數(shù)據(jù)將覆蓋原來(lái)的數(shù)據(jù) 89 執(zhí)行語(yǔ)句 Open For Random As 1 Len = 50 后，對(duì)文件 中的數(shù)據(jù)能夠進(jìn)行的操作是 _______。 C A. 只能寫(xiě)不能讀 B. 只能讀不能寫(xiě) C. 即可以讀，也可以寫(xiě) D. 不能讀，也不能寫(xiě) 90 下列說(shuō)法錯(cuò)誤的是 _______。 C A. 當(dāng)用 Write 語(yǔ) 句寫(xiě)順序文件時(shí)，文件必須以 Output 或 Append 方式打開(kāi) B. 用 Input 方式打開(kāi)一個(gè)文件時(shí)，對(duì)同一個(gè)文件可以用幾個(gè)不同的文件號(hào)打開(kāi) C. 用 Output 和 Append 方式打開(kāi)文件時(shí)，不用將文件關(guān)閉，就能重新打開(kāi)文件 D. 用 Append 方式打開(kāi)文件時(shí)，進(jìn)行寫(xiě)操作，寫(xiě)入文件的數(shù)據(jù)附加到原來(lái)文件的后面 91 下面幾個(gè)關(guān)鍵字均表示文件的打開(kāi)方式，只能進(jìn)行讀不能寫(xiě)的是 _______。 A A. Input B. Output C. Random D. Append 92 下列哪個(gè)不是寫(xiě)文件語(yǔ)句 _______。 D A. Put B. Print C. Write D. Output 93 以下敘述中正確的是 _______。 B A. 一個(gè)記錄中所包含的各個(gè)元素的數(shù)據(jù)類型必須相同 B. 隨機(jī)文件中每個(gè)記錄的長(zhǎng)度是固定的 C. Open 命令的作用是打開(kāi)一個(gè)已經(jīng)存在的文件 D. 使用 Input語(yǔ)句可以從隨機(jī)文件中讀取數(shù)據(jù) 省二級(jí)考試 VB 試題匯總 第 15 頁(yè) 共 79 頁(yè) 94 在窗體上添加一個(gè)命令按鈕 Command1 和一個(gè)文本框 Text1，然后編寫(xiě)如下事件過(guò)程： Private Sub Command1_Click() Dim s As String * 20 s = …… End Sub 該程序的功能是當(dāng)單擊按鈕 Command1 時(shí)，把變量 S 的內(nèi)容 寫(xiě)入 一個(gè) 順序文件 中，正確的程序段是_______。 B A. Open For Input As 1 B. Open For Output As 1 Write 1, s Write 1, s Close 1 Close 1 C. Open For Random As 1 D. Open For Binary As 1 Write 1, s Write 1, s Close 1 Close 1 95 =*.dat程序代碼執(zhí)行后，會(huì)顯示 _______。 A A. 只包含文件擴(kuò)展名為 .dat的文件 B. 第一個(gè) dat 文件 C. 包含所有的文件 D. 顯示磁盤(pán)的路徑 96 目錄列表框的 Path 屬性的作用是 _______。 A A. 顯示當(dāng)前驅(qū)動(dòng)器或指定驅(qū)動(dòng)器上的路徑 B. 顯示當(dāng)前驅(qū)動(dòng)器或指定驅(qū)動(dòng)器上的某個(gè)目錄下的文件名 C. 顯示根目錄下的 文件 D. 只顯示當(dāng)前路徑下的文件 97 為了使 Drive1 驅(qū)動(dòng)器列表框、 Dir1 目錄路徑列表框和 File1 文件列表框同步協(xié)調(diào)工作，需要 _______。 A A. Drive1 的 Change 事件過(guò)程中加入 = ，在 Dir1 的 Change 事件中加入 = 代碼 B. Drive1 的 Change 事件過(guò)程中加入 =，在 Dir1 的 Change 事 件中加入 = 代碼 C. Dir1 的 Change 事件過(guò)程中加入 = ，在 Drive1 的 Change 事件中加入 = 代碼 D. Dir1 的 Change 事件過(guò)程中加入 = ，在 Drive1 的 Change 事件中加入 = 代碼 98 以下程序運(yùn)行后， 文件的內(nèi)容是 _______。 B Private Sub Form_Click() Dim f1 As Integer, f2 As Integer, f3 As Integer Open d:\ For Output As 1 f1 = 2 f2 = 3 f3 = f2 + f1 Write 1, f1 * f2, f2, f3 Close 1 End Sub A. 2， 3， 3 B. 6， 3， 5 C. 2， 5， 6 D. 無(wú)內(nèi)容 定義 s 為 20 個(gè)字符的字符串 往 1 號(hào)文件寫(xiě)入數(shù)據(jù) 省二級(jí)考試 VB 試題匯總 第 16 頁(yè) 共 79 頁(yè) 99 以下能判斷是否到達(dá)文件尾的函數(shù)是 _______。 D A. BOF B. LOC C. LOF D. EOF 100 一條語(yǔ)句要分行書(shū)寫(xiě)，用 _______符號(hào)作續(xù)行符。 C A. + B. C. _ D. … 101 VB 的標(biāo)準(zhǔn)化控件位于 IDE(集成開(kāi)發(fā)環(huán)境 )中的 _______窗口內(nèi)。 B A. 工具欄 B. 工具箱 C. 對(duì)象瀏覽器 D. 窗體設(shè)計(jì)器 102 關(guān)于 Visual Basic 應(yīng)用程序正確的敘述是 _______。 A A. Visual Basic 程序運(yùn)行時(shí)，總是等待事件被觸發(fā) B. Visual Basic 程序設(shè)計(jì)就是編寫(xiě)代碼 C. Visual Basic 程序是以線性方式順序執(zhí)行的 D. Visual Basic 的事件可以由用戶隨意定義，而事件過(guò)程是系統(tǒng)預(yù)先設(shè)置好的 103 保存文件時(shí)，窗體的所有數(shù)據(jù)以 _______存儲(chǔ)。 B A. *.PRG B. *.FRM C. *.VBP D. *.EXE 104 下列哪組語(yǔ)句可以將變量 a， b 的值互換 _______。 B A. a=b : b=a B. a=a+b : b=ab : a=ab C. a=c : c=b : b=a D. a=(a+B. /2 : b=(aB. /2 105 以下程序段執(zhí)行后，整型變量 n 的值為 _______。 A year1 = 2020 n = year1 \ 4 + year1 \ 400 year1 \ 100 A. 486 B. 496 C. 506 D. 466 106 將一文本框與數(shù)據(jù)控件相關(guān)聯(lián)，需要設(shè)定文本框的 _______屬性。 C A. DataMember B. Datafield C. DataSource D. DataFormat 107 窗體 Form1 上有兩個(gè)文本框 Text Text2 和一個(gè)命令按鈕 Command1，編寫(xiě)如下兩個(gè)事件過(guò)程： Private Sub Command1_Click() a = + Print a End Sub Private Sub Form_Load() = 123 = 321 End Sub 程序運(yùn)行時(shí)點(diǎn)擊 Command1 按鈕，窗體上顯示的運(yùn)行結(jié)果是 _______。 B A. 444 B. 123321 C. 321123 D. 132231 108 在窗體上添加三個(gè)文本框，名稱分別為 Text Text Text3，一個(gè)命令按鈕 Command1。如果在 Text1中輸入 150， Text2 中輸入數(shù) 200，則執(zhí)行下列程序后， Text3 中顯示的數(shù)為 _______。 D Private Sub Command1_Click() Dim m As Integer, n As Integer m = Val() n = Val() If m n Then t = m: m = n: n = t End If Do r = m Mod n + 運(yùn)算符的 兩個(gè) 運(yùn)算項(xiàng)都是字符串類型 ,所以是連接運(yùn)算 如果 mn 則交換 m 和 n 的值 此句過(guò)后 ,m 一定大于或等于 n 如果 r=0 則退出doloop 語(yǔ)句 第 X 次執(zhí)行 do loop語(yǔ)句 r 的值 m 的值 n 的值 0 0 200 150 1 50 150 50 2 0 50 0 所以最后 m 結(jié)果為 50 doloop 循環(huán)語(yǔ)句，只有在執(zhí)行到 while 或者until 所在位置時(shí)才進(jìn)行條件判斷，即使過(guò)程內(nèi)條件變量達(dá)到要求，但是不會(huì)進(jìn)行條件判斷，直到遇見(jiàn) while 語(yǔ)句才 執(zhí)行 退出！ 省二級(jí)考試 VB 試題匯總 第 17 頁(yè) 共 79 頁(yè) m = n n = r Loop While r 0 = Str(m) End Sub A. 200