計(jì)算機(jī)軟件技術(shù)基礎(chǔ)VB0809-2A

1、計(jì)算機(jī)軟件技術(shù)基礎(chǔ)計(jì)算機(jī)軟件技術(shù)基礎(chǔ)（VB）試卷第1頁(yè)共5頁(yè)0809-2A計(jì)算機(jī)軟件技術(shù)基礎(chǔ)（VB）一、單項(xiàng)選擇題1、在Visual Basic中最基本的對(duì)象是（），它是應(yīng)用程序的基石，是其他控件的容器。A、命令按鈕日窗體 C 、文本框D、標(biāo)簽2、為了在按下回車(chē)鍵時(shí)執(zhí)行某個(gè)命令按鈕的事件過(guò)程，需要把該命令按鈕的一個(gè)屬性設(shè)置為T(mén)rue ,這個(gè)屬性是（）A、cancel B 、tabstop C 、Default D 、Enabled3、每個(gè)窗體對(duì)應(yīng)一個(gè)窗體文件，窗體文件的擴(kuò)展名是（）A、.frmB、.ocxC 、.basD .vbp4、下列哪項(xiàng)不是合法的變量名（）A、xy B 、c3 C 、x_

2、y D 、while5、可獲得當(dāng)前系統(tǒng)時(shí)間的函數(shù)是（）A、year （）B date （）C time （）D isdate （）6、用下面語(yǔ)句定義的數(shù)組的元素個(gè)數(shù)是（）。Dim st（-3 To 5） As IntegerA、6 B 、5 C 、10 D 、97、下列數(shù)組聲明語(yǔ)句中正確的是（）。A、Dim b13,6 As stringB Dim b2（1 to 3,6） As IntegerC、Dim b2（n,n） As singleD Dim b1（3 6）8、設(shè)m=6 n=7, k= 2 ,執(zhí)行語(yǔ)句 Print m n Dim10、如果要改變標(biāo)簽的背景色，則需要設(shè)置的屬性是（）A C

3、aption B 、BackC BackColor D 、BorderStyle11、為了暫時(shí)不讓命令按鈕 Command顯示，應(yīng)把 Command的某個(gè)屬T設(shè)置為 False , 這個(gè)屬性是（）。A、Visible B 、caption C 、Enabled D 、Interval12、下列不是合法常量的是（）A、9.234E+4 B 、“2007”C 、1 D 、字符串13、語(yǔ)句if x=12 then y=11,下列說(shuō)法正確的是（）。A、x=12和y=11均是賦值語(yǔ)句B、x=12和y=11均是關(guān)系表達(dá)式C、x=12是關(guān)系表達(dá)式，y=11是賦值語(yǔ)句D、y=11是關(guān)系表達(dá)式，x=12是賦值語(yǔ)

4、句14、Rnd函數(shù)不可能為（）的值.A、0B 0.1C 、1D0.123415、當(dāng)窗體被創(chuàng)建時(shí)觸發(fā)的事件是（）A、 SetFocus B 、 Form_Initialize() C16、在沒(méi)有使用控件數(shù)組的情況下, 則另一個(gè)標(biāo)簽的名稱不能是（A、 txt1B、Refresh Dactivate設(shè)在窗體上有兩個(gè)標(biāo)簽, ）TXTAC、其中一個(gè)標(biāo)簽的名稱為text1txta ,D、Command117、確定一個(gè)控件在窗體上的大小的屬性是A、width 和 heightB width 或 heighttop和 lefttop18、A、 型 19、20、21、或 left命令按鈕的Visible屬性的屬

5、性值是（類(lèi)型的數(shù)據(jù).邏輯型B、字符型C、D、實(shí)型決定控件所對(duì)應(yīng)事件過(guò)程的過(guò)程名的屬性是（A TEXTB、CAPTION)NAMEinterval決定控件上文字的字體、字形、大小及效果的屬性是（A TEXTB CAPTIONNAMEFONT語(yǔ)句k=k-1的正確含義是A將變量k的值減1后賦給變量k B 、C變量k的值與k-1的值相等 D 、22、以下（）對(duì)象不支持Dblclick事件A、文本框B、命令按鈕C、標(biāo)簽23、Visual Basic是一種面向?qū)ο蟮某绦蛟O(shè)計(jì)語(yǔ)言,A、窗體、控件和方法將變量k的值存到變量k的值為1D、窗體構(gòu)成對(duì)象的三要素是B、屬性、事件和方法C、窗體、控件和模塊D、控件、過(guò)

6、程和模塊24、下面（）對(duì)象無(wú)CAPTION屬性A、窗體B、命令按鈕C、文本框D、標(biāo)簽25、刪除字符串前導(dǎo)空格的函數(shù)是（）A、Trim（ ） B Rtrim（ ） C、Lcase D Ltrim（） 26、聲明全局變量應(yīng)該用關(guān)鍵字（）A、Static B Const C Private D Public27、注釋一個(gè)語(yǔ)句行應(yīng)該用（）A、逗號(hào) B、單引號(hào)C、分號(hào)D、冒號(hào)k-1中去28、文本框控件中將Text的內(nèi)容定義為輸入口令的屬性項(xiàng)是（）A、Password B PasswordCharC、需要編程來(lái)實(shí)現(xiàn)D以上都不是29、要實(shí)現(xiàn)每隔半秒鐘觸發(fā)一次Timer事件，需將定時(shí)器的Interval屬性指

7、定為（）。A、5000 B 20 C 200 D 50030、要把一個(gè)命令按鈕設(shè)置成暫不可見(jiàn)，應(yīng)設(shè)置其（）屬性值A(chǔ)、visible B、enabled C、captionD、 cancel31、下列程序執(zhí)行后輸出結(jié)果是：（）計(jì)算機(jī)軟件技術(shù)基礎(chǔ)計(jì)算機(jī)軟件技術(shù)基礎(chǔ)（Private Sub Form_Click()Dim n As Integer i=10 do while i y Then amin = yEnd function程序語(yǔ)句c=amin(20,30),執(zhí)行后C的值是()A、30 B、20 C、0 D、5036、在窗體中添加一個(gè)命令按鈕Command和一個(gè)文本框Textl ,并有以下程

8、序:Private Sub Command1_Click() dim a As Variant , amax As Integer a = Array(20, 31,26, -21,-102, 789)aa的最大元素值，并把最大值放在文本框中。為實(shí)現(xiàn)程End Sub此程序的功能是求數(shù)組序的功能，省略號(hào)處的程序段應(yīng)該是A Amax = a(0)For i = 1 To 55If Amax a(i) Thena(i)=Amax= a(i)End IfNextITextl .Text = AmaxC、Amax = a(1)For i = 2 To 65If Amax a(i) ThenThenAma

9、x = a(i)= a(i)End IfNext iTextl .Text = AmaxAmaxB 、Amax = a(0)For i = 1 ToIfAmaxNext ITextl .Text = AmaxD 、Amax = a(0)For i = 1 ToIf Amax a(i)AmaxEnd IfNext iTextl .Text =計(jì)算機(jī)軟件技術(shù)基礎(chǔ)計(jì)算機(jī)軟件技術(shù)基礎(chǔ)(VB)試卷第 頁(yè)共5頁(yè)End SubEnd Sub37、下列Print語(yǔ)句執(zhí)行的結(jié)果為：()Private Sub Form_Click()Dim u, v, w, x, y, zu=1: v=2: w=3x=4： y=

10、5： z=6 Print u, v, w Print x, y, z Print u; v; w; Print x; y; zEnd SubA、1234561 2 3 4 5 6G 123 D4 5 61 2 3 4 5 638、設(shè)有如下變量聲明Dim A As Date、1 2 3 4 5 6123456,為變量A正確賦值的表達(dá)方式是(A、A=#1/1/2007#B、A=# 1/1/200 7” #C、A=date( 1/1/200 7”)D、A=Format( m/d/yy，“1/1/200 7”)39、執(zhí)行下列程序，標(biāo)簽label1的顯示結(jié)果為:Private Sub Command2_

11、Click()Text1.Text = 0123456789”Text1.SelStart = 3Text1.SelLength = 3Label1.Caption = Text1.SelText End SubA、012R 345C 456D、23440、窗體中有3個(gè)按鈕Cmd1、Cmd2和Cmd3,該程序的功能是當(dāng)單擊按鈕Cmd1時(shí)，按鈕cmd2可用，按鈕cmd3不可見(jiàn)，正確的程序是(A、Private Sub Cmd1_Click()Cmd2.Visible=TrueCmd3.Visible=FalseEnd SubC、Private Sub Cmd1_Click()Cmd2.Enabl

12、e=TrueCmd3.Visible=FalseB、Private Sub Cmd1_Click()Cmd2.Enabled=TrueCmd3.Enabled=FalseEnd SubD、Private Sub Cmd1_Click()Cmd2.Enabled=FalseCmd3.Visible=False.執(zhí)行下列程序段后，S = (1), I =Dim S As Integer , i As Single i=3.4Do while i 3.4S = S + 1 i=i+0.4 loop. VB提供了結(jié)構(gòu)化程序設(shè)計(jì)的3種基本結(jié)構(gòu)，它們是順序結(jié)構(gòu)、(3)和4。.對(duì)于單精度數(shù)12.34，它在內(nèi)

13、存中占用(5)個(gè)字節(jié),雙精度數(shù)12.34,占用(6)個(gè)字節(jié).以下程序完成如下功能：將一維數(shù)組a(10)中數(shù)組元素循環(huán)向后移動(dòng)一個(gè)位置，最后一個(gè)元 素移到第一個(gè)元素位置上，閱讀并填空：Dim a(1 to 10) As Integer, t As IntegerFori = 1 To 10a(i) = Val(InputBox(請(qǐng)輸入數(shù)組元素的值)Next it=a(10)For a(i) = a(i - 1)Next iC8Fori = 1 To 10Print a(i)Next i.下面是計(jì)算N的階乘的程序，閱讀并填空Dim n As Integer, s As Single s = 1 n

14、 = Val(InputBox(請(qǐng)輸入自然數(shù))If n 34 ThenExit SubC9For i = 1 To nO0)Next iPrint n=; n, s=; s6.下列程序執(zhí)行后，y的值是 61, x的值是(12)Private Sub Form_Click()Dim x as single , y as integer x = 3.6If x 1 Then y = 1If x 2 Then y = 2If x 3 Then y = 3If x 4 Then y = 4If y4 then x=y*6+1End Sub7.以下程序要實(shí)現(xiàn)：隨著不斷單擊窗體，窗體的標(biāo)題依次顯示為：北京

15、一上海一天津一 河北。請(qǐng)補(bǔ)全程序。Index as integerIndex=index+1If index=1 thenForm1.caption=北京Elseif index= 2 thenForm1.caption=上海Elseif index=3 thenForm1.caption=天津Elseif index=4 thenForm1.caption=河北.窗體的生命周期大致可分為四個(gè)階段：(17),(18),(19)和窗體的卸載。.時(shí)鐘(Timer)控件是一種定時(shí)觸發(fā)事件的控件，它只支持 (20)事 件。二、編程題(10分)打印乘法九九表。格式如圖所示Tormi- W VPrivate S