【文章內(nèi)容簡(jiǎn)介】 為高級(jí)語(yǔ)言和 兩大類(lèi)。雙擊某個(gè)對(duì)象時(shí)，最終引發(fā)該對(duì)象的事件。程序流程是按一定條件重復(fù)多次執(zhí)行一段程序的結(jié)構(gòu)是 結(jié)構(gòu)。將對(duì)象設(shè)置為禁止用戶(hù)操作，是將它的Enabled屬性值設(shè)為。在Visual ， 。長(zhǎng)整型變量的關(guān)鍵字是 。三角函數(shù)是以為 單位。Chr$(13)為 huiche 。在整個(gè)工程的所有模塊中均有效變量是 全局變量 。方法用于在窗體、圖片框、調(diào)試窗中、打印機(jī)等對(duì)象上輸出文本1下列程序段是用于在一個(gè)字符串變量中查找red，并用信息輸出框給出找到的個(gè)數(shù)或沒(méi)有找到的查找結(jié)果。Private Sub Form_Click() Dim Str1 As String, Length As Integer, Sum As Integer, I As Integer Str1 = InputBox(請(qǐng)輸入一個(gè)字符串) Length = I = 1 Sum = 0 Do While I =length3 If = red Then Sum = Sum + 1 End If I = I + 1 Loop If Then MsgBox 沒(méi)有找到！ Else MsgBox 找到了 amp。 Str(Sum) amp。 個(gè) End IfEnd Sub1在窗體上畫(huà)一個(gè)標(biāo)簽（名稱(chēng)為L(zhǎng)abel1）和一個(gè)計(jì)時(shí)器（名稱(chēng)為T(mén)imer1），然后編寫(xiě)如下幾個(gè)事件過(guò)程：Private Sub Form_Load() = False = End SubPrivate Sub Form_Click() = End SubPrivate Sub Timer1_Timer() = time()End Sub程序運(yùn)行后，單擊窗體，將在標(biāo)簽中顯示當(dāng)前時(shí)間，每隔1秒鐘變換一次（如見(jiàn)下圖）?！　?4:54:41——————————————————————三、判斷題（10道小題，共10分） 立即窗口既可顯示程序調(diào)試時(shí)新產(chǎn)生的信息，也可執(zhí)行一行代碼。錯(cuò)誤 變量是指在程序運(yùn)行過(guò)程中其值可以改變的那些量，而值不能改變的是常量。（1分） 錯(cuò)誤 語(yǔ)句a=7:print：a=8:print a 可以輸出a的兩個(gè)值。可以在運(yùn)行期間改變對(duì)象的Name屬性的值。（1分） 錯(cuò)誤 字符串AB 與ab是兩個(gè)相等的字符串。（1分） 在 if 條件 then 結(jié)構(gòu)中，條件必須是邏輯表達(dá)式或關(guān)系表達(dá)式。（1分） 在 For 控制變量＝初值 To 終值 [Step 步長(zhǎng)] 結(jié)構(gòu)中，可以寫(xiě)成 For a=x to z 。（1分） 計(jì)時(shí)器（Timer）控件的Interval屬性的單位是毫秒，即若將此屬性值設(shè)為10。（1分） 窗體文件的擴(kuò)展名是 .frm。（1分） 在VB中，int(rnd*90)+10的取值范圍是[10,99]。（1分） 四、編程題（4道小題，共60分） 輸入一串?dāng)?shù)字，求其中各位數(shù)字之和。例如輸入123456，則求1＋2＋3＋4＋5＋6。必須將本題程序最后的運(yùn)行結(jié)果填入下面的框中。否則，該題以零分計(jì)! 請(qǐng)將你解答本題所寫(xiě)的源程序粘貼到下面或者上載源程序 勾股定理中三個(gè)數(shù)的關(guān)系是：a^2 + b^2 =c^2 編寫(xiě)程序，輸出100以?xún)?nèi)滿(mǎn)足上述關(guān)系的整數(shù)組合，例如3，4，5就是一個(gè)整數(shù)組合。（本題不要求填寫(xiě)運(yùn)行結(jié)果） 請(qǐng)將你解答本題所寫(xiě)的源程序粘貼到下面或者上載源程序 編寫(xiě)程序，用普通迭代法求方程f(x)=x+=0的近似實(shí)根r。〔提示：必須把方程f(x)=0化成其等價(jià)形式x=g(x)〕。（允許使用其他迭代法）必須將本題程序最后的運(yùn)行結(jié)果填入下面的框中。否則，該題以零分計(jì)! 請(qǐng)將你解答本題所寫(xiě)的源程序粘貼到下面或者上載源程序 編寫(xiě)程序，輸出下列三角形： (要求用循環(huán)做，非循環(huán)不給分。) G FG EFG DEFG CDEFG BCDEFG ABCDEFG（本題不要求填寫(xiě)運(yùn)行結(jié)果） 請(qǐng)將你解答本題所寫(xiě)的源程序粘貼到下面或者上載源程序 以下敘述中錯(cuò)誤的是(b )（1分） A、一個(gè)工程中可以包含多個(gè)窗體文件 B、在一個(gè)窗體文件中用Private定義的通用過(guò)程能被其他窗體調(diào)用 C、若工程文件中有多個(gè)窗體,可以根據(jù)需要指定一個(gè)窗體為啟動(dòng)窗體 D、事件可以由用戶(hù)引發(fā),也可以由系統(tǒng)引發(fā) 在設(shè)計(jì)階段,當(dāng)雙擊窗體上的某個(gè)控件時(shí),所打開(kāi)的窗口是( )（1分） A、工程資源管理器窗口 B、工具箱窗口 C、代碼窗口 D、屬性窗口 用Static M (60 to 90) As Integer語(yǔ)句定義的數(shù)組的元素個(gè)數(shù)是( )（1分） A、60 B、30 C、31 D、90 如果整型變量c、d的值分別為10和5,則下列語(yǔ)句中For I=c to d : Print I : Next I 循環(huán)體的執(zhí)行次數(shù)是( )（1分） A、6 B、5 C、1 D、0 a和b中有且只有一個(gè)為0,可以用以下的表達(dá)式來(lái)表示( )（1分） A、a=0 or b=0 B、a*b=0 and a+b0 C、a*b=0　or　 a+b≠0 D、a=0 and not b=0 and b=0 and not a=0 用情況選擇語(yǔ)句Select Case X,選擇|X| 10情況的語(yǔ)句為Case( )（1分） A、Not (10 To 10) B、10 To 10 C、Is 10, Is 10 D、ABS(X) 10 設(shè)a=10,b=5,c =1,執(zhí)行語(yǔ)句 a b c結(jié)果是( )（1分） A、True B、False C、1 D、出錯(cuò)信息 在Visual Basic中下面的四個(gè)數(shù)組聲明語(yǔ)句,正確的是( )（1分） A、Dim a[10] B、Def fn(10) C、Dim a(10) D、Dimension a(10) 假設(shè)有以下程序段For I=1 to 3:For j=5 to 1 Step 1:Print I*j:Next j:Next I則語(yǔ)句 Print I*j 的執(zhí)行次數(shù)以及I、j的值分別是( )（1分） A、12 3 0 B、13 3 1 C、12 4 0 D、13 4 1 創(chuàng)建Visual Basic應(yīng)用程序的主要步驟是：①創(chuàng)建應(yīng)用程序界面 ②設(shè)置控件 ③設(shè)置屬性 ④編寫(xiě)代碼,其中正確的步驟是( d )（1分） !!!!!!!!!!!!!!!A、①②③④ B、①②④ C、②③④ D、①③④ 1為了在按下回車(chē)鍵時(shí)執(zhí)行某個(gè)命令按鈕的事件過(guò)程,需要把該命令按鈕的一個(gè)屬性設(shè)置為T(mén)rue,這個(gè)屬性是( )（1分） A、Value B、Default C、Cancel D、Enabled 1如果數(shù)據(jù)包含小數(shù),則不應(yīng)定義為下列哪種類(lèi)型( )（1分） A、Double B、Single C、Byte D、Currency 1下列程序段s=0:for i=9 to 42 step 11:s=s+i:next:if i50 then s=s+i else s=si 運(yùn)行后s的結(jié)果為( )（1分） A、167 B、139 C、144 D、155 1有如下程序For x=1 TO 2:For y=0 TO x1:Print x*y:Next:Next,內(nèi)層循環(huán)的循環(huán)體的總執(zhí)行次數(shù)是( )（1分） A、1 B、2 C、3 D、4 1在下列四個(gè)式子中,非法的Visual Basic表達(dá)式是( )（1分） A、a=b+e B、53+3 C、a=exp D、55 1表達(dá)式INT(4*RND+2)*(INT(4*RND－2))值的范圍是( )（1分） A、[10,8] B、[4,8] C、[10,5] D、[4,8] 1要統(tǒng)計(jì)出字符串計(jì)算機(jī)技術(shù)基礎(chǔ)visual basic的長(zhǎng)度,應(yīng)使用下列( )函數(shù)（1分） A、TAB B、STR C、LEN D、INSTR 1表達(dá)式(not true or true) and (true or false)的值為( )（1 A、false B、true C、0 D、1 1下列哪個(gè)關(guān)鍵字聲明的局部變量在整個(gè)程序運(yùn)行中一直存在( c A、Dim B、Public C、Static D、Private 下面的變量名合法的是( )（1分） A、 B、k%name C、name D、kname 2Visual Basic中不允許出現(xiàn)的數(shù)據(jù)形式為( )（1分） A、 B、.368 C、D32 D、 2設(shè)a=2,b=4,c=6,下列表達(dá)式值為真的是( )（1分） A、ab And ca B、ab Or ca C、ab and ca D、bc Or ca 2要使變量x賦值為1到100間(含1,不含100)的一個(gè)隨機(jī)整數(shù),正面語(yǔ)句正確的是( )（1分） A、x=Int(100*Rnd) B、x=Int(101*Rnd) C、x=1+Int(100*Rnd) D、x=1+Int(99*Rnd) 2下列關(guān)于屬性設(shè)置的敘述正確的是( d )（1分） A、所有的對(duì)象都有同樣的屬性 B、控件的屬性只能在設(shè)計(jì)時(shí)修改,運(yùn)行時(shí)無(wú)法改變 C、控件的屬性都有同樣的默認(rèn)值 D、引用對(duì)象屬性的格式為： 2使文本框獲得焦點(diǎn)的方法是( )（1分） A、Change B、GotFocus C、SetFocus D、LostFocus 二、填空題（12道小題，共35分） 可視化Visual Basic以結(jié)構(gòu)化 Object pascal 語(yǔ)言為基礎(chǔ)。一個(gè)工程可以包括多種類(lèi)型的文件,其中窗體文件的擴(kuò)展名為。程序流程中被重復(fù)執(zhí)行的程序段叫 循環(huán)結(jié)構(gòu) 。將對(duì)象設(shè)置為不可見(jiàn)的，是將它的屬性值設(shè)為False。在Visual 。表示貨幣型數(shù)據(jù)的單一字符是。Int(x)函數(shù)的含義是。設(shè)A$=Visual Basic是一種可視化編程語(yǔ)言,mid$(A$,8,5)函數(shù)返回值是。邏輯值轉(zhuǎn)變?yōu)閿?shù)值時(shí)，F(xiàn)alse為 0 。 在Print方法中，輸出項(xiàng)用逗號(hào)分隔是按 標(biāo)準(zhǔn) 格式輸出。1下列程序段是用于在一個(gè)字符串變量中查找Rose，并用信息輸出框給出找到的個(gè)數(shù)或沒(méi)有找到的查找結(jié)果。Private Sub Form_Click() Dim Str1 As String, Length As Integer, Sum As Integer, I As Integer Str1 = InputBox(請(qǐng)輸入一個(gè)字符串) I = 1 Sum = 0 Do While I =length4 If = Rose Then Sum = Sum + 1 End If I = I + 1 Loop If Then MsgBox 沒(méi)有找到！ Else MsgBox 找到了 amp。 Str(Sum) amp。 個(gè) End IfEnd Sub1在窗體上畫(huà)一個(gè)標(biāo)簽（名稱(chēng)為L(zhǎng)abel1）和一個(gè)計(jì)時(shí)器（名稱(chēng)為T(mén)imer1），然后編寫(xiě)如下幾個(gè)事件過(guò)程：Private Sub Form_Load() = = 1000End SubPrivate Sub Form_Click() = End SubPrivate Sub Timer1_Timer() = time()End Sub程序運(yùn)行后，單擊窗體，將在標(biāo)簽中顯示當(dāng)前時(shí)間，每隔1秒鐘變換一次（如見(jiàn)下圖）?！　?2:40:20—————————————————————— 三、判斷題（10道小題，共10分） 在VB中，注釋語(yǔ)句也是可執(zhí)行語(yǔ)句。（1分）錯(cuò)誤 在VB中，變量可以直接使用（即不聲明就使用） 正確 要想以標(biāo)準(zhǔn)方式顯示變量a,b,c的值，可以寫(xiě)成 print a，b，c要想修改在窗體上輸出的字體的顏色，可以修改窗體的Forecolor屬性。（1分） 字符串AB 與ab是兩個(gè)相等的字符串。（1分） 在 if 條件 then 結(jié)構(gòu)中，條件可以是邏輯表達(dá)式或數(shù)值表達(dá)式。（1分） 在 For 控制變量＝初值 To 終值 [Step 步長(zhǎng)] 結(jié)構(gòu)中，可以寫(xiě)成 For a=x to z 。（1分） 改變窗體的標(biāo)題也就是改變其屬性窗口中的name屬性。（1分） Open命令的作用只是打開(kāi)一個(gè)已經(jīng)存在的文件。（1分） 在定義了一個(gè)函數(shù)后，可以象調(diào)用任何一個(gè)VB內(nèi)部函數(shù)一樣使用它，即可以在任何表達(dá)式、語(yǔ)句或函數(shù)中引用它。（1分） 正確 四、編程題（4道小題，共60分） 編寫(xiě)程序，計(jì)算并輸出下面級(jí)數(shù)前n項(xiàng)(n=80)的部分和。 11/2+1/31/4+1/5+……＋1/n(n由鍵盤(pán)輸入 ，要求用循環(huán)做，非循環(huán)不給分。)必須將本題程序最后的運(yùn)行結(jié)果