計(jì)算機(jī)二級(jí)VB重點(diǎn)知識(shí)點(diǎn)解析

1、重 點(diǎn) 知 識(shí) 點(diǎn) 解 析考試內(nèi)容 一、Visual Basic程序開(kāi)發(fā)環(huán)境 1. Visual Basic的特點(diǎn)和版本。 2. Visual Basic的啟動(dòng)與退出。 3. 主窗口： （1） 標(biāo)題和菜單。 （2） 工具欄。 4. 其它窗口： （1）窗體設(shè)計(jì)器和工程資源管理器。 （2）屬性窗口和工具箱窗口。具體要求1VB的概念、運(yùn)行環(huán)境、對(duì)象、屬性、方法、事件各概念，尤其是方法和事件的區(qū)分。2熟悉VB的IDE，VB開(kāi)發(fā)應(yīng)用程序的一般步驟。3特點(diǎn)：GUI（圖形化用戶界面）、OLE（對(duì)象的連接和嵌入）、OOP（面向?qū)ο螅?運(yùn)行環(huán)境：Windows（VB5.0以上在32位操作系統(tǒng)）5方法：對(duì)象可以

2、執(zhí)行的動(dòng)作或行為；（主動(dòng)性）6事件：使某個(gè)對(duì)象進(jìn)入活動(dòng)狀態(tài)的一種操作或動(dòng)作。（被動(dòng)性）例 題：2006.4（11）以下關(guān)于Visual Basic特點(diǎn)的敘述中，錯(cuò)誤的是（ ）。AVisual Basic是采用事件驅(qū)動(dòng)編程機(jī)制的語(yǔ)言 BVisual Basic程序既可以編譯運(yùn)行，也可以解釋運(yùn)行 C構(gòu)成Visual Basic程序的多個(gè)過(guò)程沒(méi)有固定的執(zhí)行順序 DVisual Basic程序不是結(jié)構(gòu)化程序，不具備結(jié)構(gòu)化程序的三種基本結(jié)構(gòu) 2010.9（11）在Visual Basic集成環(huán)境中，要添加一個(gè)窗體，可以單擊工具欄上的一個(gè)按鈕，這個(gè)按鈕是（） 2010.9（12）在Visual Basic

3、集成環(huán)境的設(shè)計(jì)模式下，用鼠標(biāo)雙擊窗體上的某個(gè)控件打開(kāi)的窗口是A)工程資源管理器B)屬性窗口C)工具箱窗口D）代碼窗口 2011.3（11）在Visual Basic集成開(kāi)發(fā)環(huán)境中，可以列出工程中所有模塊名稱的窗口是（）A)工程資源管理器B)窗體設(shè)計(jì)窗口C)屬性窗口D)代碼窗口2011.9(12)在設(shè)計(jì)階段，當(dāng)單擊Ctrl+R時(shí)，所打開(kāi)的窗口是（）A) 代碼窗口B) 工具箱窗口C) 工程資源管理器D）屬性窗口二、對(duì)象及其操作1.對(duì)象： （1）Visual Basic的對(duì)象。 （2）對(duì)象屬性設(shè)置。 2.窗體： （1）窗體的結(jié)構(gòu)與屬性。 （2）窗體事件。 3.控件： （1）標(biāo)準(zhǔn)控件。 （2）控件的命

4、名和控件值。 4.控件的畫(huà)法和基本操作。 5.事件驅(qū)動(dòng)。常用標(biāo)準(zhǔn)控件 ：1.文本控件： （1）標(biāo)簽。 （2）文本框。 2.圖形控件： （1）圖片框、圖象框的屬性、事件和方法。 （2）圖形文件的裝入。（3）直線和形狀。 3.按鈕控件。 4.選擇控件：復(fù)選框和單選按鈕。 5.選擇控件：列表框和組合框。6.滾動(dòng)條。 7.記時(shí)器。 8.框架。 9.焦點(diǎn)和Tab順序。 具體要求熟練應(yīng)用窗體、控件。對(duì)象名命名規(guī)則：以字母或漢字開(kāi)頭，后面可以是字母、數(shù)字、下劃線、漢字。（變量名類似）掌握窗體的常用方法(Hide、Show、Print、Cls、Refresh、Move)、屬性和事件(Load、Activate

5、、Click)。Move方法對(duì)象.Move左邊距離，上邊距離，寬度，高度Move方法中的“對(duì)象”可以是窗體以及除計(jì)時(shí)器（Timer）、菜單（Menu）之外的所有控件，如果省略“對(duì)象”，則表示要移動(dòng)的是窗體。 例 把控件移到相應(yīng)的位置，并能改變其大小的方法是（ ）。AClsBMoveCformatDTab答案：B2011.9（11）以下描述中錯(cuò)誤的是（）（A）窗體的標(biāo)題通過(guò)其Caption屬性設(shè)置（B）窗體的名稱（Name屬性）可以在運(yùn)行期間修改（C）窗體的背景圖形通過(guò)其Picture屬性設(shè)置（D）窗體最小化時(shí)的圖標(biāo)通過(guò)其Icon屬性設(shè)置2011.3（12）假設(shè)編寫(xiě)了如下4個(gè)窗體事件的事件過(guò)程，

6、則運(yùn)行應(yīng)用程序并顯示窗體后，已經(jīng)執(zhí)行的事件過(guò)程是（）A)LoadB)ClickC)LostFocusD)KeyPress2011.3（20）窗體Form1上有一個(gè)名稱為Command1的命令按鈕，以下對(duì)應(yīng)窗體單擊事件的事件過(guò)程是（）A)Private Sub Form1_Click()B)Private Sub Form_Click() End SubEnd SubC)Private Sub Command1_Click()D)Private Sub Command_Click() End SubEnd Sub常用控件：CommandButton(Default、Cancel、Enabled、

7、Style 、DisabledPicture、DownPicture)2010.9（21）以下說(shuō)法中錯(cuò)誤的是（）A)如果把一個(gè)命令按鈕的Default屬性設(shè)置為True，則按回車鍵與單擊該命令按鈕的作用相同B)可以用多個(gè)命令按鈕組成命令按鈕數(shù)組 C）命令按鈕只能識(shí)別單擊（Click）事件 D)通過(guò)設(shè)置命令按鈕的Enabled屬性，可以是該命令按鈕有效或禁用Label(AutoSize、BackStyle、Alignment、WordWrap)2011.3（13）為了使標(biāo)簽具有“透明”的顯示效果，需要設(shè)置的屬性是（）A)CaptionB)AlignmentC)BackStyleD)AutoSiz

8、eTextBox(Alignment、MaxLength、PasswordChar、Multiline、ScrollBars注：Multiline=True) 2010.9（20）在窗體上畫(huà)一個(gè)文本框（名稱為Text1）和一個(gè)標(biāo)簽（名稱為L(zhǎng)abel1），程序運(yùn)行后，如果在文本框中輸入文本，則標(biāo)簽立即顯示相同的內(nèi)容。以下可以實(shí)現(xiàn)上述操作的事件過(guò)程是 B）Private Sub Label1_Change() Label1.Caption=Text1.Text End Sub A）Private Sub Text1_Change() Label1.Caption=Text1.Text End Su

9、b D）Private Sub Label1_Click() Label1.Caption=Text1.Text End Sub C）Private Sub Text1_Click() Label1.Caption=Text1.Text End Sub OptionButton、CheckBox(Value)2、單選按鈕（OptionButton）用于一組互斥的選項(xiàng)中。若一個(gè)應(yīng)用程序包含多組互斥條件，可在不同的（ ）中安排適當(dāng)?shù)膯芜x按鈕，即可實(shí)現(xiàn)。A. 框架控件（Frame）或圖像控件（Image）B. 組合框（ComboBox）或圖像控件（Image）C. 組合框（ComboBox）或圖片框

10、（PictureBox）D. 框架控件（Frame）或圖片框（PictureBox）ListBox(屬性：listlistcountlistindexselected、方法：AddItem、RemoveItem、Clear)2011.3（32）設(shè)窗體上有一個(gè)名為L(zhǎng)ist1的列表框，并編寫(xiě)下面的事件過(guò)程：Private Sub List1_Click() Dim ch As String ch = List1.List(List1.ListIndex) List1.RemoveItem List1.ListIndex List1.AddItem chEnd Sub程序運(yùn)行時(shí)，單擊一個(gè)列表項(xiàng)，則產(chǎn)

11、生的結(jié)果是（）A)該列表項(xiàng)被移到列表的最前面）該列表項(xiàng)被刪除）該列表項(xiàng)被移到列表的最后面）該列表項(xiàng)被刪除后又在原位置插入ComboBox（與listbox類似）2011.3（16）窗體上有一個(gè)名稱為Cb1的組合框，程序運(yùn)行后，為了輸出選中的列表項(xiàng)，應(yīng)使用的語(yǔ)句是（）A)Print Cb1.SelectedB)Print Cb1.List(Cb1.ListIndex)C)Print Cb1.Selected.TextD)Print Cb1.List(ListIndex)2010.9（13）下列敘述錯(cuò)誤的是 A)列表框與組合框都有List屬性B)列表框有Selected屬性，而組合框沒(méi)有C)列表框

12、和組合框都有Style屬性D）組合框有Text屬性，而列表框沒(méi)有 HscrollBar、VscrollBar（min、Max、Value、LargeChange、SmallChange、Scroll事件、Chage事件）2011.9 (15)假定一個(gè)滾動(dòng)條的LargeChange屬性值為100，則100表示（）（A）單機(jī)滾動(dòng)條箭頭和滾動(dòng)框之間某位置時(shí)滾動(dòng)框位置的變化量（B）滾動(dòng)框位置的最大值（C）拖動(dòng)滾動(dòng)框時(shí)滾動(dòng)框位置的變化量（D）單擊滾動(dòng)條箭頭時(shí)滾動(dòng)框位置的變化量2011.3 (15)設(shè)窗體上有一個(gè)名稱為HS1的水平滾動(dòng)條，如果執(zhí)行了語(yǔ)句：HS1.Value=（HS1.Max-HS1.Min

13、）/2+HS1.Min則（）A)滾動(dòng)塊處于最左端B)滾動(dòng)塊處于最右端C)滾動(dòng)塊處于中間位置D)滾動(dòng)塊可以處于任何位置，具體位置取決于Max、Min屬性的值2010.9（15）滾動(dòng)條可以響應(yīng)的事件是A)Load B）Scroll C)ClickD)MouseDown PictureBox(print方法、loadpicture方法)Timer(運(yùn)行時(shí)不可見(jiàn)、只有Timer事件、Interval)方法、屬性、事件的掌握。2011.3（31）窗體上有一個(gè)名為Command1的命令按鈕和一個(gè)名為Timer1的計(jì)時(shí)器，并有下面的事件過(guò)程：Private Sub Timer1_Timer() Comman

14、d1.Left = Command1.Left + 10End SubPrivate Sub Command1_Click() Timer1.Enabled = TrueEnd SubPrivate Sub Form_Load() Timer1.Interval = 10 Timer1.Enabled = FalseEnd Sub運(yùn)行程序時(shí)，單擊命令按鈕，則產(chǎn)生的結(jié)果是（）A）命令按鈕每10秒向左移動(dòng)一次B）命令按鈕每10秒向右移動(dòng)一次C）命令按鈕每10毫秒向左移動(dòng)一次D）命令按鈕每10毫秒向右移動(dòng)一次容器控件：Form、Picture、Frame2011.3（17）為了在窗體上建立2組單選按

15、鈕，并且當(dāng)程序運(yùn)行時(shí)，每組都可以有一個(gè)單選按鈕被選中，則以下做法正確的是（）A)把這2組單選按鈕設(shè)置為名稱不同的2個(gè)控件數(shù)組B)把2組單選按鈕的Index屬性分別相同C)使2組單選按鈕的名稱分別相同D)使2組單選按鈕分別畫(huà)到2個(gè)不同的框架中2010.9（18）在窗體上畫(huà)一個(gè)圖片框，再在圖片框中畫(huà)一個(gè)命令按鈕，位置如圖所示。則命令按鈕的Top屬性值是 A）200 B)300 C)500 D)700特殊控件：菜單的使用（只響應(yīng)Click事件）1、在使用菜單編輯器創(chuàng)建菜單時(shí)，可在菜單名稱中某字母前插入（ ）符號(hào)，那么在運(yùn)行程序時(shí)按Alt鍵和該字母鍵就可打開(kāi)該命令菜單。A 下劃線B &C $D 201

16、0.9（32）有彈出式菜單的結(jié)構(gòu)如下表，程序運(yùn)行時(shí)，單擊窗體則彈出如下圖所示的菜單。下面的事件過(guò)程中能正確實(shí)現(xiàn)這一個(gè)功能的是 B）Private Sub Command1_Click() PopupMenu edit End Sub A）Private Sub Form_Click() PopupMenu cut D）Private Sub Form_Click() PopupMenu cut PopupMenu paste End Sub End Sub C）Private Sub Form_Click() PopupMenu edit End Sub 綜 合 例 題：2011.3（18）如

17、果一個(gè)直線控件在窗體上呈現(xiàn)為一條垂直線，則可以正確的是（ ）。A)它的Y1、Y2屬性的值相等B)它的X1、X2屬性的值相等C)它的X1、Y1屬性的值分別與X2、Y2屬性的值相等D)它的X1、X2屬性的值分別與Y1、Y2屬性的值相等2010.9（14）設(shè)窗體上有一個(gè)命令按鈕數(shù)組，能夠區(qū)分?jǐn)?shù)組中各個(gè)按鈕的屬性是 A)NameB）IndexC)CaptionD)Left 1、以下有關(guān)對(duì)象屬性的說(shuō)法中錯(cuò)誤的是（ ）。A.所有的對(duì)象屬性都具有Name（名稱）屬性B.只能在執(zhí)行時(shí)設(shè)置或改變的屬性為執(zhí)行時(shí)屬性C.對(duì)象的某些屬性只能在設(shè)計(jì)時(shí)設(shè)置，不能使用代碼改變。D.Enabled屬性值設(shè)為False的控件對(duì)

18、象在窗體上將不可見(jiàn)。2、窗體上有多個(gè)控件，在Form_Activate()事件過(guò)程中添加（ ）語(yǔ)句，就可確保每次運(yùn)行程序時(shí)，都將光標(biāo)定位在文本框Text1上。A.Text1.Text=B. Text1.SetFocusC.Form1.SetFocusD. Text1.Visible=True3、若在一個(gè)應(yīng)用程序窗體上，依次創(chuàng)建了CommandButton、TextBox、Label等控件，則運(yùn)行該程序顯示窗體時(shí)，（ ）會(huì)首先獲得焦點(diǎn)。A. 窗體B. CommandButtonC. LabelD. TextBox4、以下有關(guān)對(duì)象屬性的說(shuō)法中正確的是（ ）。A 對(duì)象所有的屬性都羅列在屬性窗口列表中

19、B 不同對(duì)象不可能有同名屬性C 不同對(duì)象的同名屬性取值一定相同D 對(duì)象的某些屬性既可在屬性窗口中設(shè)置，也可通過(guò)程序代碼設(shè)置或改變5、以下所列的7個(gè)控件中，具有caption屬性的是（ ）個(gè)。Picturebox,Frame,OptionButton,ListBox,TextBox,Form,DrivelistBoxA,3b,4c,2d,5三、數(shù)據(jù)類型及運(yùn)算 1.數(shù)據(jù)類型： （1）基本數(shù)據(jù)類型。 （2）用戶定義的數(shù)據(jù)類型。 2.常量和變量： （1）局部變量和全局變量。 （2）變體類型變量。 （3）缺省聲明。 3.常用內(nèi)部函數(shù)。P3 274.運(yùn)算符和表達(dá)式： （1）算術(shù)運(yùn)算符。（2）關(guān)系運(yùn)算符和邏

20、輯運(yùn)算符。（3）表達(dá)式的執(zhí)行順序。具體要求1 書(shū)寫(xiě)規(guī)范：間隔符號(hào)、續(xù)行符號(hào) _、注釋符號(hào)2 數(shù)據(jù)：數(shù)據(jù)類型、關(guān)鍵字、存儲(chǔ)單位、初值。Integer2Long4Single4 數(shù)值型 Double8 0 Byte1 Currency8 邏輯型 Boolean2 false數(shù)據(jù)類型 字符型 String10+- 空串 日期型 Date8 對(duì)象型 Object4 變體型 Variant =16 空值 用戶自定義型 Type常量：字符常量 邏輯常量日期常量 #月/日/年# 命名規(guī)則 局部 Dim/Static 符號(hào)常量： Const關(guān)鍵字變量 作用域 窗體/模塊 Dim/Private 全局（共有）P

21、ublic 說(shuō)明語(yǔ)句 Dim a As Single在窗體或標(biāo)準(zhǔn)模塊的通用聲明處可以用_語(yǔ)句定義變量。A. Dim、RedimB. Dim、StaticC. Dim、Private、PublicD. Dim、Private、Static2010.9 （22）以下關(guān)于局部變量的敘述中錯(cuò)誤的是 A)在過(guò)程中用Dim語(yǔ)句或Static語(yǔ)句聲明的變量是局部變量B)局部變量的作用域是它所在的過(guò)程C)在過(guò)程中用Static語(yǔ)句聲明的變量是靜態(tài)局部變量 D）過(guò)程執(zhí)行完畢后，該過(guò)程中用Dim或Static語(yǔ)句聲明的變量即被釋放。 2011.9 (13)設(shè)有如下變量聲明語(yǔ)句：Dim a,b As Boolean

22、，則下面敘述中正確的是（）（A）a和b都是布爾型變量（B）a是變體型變量，b是布爾型變量（C）a是整型變量，b是布爾型變量（D）a和b都是變體型變量2011.9 (14)下面可以作為visual basic變量名稱的是（）（A）A#A （B）4ABC（C）?XY（D）Print_Text隱式說(shuō)明的六個(gè)符號(hào)：%、&、！、#、$Option Explicit 語(yǔ)句功能：強(qiáng)制變量的聲明3 運(yùn)算符與表達(dá)式算術(shù) -(負(fù)號(hào))*、/Mod+、-& 例如：84*（-2）+1關(guān)系邏輯 NotAndOrXor 注意：代數(shù)表達(dá)式與VB表達(dá)式的轉(zhuǎn)換。 例如：ex+y+|x+y| 2+12011.3（19）設(shè)a=2，b

23、=3，c=4，d=5，則下面語(yǔ)句的輸出是（）Print 32*b or a=c And b c or cdA)FalseB)1C)TrueD)-1VB公共函數(shù)算術(shù)：Sqr、Log、Exp、Abs、Rnd、Sin、Cos2011.3（14）下面可以產(chǎn)生20-30（含20和30）的隨機(jī)整數(shù)的表達(dá)式是（）A)Int（Rnd*10+20）Int（Rnd*11+20）) Int（Rnd*20+30）) Int（Rnd*30+20）字符：Len、left、Right、Mid、Ucase、Lcase、Ltrim、Rtrim、Trim、Instr、String、Space轉(zhuǎn)換：Str、Cstr、Val、Chr

24、、Asc、Int、Fix、Cint、Sgn日期：Date、Time、Now、Year、Month、Day、Week、Day2010.9（17）語(yǔ)句Print Sgn(-62) +Abs(-62) +Int(-62)的輸出結(jié)果是 A) -36B)1 C）-1 D)-72例 題：1、有變量定義語(yǔ)句Dim a,b as integer,變量a的類型和初值是（ ）。A Integer,0B Variant,空值C String,“”D Long,0.02、數(shù)學(xué)表達(dá)式ln(cxy+|arctan(z)|+cos3x對(duì)應(yīng)的Visual Basic算術(shù)表達(dá)式是（ ）。A. ln(E(xy)+Abs(Tan(

25、z)+cosx3B. Log(exp(xy)+abs(tan(z)+cos(x)3C. Ln(exp(x*y)+abs(atn(z)+cosx3D. Log(exp(x*y)+abs(Atn(z)+cos(x)3)3、下面表達(dá)式的值為真的是（ ）。A Mid(Visual Basic, 1, 12) = Right(Programming Language Visual Basic, 12)B ABCRG abcdeC Int(123.69) = CInt(123.69)D 78.9 / 32.77 -4.984、代數(shù)表達(dá)式對(duì)應(yīng)的Visual Basic表達(dá)式是（ ）。A Log(Abs(Ex

26、p(3.14159) + Sin(x) 3) / (x + y)B Ln(Abs(Exp(3.14159)+Sin(x)3)/(x+y)C Log(Abs(Exp(3.14159)+sin(x)3)/(x+y)D Log|(Exp(3.14159)+Sin(x)3)/x+y|5、表達(dá)式23+5 Mod 2-4的值為（ ）。A.5B.-3C.0D.46、下列變量名中合法的是（ ）。A 2ABCB A!2C A2DD 27、有如下程序段：Dim str1 as string*5 str1=”Visual Basic”當(dāng)該段程序被執(zhí)行完時(shí)，變量str1的值為（ ）。A“Visual”B“Visua”

27、C“V”D“Visual Basic”8.表示“XYZ”,正確的VB邏輯表達(dá)式是（ ）。A.XY And YZB.XYZC.XY Or YZD.XY And Z9.設(shè)x=4,y=8,z=7，以下表達(dá)式的值是（ ）。xz)OrzxA)1 B)-1 C)True D)False四、數(shù)據(jù)輸入輸出 1.數(shù)據(jù)輸出： （1）Print方法。（2）與Print方法有關(guān)的函數(shù)（Tab，Spc，Space $）。 （3）格式輸出（Format $）。 2.InputBox函數(shù)。 3.MsgBox函數(shù)和MsgBox語(yǔ)句。 1.語(yǔ)句Print 5*20輸出的結(jié)果是（ ）。A.5*20B.出現(xiàn)錯(cuò)誤信息C.5*20D.

28、1002、在窗體單擊事件中執(zhí)行下面語(yǔ)句的正確結(jié)果是（ ）。Print Format(1732.46,“+#,#0.0”)A+1732.5B.1,732.5C.+ 1,732.5D.+1,732.4例 以下語(yǔ)句的輸出結(jié)果是 2005年4月 填空第6題 Print Int（12345.6789*100+0.5）/100 1Tab(n)函數(shù)Print Tab(25);8002Spc(n)函數(shù)Print “CHINA”;Spc(8);”CSAI”該語(yǔ)句首先輸出“CHINA”，然后經(jīng)過(guò)8個(gè)空格，顯示“CSAI”。3Space$ (n) 函數(shù)4Format $函數(shù)例如：使用以下事件過(guò)程測(cè)試數(shù)值的格式化輸出

29、。Print Format$(25634, #)Print Format$(25634, 00000000)Print Format$(256.34, 0000.00)Print Format$(256.34, #.#)Print Format$(12345.67, #,#.#)Print Format$(12345.67, #,#.#)Print Format$(12345.6, #,#0.00)Print Format$(12345.6, $#,#0.00)Print Format$(12345.6, -#,#0.00)Print Format$(0.123, 0.00%)Print Fo

30、rmat$(12345.6, 0.00E+00)Print Format$(0.1234567, 0.00E-00)5InputBox函數(shù) （注意參數(shù)含義及順序） 2010.9（24）如果執(zhí)行一個(gè)語(yǔ)句后彈出如圖所示的窗口，則這個(gè)語(yǔ)句是 A）InputBox(輸入框 , 請(qǐng)輸入VB數(shù)據(jù)) B）x= InputBox(輸入框 , 請(qǐng)輸入VB數(shù)據(jù)) C）InputBox(請(qǐng)輸入VB數(shù)據(jù), 輸入框) D）x=InputBox(請(qǐng)輸入VB數(shù)據(jù), 輸入框) MsgBox函數(shù) MsgBox函數(shù)的一般格式如下：MsgBox（msg，type，title，helpfile，context）2006.4（14）

31、假定有如下的命令按鈕（名稱為Command1）事件過(guò)程：Private Sub Command1_Click()x=InputBox(“輸入：”, ,”輸入整數(shù)”)MsgBox”輸入的數(shù)據(jù)是：”，”輸入數(shù)據(jù)：”+xEnd Sub程序運(yùn)行后，單擊命令按鈕，如果從鍵盤(pán)上輸入數(shù)10，則以下敘述中錯(cuò)誤的是（ ）。Ax的值是數(shù)值10B輸入對(duì)話框的標(biāo)題是“輸入整數(shù)”C信息框的標(biāo)題是“輸入數(shù)據(jù)：10”D信息框中顯示的是“輸入的數(shù)據(jù)是：”2010.9（19）在窗體上畫(huà)一個(gè)名稱為Command1的命令按鈕。單擊命令按鈕時(shí)執(zhí)行如下事件過(guò)程： Private Sub Command1_Click() a$ = so

32、ftware and hardware b$ = Right(a$, 8) c$ = Mid(a$, 1, 8) MsgBox a$, , b$, c$, 1 End Sub 則在彈出的信息框標(biāo)題中顯示的標(biāo)題是 A) software and hardware B）hardware C) software D)1 例 MsgBox函數(shù)的返回類型是（ ）。A字符型B數(shù)值型C日期型D沒(méi)有返回值注意： MsgBox函數(shù)返回值與MsgBox語(yǔ)句的返回值不同，MsgBox函數(shù)返回值為數(shù)值，而MsgBox語(yǔ)句則沒(méi)有返回值。2011.9 (16)在窗體上畫(huà)一個(gè)命令按鈕，然后編寫(xiě)如下事件過(guò)程：（）Privat

33、e Sub Command1_Click() MsgBox Str(123 + 321)End Sub 運(yùn)行程序，單擊命令按鈕，則在信息框中顯示的提示信息是（）（A）字符串“123 + 321” （B）字符串“444”（C）數(shù)值“444”（D）空白六、控制結(jié)構(gòu) 1.選擇結(jié)構(gòu)：（1）單行結(jié)構(gòu)條件語(yǔ)句。 (2)多分支結(jié)構(gòu)。（3）塊結(jié)構(gòu)條件語(yǔ)句。 2011.3（26）設(shè)窗體上有一個(gè)名稱為Text1的文本框和一個(gè)名稱為Command1的命令按鈕，并有以下事件過(guò)程：Private Sub Command1_Click() x! = Val(Text1.Text) Select Case x Case I

34、s = 20 Print 輸入錯(cuò)誤 Case Is 0 Print 20 - x Case Is 10 Print 20 Case Is b) and (cd),10,20)后，x的值是 A) 10 B）20 C)30D)2002.在窗體上畫(huà)一個(gè)命令按鈕和一個(gè)文本框,名稱分別為Command1和Text1,然后編寫(xiě)如下程序:Private Sub Command1_Click() a = InputBox(請(qǐng)輸入日期(131) t = 旅游景點(diǎn): _ & IIf(a 0 And a 10 And a 20 And a = 30, 頤和園, ) Text1.Text = tEnd Sub程序運(yùn)行

35、后,如果從鍵盤(pán)輸入16,則在文本框中顯示的內(nèi)容是:A)旅游景點(diǎn)：長(zhǎng)城故宮B)旅游景點(diǎn)：長(zhǎng)城頤和園C)旅游景點(diǎn)：頤和園D)旅游景點(diǎn)：故宮2.For循環(huán)控制結(jié)構(gòu)。P4 131.設(shè)有如下程序段：x=2Fori=1To10Step2 x=x+iNext運(yùn)行以上程序后，x的值是A) 26B)27C)38D)572011.3（25）下面程序執(zhí)行結(jié)果是Private Sub Command1_Click() a = 10 For k = 1 To 5 Step -1 a = a - k Next k Print a; kEnd SubA)-5 6B)-5 -5C)10 0D)10 13.當(dāng)循環(huán)控制結(jié)構(gòu)。 2

36、.假定有如下事件過(guò)程：Private Sub Form_Click() Dim x As Integer, n As Integer x = 1 n = 0 While x 4 x=x*y y=y+1 Loop Print x A)1 B）4C)8 D)20 5.多重循環(huán)。 2010.9（25）有如下事件過(guò)程： Private Sub Form_Click() Dim n As Integer : x = 0 n = InputBox(請(qǐng)輸入一個(gè)整數(shù)) For i = 1 To n For j = 1 To i x = x + 1 Next j Next i Print xEnd Sub 程序

37、運(yùn)行后，單擊窗體，如果在輸入對(duì)話框中輸入5，則在窗體上顯示的內(nèi)容是 A)13B)14C）15D)16 2011.3（27）設(shè)有如下程序Private Sub Command1_Click() x = 10: y = 0 For i = 1 To 5 Do x = x - 2 y = y + 2 Loop Until y 5 Or x -1 NextEnd Sub運(yùn)行程序，其中Do循環(huán)執(zhí)行的次數(shù)是（）A)15B)10C)7D)32011.3（7）在窗體上畫(huà)一個(gè)名稱為Command1的命令按鈕，然后編寫(xiě)如下程序：Private Sub Command1_Click() Dim m As Integ

38、er, x As Integer Dim flag As Boolean flag = False n = Val(InputBox(請(qǐng)輸入任意1個(gè)正整數(shù)) Do While Not flag a = 2 flag = 【7】 Do While flag And a = Int(Sqr(n) If n / a = n a Then flag = False Else 【8】 End If Loop If Not flag Then n = n + 1 Loop Print 【9】End Sub上述程序的功能是，當(dāng)在鍵盤(pán)輸入任意的1個(gè)正整數(shù)時(shí)，將輸出不小于該整數(shù)的最小素?cái)?shù)。請(qǐng)?zhí)羁胀晟瞥绦颉?01

39、0.9（28）在窗體上畫(huà)一個(gè)命令按鈕，其名稱為Command1，然后編寫(xiě)如下事件過(guò)程： Private Sub Command1_Click() Dim a$, b$, c$, k% a = ABCD:b = 123456 c = : k = 1 Do While k = Len(a) Or k = Len(b) If k = Len(a) Then c = c & Mid(a, k, 1) End If If k = Len(b) Then c = c & Mid(b, k, 1) End If k = k + 1 Loop Print cEnd Sub 運(yùn)行程序，單擊命令按鈕，輸出結(jié)果是

40、A)123456ABCDB) ABCD123456C)D6C5B4A321 D）A1B2C3D456 2010.9（29）請(qǐng)閱讀程序： Private Sub Form_Click() m = 1 For i = 4 To 1 Step -1 Print Str(m); m = m + 1 For j = 1 To i Print *; Next j Print Next iEnd Sub 程序運(yùn)行后，單擊窗體，則輸出結(jié)果是 A）1* B）4* C）D) * 2* 3* 3* 2* 4* 1* * 綜 合 練 習(xí)1.在窗體上畫(huà)一個(gè)命令按鈕，名稱為Command1，然后編寫(xiě)如下事件過(guò)程：Priv

41、ate Sub Command1_Click() Dim i As Integer, x As Integer For i = 1 To 6 If i = 1 Then x = i If i = 4 Then x = x + 1 Else x = x + 2 End If Next i Print xEnd Sub程序運(yùn)行后，單擊命令按鈕，其輸出結(jié)果為A)9B)6C)12D)153.有如下程序： Private Sub Form_Click() Dim Check, Counter Check = True Counter = 0 Do Do While Counter = 0 s = s + a(i) * j i = i - 1 j