《Visual Basic程序設(shè)計教程(第2版)》習題參考答案

1、Visual Basic程序設(shè)計教程(第2版)林卓然編著電子工業(yè)出版社2007年7月出版習題1一、單選題1D 2D 3B 4B 5C 6A7A 8A 9B 10B 11B 12B二、多選題1ADE 2AB 3BCDE 4CD 5CE三、填空題1屬性，方法，事件 2解釋，編譯 3設(shè)計，運行，中斷 4Command2_Click5中央，代碼 6MyForm.frm 7(1)Cmd1_Click()，(2)Txt1.Text="VB語言程序設(shè)計"習題2一、單選題1(1)A，(2)C 2A 3B 4B 5B 6D 7B8A 9A 10B 11B 12A 13B二、多選題1BD 2C

2、D 3 AD三、填空題1(1) (2+x*y)/(2y*y) (2) a23*a*b/(3+a)(3) x(3/8)+Sqr(y2+4*a2a/(x+y3)2Int(50+6*Rnd)3(1)138， (2)3， (3)214， (4) 70， (5) "45"， (6)04 "系統(tǒng)管理數(shù)據(jù)庫"習題3一、單選題1C 2B 3B 4D 5B 6C 7B 8D9C 10(1)A， (2)C 11A 12B 13D 14B二、多選題1AC 2ABF 3BE三、填空題1$000,124 2Label1.Caption="a*b=" 3Heig

3、ht，Width42 5Text1.SetFocus6Multiline, ScrollBars, 2 724，2423習題4一、單選題1C 2B 3C 4C 5D 6B 7(1)D，(2)A，(3)B二、多選題1ABCFGHJ 2BE 3CDE 4AE三、填空題160000 2O&pen 3(1) "0" To "9"；(2) "a" To "z", "A" To "Z"；(3) Else習題5一、單選題1B 2(1)D，(2)C 3A 4(1)B，(2)C，(3)

4、B 5B 6B二、填空題1(1) 4次，n=13； (2) 3次，n=8； (3) 3次，n=27； (4) 1次，n=12 222730 4Style 5下拉列表框 6AddItem，RemoveItem或Clear7(1)ItemA，(2) ItemD，(3) ItemD，(4) ItemA習題6一、單選題1D 2A 3B 4C 5C 6A 7(1)D (2)A (3)B二、多選題1AD 2CD三、填空題1 二, 12; 1, 3; -1, 22 0 1 2 3 1 0 1 2 2 1 0 1 3 2 1 03 Name, Index 4(1) 0 To Index， (2)Val(Tex

5、t1(k).Text)習題7一、單選題1B 2C 3B 4B 5C 6D 7A 8C 9D 10C二、填空題1EF 2(1)14，(2) 2，(3)10 3(1)10，(2)28，(3)6，(4) 64(1)Power(x,n-1)*x，(2)Power = x習題8一、單選題1B 2D 3D 4A 5B 6D 7A8(1)D，(2)D 9B 10A 11D 二、填空題1 Get, Put2 (1) Open "Myfile3.txt" For Output(2) Write #1, StNo, StMb (3) Close #1 3 (1) Open " Myf

6、ile3.txt" For Input As #1 (2) EOF(1) (3) Input #1, StNo, StMb習題9單選題1B 2D 3D 4B 5A 6A習題10一、單選題1C 2(1)A，(2)C 3C 4A 5(1)A，(2)D 6A 7D8B 9D二、填空題1(1)Change，(2)Value，(3)Scroll，(4)Value2Circle(Scale.Width/2,Scale.Height/2),10003(1) P1.Picture ，(2) P2.Picture，(3) P2.Picture = P3.Picture4KeyDown，KeyPress

7、，KeyUp 5MouseDown，MouseUP6菜單編輯器，頂；PopUpMenu7(1) Button.Index (2) BackColor = RGB(255, 0, 0) (3) BackColor = RGB(0, 255, 0) (4) BackColor = RGB(0, 0, 255)8(1)DragMode, (2)1，(3)0 9(1)Action, (2)4, (3)ShowFont10(1)KeyPress， (2)Cls， (3)CurrentY = Y， (4) Button=1習題11一、單選題1C 2C 3A 4D 5A 6D 7D 8C9D 10D 11C 12A 13B二、填空題1Select 職工號,基本工資 From 工資表 Where 基本工資>5002Update 職工表 Set 姓名="伍小明" Where 職工號="00018"3Select 學籍表.班號,Avg(成績表.英語) From 成績表,學籍表 Where 學籍表.學號=成績表.學號 Group By 學籍表.班號4Update 工資表 Set 基本工資=基本工資+1005Delete From 工資表 Where