1、VB算法與程序設計會考復習,分數(shù)分布（42分）,選擇題 24 分(8小題) 程序設計題 18 分(4小題),選擇題（直接法、間接法（排除法、代入法等）,一、算法與算法的表示 二、VB環(huán)境及對象 三、算法代碼,選擇題,1根據(jù)實例判斷常用算法（枚舉、解析、遞歸） 2根據(jù)實例判斷三種程序結(jié)構(gòu)（順序、選擇、循環(huán)） 3數(shù)據(jù)類型（Integer、Long、single、Double、String、Boolean、Date） 4常用函數(shù)的使用（Int、Sqr、Abs、Fix、Val、Str） 5對象、屬性 6行If語句、塊IfendIf 語句、Fornext語句、DoLoop語句、賦值語句 7VB表達式（值

2、），注意“*”不能省略 8Mod、not、and、or運算符的使用,一、必答題,在5分鐘內(nèi)，每組完成20個選擇題，每題10分。每組派一個代表上臺寫答案，其他組員糾正。,必答題答案,第一套 AABCD CBDDD ABBCD BABDD 第二套 DBAAC ADAAB AAACD ABCBB,二、搶答題,每小題20分。在老師說出開始后才可以搶答，犯規(guī)每題倒扣20分，答對并說明理由才可以加分，答錯扣20分。,1以下是合法的Visual Basic標識符是 （ ） Aint B abc_1 C.9abc D.next,B,2下列各組控件都具有Caption屬性的是（ ） （A）窗體、文本框 （B）標

3、簽、定時器 （C）窗體、標簽 （D）文本框、定時器,C,C,C,3如果想在程序中反復使用數(shù)值型數(shù)據(jù)3.14159，為了避免在編寫程序時反復輸入這個數(shù)據(jù)，也為了一次能夠修改程序中所有用到這個數(shù)據(jù)的語句，可以采用（ ） （A）將這個數(shù)據(jù)聲明為字符串型常量，用一個常量標識符代表它。 （B）將這個數(shù)據(jù)聲明為字符串型變量，用一個變量標識符表示它。 （C）將這個數(shù)據(jù)聲明為數(shù)值型常量，用一個常量標識符代表它。 （D）將這個數(shù)據(jù)聲明為數(shù)值型變量，用一個變量標識符表示它,4下棋時要通過擲骰子來隨機確定走棋步數(shù)。骰子的六個面上標有數(shù)字1至6，下面能表示產(chǎn)生1至6之間的隨機整數(shù)的表達式是 （ ） （A）Rnd(1)

4、*6 （B）Rnd(1)*5+1 （C）Int(Rnd(1)*6)+1 （D）Int(Rnd(1)*5)+1,由字符、數(shù)字、下劃線組成 但必須以字母開頭 且不能把保留字作為普通名,Const p=3.14159,Rnd()產(chǎn)生0,1)內(nèi)的任一小數(shù),窗體、標簽、命令按鈕,5有如下程序段 Dim a as string，b as string，c as integer a = 456 b = 123 c = val(a+b) 該程序段運行后，c的值為 ( ) （A）579 （B）123 （C）456123 （D）456 123,7.下列程序段是計算哪個公式的 ( ) s=0：t=1 for i=1

5、 t0 10 t=t*i s=s+t next i As=l+2+3+10 Bs=1*2*3*10 Cs=1!+2!+3!+10! D. s=1+2*3+3*4+4*5+9*10,6有以下程序段 For i = 1 To 3 For j = 5 To 1 Step -1 s = i*j Next j Next i 則語句s = i*j 的執(zhí)行次數(shù)是 ( ) （A）3（B）8（C） 18 （D） 15,C,456+123 :加法符號 “456”+”123”:連接符號,三、選答題,每題30分，每組選擇其中一題，在1分鐘后給出答案，其他成員可以補充。超出時間后取消回答權(quán)，由其他三組搶答完成。,三、選

6、答題（程序填空題）,飯館吃飯 猴子吃桃 雞兔同籠 破譯密碼,1、有30個人，其中有男人、女人和小孩。他們在一家飯館里花去500元。已知，每個男人花30元，每個女人花20元，每個小孩花10元。問：男人、女人、小孩各為多少人。 為了實現(xiàn)這一目標，完善下面的VB程序，在劃線處填入合適的語句或表達式，完成程序設計。,Private Sub Command1_Click() Dim man As Integer, woman As Integer, child As Integer For man = 1 To 15 For woman = 1 To 23 child = _ s = 30 * man

7、+ 20 * woman + 10 * child If _ Then List1.AddItem Str(man) + + Str(woman) + + Str(child) End If Next woman Next man End Sub,30manwoman,Child0 and s=500,2猴子吃桃問題。猴子第一天摘下若干個桃子，當即吃了一半，還不過癮，又多吃了一個。第二天早晨又將剩下的桃子吃了一半，又多吃了一個。以后每天早上都吃了前一天剩下的一半零一個。到第十天早上再想吃時，見只剩一個桃子了。問:第一天猴子共摘了多少只桃子。 為了實現(xiàn)這一目標，完善下面的VB程序，在劃線處填入合

8、適的語句或表達式，完成程序設計。 Visual Basic 程序如下： sub command1_click() dim i ,s as integer _ for i=1 to 9 _ next i text1.text=str(s) end sub,S=1,S=2*(s+1),3小明數(shù)了圈在一起的雞和兔共有30個頭，90只腳，在這個圈子中雞和兔各有多少只？為了實現(xiàn)這一目標，完善下面的VB程序，在劃線處填入合適的語句或表達式。 設雞為x只，兔為y只，Visual Basic 程序如下： Private Sub Command1_Click() Const head = 30, foot =

9、90 Dim x, y As Integer x =_ y =_ Text1.Text = Str(x) Text2.Text = Str(y) End Sub,2*head-foot/2,foot/2-head,x+y=head 2*x+4*y=foot,4下面是一個檢測密碼的程序，其功能是：當用戶輸入的密碼正確時，在窗體上顯示“歡迎您使用本系統(tǒng)！”；否則顯示“密碼錯誤！請重新輸入密碼?！?。 仔細閱讀程序，回答以下問題： （1）正確的密碼應是。 （2）程序中劃線處的語句應為。 Private Sub Form_Load() Text1.Text = : Text1.MaxLength = 10 Text1.PasswordChar = * 表示密碼用顯示 Label2.Caption = : Label2.Alignment = 2 End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) Label2.Caption = If KeyAscii = 13 Then KeyAscii = 13 表示是回車鍵 If Text1.Text = 0123456789 Then Label2.Caption = 歡迎您使用本系統(tǒng)！ Else _ 以下兩語句的作用是使程序能自動選中錯誤的密碼，用戶可直接重新輸入 Tex