计算机二级VB重点知识点解析

1、重 点 知 识 点 解 析考试内容 一、Visual Basic程序开发环境 1. Visual Basic的特点和版本。 2. Visual Basic的启动与退出。 3. 主窗口： （1） 标题和菜单。 （2） 工具栏。 4. 其它窗口： （1）窗体设计器和工程资源管理器。 （2）属性窗口和工具箱窗口。具体要求1VB的概念、运行环境、对象、属性、方法、事件各概念，尤其是方法和事件的区分。2熟悉VB的IDE，VB开发应用程序的一般步骤。3特点：GUI（图形化用户界面）、OLE（对象的连接和嵌入）、OOP（面向对象）；4运行环境：Windows（VB5.0以上在32位操作系统）5方法：对象可以

2、执行的动作或行为；（主动性）6事件：使某个对象进入活动状态的一种操作或动作。（被动性）例 题：2006.4（11）以下关于Visual Basic特点的叙述中，错误的是（ ）。AVisual Basic是采用事件驱动编程机制的语言 BVisual Basic程序既可以编译运行，也可以解释运行 C构成Visual Basic程序的多个过程没有固定的执行顺序 DVisual Basic程序不是结构化程序，不具备结构化程序的三种基本结构 2010.9（11）在Visual Basic集成环境中，要添加一个窗体，可以单击工具栏上的一个按钮，这个按钮是（） 2010.9（12）在Visual Basic

3、集成环境的设计模式下，用鼠标双击窗体上的某个控件打开的窗口是A)工程资源管理器B)属性窗口C)工具箱窗口D）代码窗口 2011.3（11）在Visual Basic集成开发环境中，可以列出工程中所有模块名称的窗口是（）A)工程资源管理器B)窗体设计窗口C)属性窗口D)代码窗口2011.9(12)在设计阶段，当单击Ctrl+R时，所打开的窗口是（）A) 代码窗口B) 工具箱窗口C) 工程资源管理器D）属性窗口二、对象及其操作1.对象： （1）Visual Basic的对象。 （2）对象属性设置。 2.窗体： （1）窗体的结构与属性。 （2）窗体事件。 3.控件： （1）标准控件。 （2）控件的命

4、名和控件值。 4.控件的画法和基本操作。 5.事件驱动。常用标准控件 ：1.文本控件： （1）标签。 （2）文本框。 2.图形控件： （1）图片框、图象框的属性、事件和方法。 （2）图形文件的装入。（3）直线和形状。 3.按钮控件。 4.选择控件：复选框和单选按钮。 5.选择控件：列表框和组合框。6.滚动条。 7.记时器。 8.框架。 9.焦点和Tab顺序。 具体要求熟练应用窗体、控件。对象名命名规则：以字母或汉字开头，后面可以是字母、数字、下划线、汉字。（变量名类似）掌握窗体的常用方法(Hide、Show、Print、Cls、Refresh、Move)、属性和事件(Load、Activate

5、、Click)。Move方法对象.Move左边距离，上边距离，宽度，高度Move方法中的“对象”可以是窗体以及除计时器（Timer）、菜单（Menu）之外的所有控件，如果省略“对象”，则表示要移动的是窗体。 例 把控件移到相应的位置，并能改变其大小的方法是（ ）。AClsBMoveCformatDTab答案：B2011.9（11）以下描述中错误的是（）（A）窗体的标题通过其Caption属性设置（B）窗体的名称（Name属性）可以在运行期间修改（C）窗体的背景图形通过其Picture属性设置（D）窗体最小化时的图标通过其Icon属性设置2011.3（12）假设编写了如下4个窗体事件的事件过程，

6、则运行应用程序并显示窗体后，已经执行的事件过程是（）A)LoadB)ClickC)LostFocusD)KeyPress2011.3（20）窗体Form1上有一个名称为Command1的命令按钮，以下对应窗体单击事件的事件过程是（）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）以下说法中错误的是（）A)如果把一个命令按钮的Default属性设置为True，则按回车键与单击该命令按钮的作用相同B)可以用多个命令按钮组成命令按钮数组 C）命令按钮只能识别单击（Click）事件 D)通过设置命令按钮的Enabled属性，可以是该命令按钮有效或禁用Label(AutoSize、BackStyle、Alignment、WordWrap)2011.3（13）为了使标签具有“透明”的显示效果，需要设置的属性是（）A)CaptionB)AlignmentC)BackStyleD)AutoSiz

8、eTextBox(Alignment、MaxLength、PasswordChar、Multiline、ScrollBars注：Multiline=True) 2010.9（20）在窗体上画一个文本框（名称为Text1）和一个标签（名称为Label1），程序运行后，如果在文本框中输入文本，则标签立即显示相同的内容。以下可以实现上述操作的事件过程是 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）用于一组互斥的选项中。若一个应用程序包含多组互斥条件，可在不同的（ ）中安排适当的单选按钮，即可实现。A. 框架控件（Frame）或图像控件（Image）B. 组合框（ComboBox）或图像控件（Image）C. 组合框（ComboBox）或图片框

10、（PictureBox）D. 框架控件（Frame）或图片框（PictureBox）ListBox(属性：listlistcountlistindexselected、方法：AddItem、RemoveItem、Clear)2011.3（32）设窗体上有一个名为List1的列表框，并编写下面的事件过程：Private Sub List1_Click() Dim ch As String ch = List1.List(List1.ListIndex) List1.RemoveItem List1.ListIndex List1.AddItem chEnd Sub程序运行时，单击一个列表项，则产

11、生的结果是（）A)该列表项被移到列表的最前面）该列表项被删除）该列表项被移到列表的最后面）该列表项被删除后又在原位置插入ComboBox（与listbox类似）2011.3（16）窗体上有一个名称为Cb1的组合框，程序运行后，为了输出选中的列表项，应使用的语句是（）A)Print Cb1.SelectedB)Print Cb1.List(Cb1.ListIndex)C)Print Cb1.Selected.TextD)Print Cb1.List(ListIndex)2010.9（13）下列叙述错误的是 A)列表框与组合框都有List属性B)列表框有Selected属性，而组合框没有C)列表框

12、和组合框都有Style属性D）组合框有Text属性，而列表框没有 HscrollBar、VscrollBar（min、Max、Value、LargeChange、SmallChange、Scroll事件、Chage事件）2011.9 (15)假定一个滚动条的LargeChange属性值为100，则100表示（）（A）单机滚动条箭头和滚动框之间某位置时滚动框位置的变化量（B）滚动框位置的最大值（C）拖动滚动框时滚动框位置的变化量（D）单击滚动条箭头时滚动框位置的变化量2011.3 (15)设窗体上有一个名称为HS1的水平滚动条，如果执行了语句：HS1.Value=（HS1.Max-HS1.Min

13、）/2+HS1.Min则（）A)滚动块处于最左端B)滚动块处于最右端C)滚动块处于中间位置D)滚动块可以处于任何位置，具体位置取决于Max、Min属性的值2010.9（15）滚动条可以响应的事件是A)Load B）Scroll C)ClickD)MouseDown PictureBox(print方法、loadpicture方法)Timer(运行时不可见、只有Timer事件、Interval)方法、属性、事件的掌握。2011.3（31）窗体上有一个名为Command1的命令按钮和一个名为Timer1的计时器，并有下面的事件过程：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运行程序时，单击命令按钮，则产生的结果是（）A）命令按钮每10秒向左移动一次B）命令按钮每10秒向右移动一次C）命令按钮每10毫秒向左移动一次D）命令按钮每10毫秒向右移动一次容器控件：Form、Picture、Frame2011.3（17）为了在窗体上建立2组单选按

15、钮，并且当程序运行时，每组都可以有一个单选按钮被选中，则以下做法正确的是（）A)把这2组单选按钮设置为名称不同的2个控件数组B)把2组单选按钮的Index属性分别相同C)使2组单选按钮的名称分别相同D)使2组单选按钮分别画到2个不同的框架中2010.9（18）在窗体上画一个图片框，再在图片框中画一个命令按钮，位置如图所示。则命令按钮的Top属性值是 A）200 B)300 C)500 D)700特殊控件：菜单的使用（只响应Click事件）1、在使用菜单编辑器创建菜单时，可在菜单名称中某字母前插入（ ）符号，那么在运行程序时按Alt键和该字母键就可打开该命令菜单。A 下划线B &C $D 201

16、0.9（32）有弹出式菜单的结构如下表，程序运行时，单击窗体则弹出如下图所示的菜单。下面的事件过程中能正确实现这一个功能的是 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、果一个直线控件在窗体上呈现为一条垂直线，则可以正确的是（ ）。A)它的Y1、Y2属性的值相等B)它的X1、X2属性的值相等C)它的X1、Y1属性的值分别与X2、Y2属性的值相等D)它的X1、X2属性的值分别与Y1、Y2属性的值相等2010.9（14）设窗体上有一个命令按钮数组，能够区分数组中各个按钮的属性是 A)NameB）IndexC)CaptionD)Left 1、以下有关对象属性的说法中错误的是（ ）。A.所有的对象属性都具有Name（名称）属性B.只能在执行时设置或改变的属性为执行时属性C.对象的某些属性只能在设计时设置，不能使用代码改变。D.Enabled属性值设为False的控件对

18、象在窗体上将不可见。2、窗体上有多个控件，在Form_Activate()事件过程中添加（ ）语句，就可确保每次运行程序时，都将光标定位在文本框Text1上。A.Text1.Text=B. Text1.SetFocusC.Form1.SetFocusD. Text1.Visible=True3、若在一个应用程序窗体上，依次创建了CommandButton、TextBox、Label等控件，则运行该程序显示窗体时，（ ）会首先获得焦点。A. 窗体B. CommandButtonC. LabelD. TextBox4、以下有关对象属性的说法中正确的是（ ）。A 对象所有的属性都罗列在属性窗口列表中

19、B 不同对象不可能有同名属性C 不同对象的同名属性取值一定相同D 对象的某些属性既可在属性窗口中设置，也可通过程序代码设置或改变5、以下所列的7个控件中，具有caption属性的是（ ）个。Picturebox,Frame,OptionButton,ListBox,TextBox,Form,DrivelistBoxA,3b,4c,2d,5三、数据类型及运算 1.数据类型： （1）基本数据类型。 （2）用户定义的数据类型。 2.常量和变量： （1）局部变量和全局变量。 （2）变体类型变量。 （3）缺省声明。 3.常用内部函数。P3 274.运算符和表达式： （1）算术运算符。（2）关系运算符和逻

20、辑运算符。（3）表达式的执行顺序。具体要求1 书写规范：间隔符号、续行符号 _、注释符号2 数据：数据类型、关键字、存储单位、初值。Integer2Long4Single4 数值型 Double8 0 Byte1 Currency8 逻辑型 Boolean2 false数据类型 字符型 String10+- 空串 日期型 Date8 对象型 Object4 变体型 Variant =16 空值 用户自定义型 Type常量：字符常量 逻辑常量日期常量 #月/日/年# 命名规则 局部 Dim/Static 符号常量： Const关键字变量 作用域 窗体/模块 Dim/Private 全局（共有）P

21、ublic 说明语句 Dim a As Single在窗体或标准模块的通用声明处可以用_语句定义变量。A. Dim、RedimB. Dim、StaticC. Dim、Private、PublicD. Dim、Private、Static2010.9 （22）以下关于局部变量的叙述中错误的是 A)在过程中用Dim语句或Static语句声明的变量是局部变量B)局部变量的作用域是它所在的过程C)在过程中用Static语句声明的变量是静态局部变量 D）过程执行完毕后，该过程中用Dim或Static语句声明的变量即被释放。 2011.9 (13)设有如下变量声明语句：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隐式说明的六个符号：%、&、！、#、$Option Explicit 语句功能：强制变量的声明3 运算符与表达式算术 -(负号)*、/Mod+、-& 例如：84*（-2）+1关系逻辑 NotAndOrXor 注意：代数表达式与VB表达式的转换。 例如：ex+y+|x+y| 2+12011.3（19）设a=2，b

23、=3，c=4，d=5，则下面语句的输出是（）Print 32*b or a=c And b c or cdA)FalseB)1C)TrueD)-1VB公共函数算术：Sqr、Log、Exp、Abs、Rnd、Sin、Cos2011.3（14）下面可以产生20-30（含20和30）的随机整数的表达式是（）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转换：Str、Cstr、Val、Chr

24、、Asc、Int、Fix、Cint、Sgn日期：Date、Time、Now、Year、Month、Day、Week、Day2010.9（17）语句Print Sgn(-62) +Abs(-62) +Int(-62)的输出结果是 A) -36B)1 C）-1 D)-72例 题：1、有变量定义语句Dim a,b as integer,变量a的类型和初值是（ ）。A Integer,0B Variant,空值C String,“”D Long,0.02、数学表达式ln(cxy+|arctan(z)|+cos3x对应的Visual Basic算术表达式是（ ）。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、下面表达式的值为真的是（ ）。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、代数表达式对应的Visual Basic表达式是（ ）。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、表达式23+5 Mod 2-4的值为（ ）。A.5B.-3C.0D.46、下列变量名中合法的是（ ）。A 2ABCB A!2C A2DD 27、有如下程序段：Dim str1 as string*5 str1=”Visual Basic”当该段程序被执行完时，变量str1的值为（ ）。A“Visual”B“Visua”

27、C“V”D“Visual Basic”8.表示“XYZ”,正确的VB逻辑表达式是（ ）。A.XY And YZB.XYZC.XY Or YZD.XY And Z9.设x=4,y=8,z=7，以下表达式的值是（ ）。xz)OrzxA)1 B)-1 C)True D)False四、数据输入输出 1.数据输出： （1）Print方法。（2）与Print方法有关的函数（Tab，Spc，Space $）。 （3）格式输出（Format $）。 2.InputBox函数。 3.MsgBox函数和MsgBox语句。 1.语句Print 5*20输出的结果是（ ）。A.5*20B.出现错误信息C.5*20D.

28、1002、在窗体单击事件中执行下面语句的正确结果是（ ）。Print Format(1732.46,“+#,#0.0”)A+1732.5B.1,732.5C.+ 1,732.5D.+1,732.4例 以下语句的输出结果是 2005年4月 填空第6题 Print Int（12345.6789*100+0.5）/100 1Tab(n)函数Print Tab(25);8002Spc(n)函数Print “CHINA”;Spc(8);”CSAI”该语句首先输出“CHINA”，然后经过8个空格，显示“CSAI”。3Space$ (n) 函数4Format $函数例如：使用以下事件过程测试数值的格式化输出

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函数 （注意参数含义及顺序） 2010.9（24）如果执行一个语句后弹出如图所示的窗口，则这个语句是 A）InputBox(输入框 , 请输入VB数据) B）x= InputBox(输入框 , 请输入VB数据) C）InputBox(请输入VB数据, 输入框) D）x=InputBox(请输入VB数据, 输入框) MsgBox函数 MsgBox函数的一般格式如下：MsgBox（msg，type，title，helpfile，context）2006.4（14）

31、假定有如下的命令按钮（名称为Command1）事件过程：Private Sub Command1_Click()x=InputBox(“输入：”, ,”输入整数”)MsgBox”输入的数据是：”，”输入数据：”+xEnd Sub程序运行后，单击命令按钮，如果从键盘上输入数10，则以下叙述中错误的是（ ）。Ax的值是数值10B输入对话框的标题是“输入整数”C信息框的标题是“输入数据：10”D信息框中显示的是“输入的数据是：”2010.9（19）在窗体上画一个名称为Command1的命令按钮。单击命令按钮时执行如下事件过程： 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 则在弹出的信息框标题中显示的标题是 A) software and hardware B）hardware C) software D)1 例 MsgBox函数的返回类型是（ ）。A字符型B数值型C日期型D没有返回值注意： MsgBox函数返回值与MsgBox语句的返回值不同，MsgBox函数返回值为数值，而MsgBox语句则没有返回值。2011.9 (16)在窗体上画一个命令按钮，然后编写如下事件过程：（）Privat

33、e Sub Command1_Click() MsgBox Str(123 + 321)End Sub 运行程序，单击命令按钮，则在信息框中显示的提示信息是（）（A）字符串“123 + 321” （B）字符串“444”（C）数值“444”（D）空白六、控制结构 1.选择结构：（1）单行结构条件语句。 (2)多分支结构。（3）块结构条件语句。 2011.3（26）设窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮，并有以下事件过程：Private Sub Command1_Click() x! = Val(Text1.Text) Select Case x Case I

34、s = 20 Print 输入错误 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.在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序:Private Sub Command1_Click() a = InputBox(请输入日期(131) t = 旅游景点: _ & IIf(a 0 And a 10 And a 20 And a = 30, 颐和园, ) Text1.Text = tEnd Sub程序运行

35、后,如果从键盘输入16,则在文本框中显示的内容是:A)旅游景点：长城故宫B)旅游景点：长城颐和园C)旅游景点：颐和园D)旅游景点：故宫2.For循环控制结构。P4 131.设有如下程序段：x=2Fori=1To10Step2 x=x+iNext运行以上程序后，x的值是A) 26B)27C)38D)572011.3（25）下面程序执行结果是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.当循环控制结构。 2

36、.假定有如下事件过程：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.多重循环。 2010.9（25）有如下事件过程： Private Sub Form_Click() Dim n As Integer : x = 0 n = InputBox(请输入一个整数) For i = 1 To n For j = 1 To i x = x + 1 Next j Next i Print xEnd Sub 程序

37、运行后，单击窗体，如果在输入对话框中输入5，则在窗体上显示的内容是 A)13B)14C）15D)16 2011.3（27）设有如下程序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运行程序，其中Do循环执行的次数是（）A)15B)10C)7D)32011.3（7）在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Private Sub Command1_Click() Dim m As Integ

38、er, x As Integer Dim flag As Boolean flag = False n = Val(InputBox(请输入任意1个正整数) 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上述程序的功能是，当在键盘输入任意的1个正整数时，将输出不小于该整数的最小素数。请填空完善程序。201

39、0.9（28）在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： 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 运行程序，单击命令按钮，输出结果是

40、A)123456ABCDB) ABCD123456C)D6C5B4A321 D）A1B2C3D456 2010.9（29）请阅读程序： 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 程序运行后，单击窗体，则输出结果是 A）1* B）4* C）D) * 2* 3* 3* 2* 4* 1* * 综 合 练 习1.在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：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程序运行后，单击命令按钮，其输出结果为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