【计算机类职业资格】计算机二级(VB)46及答案解析.doc

1、计算机二级(VB)46 及答案解析(总分：100.00，做题时间：120 分钟)一、选择题(每小题 2 分，共 70 分) 下列各(总题数：35，分数：70.00)1.下列说法正确的是（ ）。（分数：2.00）A.1234B.1324C.1342D.31422.下列有关子菜单的说法中，错误的是（ ）。（分数：2.00）A.SELECT 姓名 FROM 学生表 WHERE EXISTS； (SELECT 学号 FROM 成绩表 WHERE 成绩90)B.SELECT 姓名 FROM 学生表 WHERE EXISTS； (SELECT 学号 FROM 成绩表 WHERE 学号=学生表学号 AND

2、成绩90)C.SELECT 姓名 FROM 学生表 WHERE 学号 EXISTS； (SELECT 学号 FROM 成绩表 WHERE 学号=学生表学号AND 成绩90)D.SELECT 姓名 FROM 学生表 WHERE 学号=； (SELECT 学号 FROM 成绩表 WHERE 成绩90)3.下面的控件可作为其他控件容器的是（ ）。（分数：2.00）A.PictureBox 和 DataB.Frame 和 ImageC.PictureBox 和 FrameD.Image 和 Data4.下列各种形式的循环中，输出“*“的个数最少的循环是（ ）。（分数：2.00）A.查询在 H1 或者

3、H2 仓库中的职工信息B.查询仓库号 H1 或者 H2 的仓库信息C.查询即在仓库号 H1，又在仓库号 H2 工作的职工信息D.语句错误，不能执行5.在窗体上有 1 个名称为 CommonDialog1 的通用对话框和 1 个名称为 Command1 的命令按钮,以及其他一些控件。要求在程序运行时,单击 Command1 按钮,则显示打开文件对话框,并在选择或输入个文件名后,就可以打开该文件。以下是 Command1_Click 事件过程的两种算法 算法 1： Private Sub Command1_Click() CommonDialog1.Show Open Open CommonDia

4、log1.File Name For Input As#1 End Sub 算法 2： Private Sub Command1_Click() CommonDialog1.Show Open If CommonDialog1.File Name“ “Then Open CommonDialog1.File Name For Input As#1 EndIf End Sub 下面关于这两种算法的叙述中正确的是【 】 （分数：2.00）A.显示打开文件对话框后若未选择或输入任何文件名,则算法 2 会出错,算法 1 不会B.显示打开文件对话框后若未选择或输入任何文件名,则算法 1 会出错,算法 2

5、 不会C.两种算法的执行结果完全一样D.算法 1 允许输入的文件名中含有空格,而算法 2 不允许6.数据库 DB、数据库系统 DBS、数据库管理系统 DBMS 之间的关系是_。 （分数：2.00）A.DB 包含 DBS 和 DBMSB.DBMS 包含 DB 和 DBSC.DBS 包含 DB 和 DBMSD.没有任何关系7.下面程序段的运行结果是（ ）。 a=1 b=1 Do a=a+1 b=b + 1 Loop Until b5 Print“k=“；a；Spc(4)；“b=“；b+a （分数：2.00）A.k=7 b=14B.k=6 b=6C.k=4 b=8D.k=6 b=128.下列说法正确

6、的是（ ）。（分数：2.00）A.ClickB.DbClickC.RightClickD.以上 3 项都是9. 以下语句的输出结果是( )。 a = Sqr(26) Print Formats (a，“#“) （分数：2.00）A.5.099B.5.099C.5099D.000509910.单击命令按钮时，下列程序的执行结果为（ ）。 Private Sub Command1_Click() Dim x As Integer，y As Integer x=12：y=32 Call Proc(x，y) Print x；y End Sub Public Sub Proc(n As Integer，

7、ByVal m As Integer) n=n Mod 10 m=m Mod 10 End Sub （分数：2.00）A.1 5 9B.7 5 3C.3 5 7D.5 9 111.下列程序段的执行结果为( )。 m=1 n=1 Select Case m Case 1 Select Case n Case 0 Print “* * 0 * *“ Case 1 Print “ * * 1 * * “ End Select Case 2 print “ * * 2 * * “ End Select （分数：2.00）A.159B.753C.357D.59112.下列程序段执行结果为( )。 m=5

8、 n=-6 If Not X0 Then m=n-3 Else n=m+3 Print m-n;n-m （分数：2.00）A.1，6，3，1，3B.1，6，3，6，3C.1，6，3，2，3D.1，7，3，2，313.在窗体上画一个名称为 List1 的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为（ ）。 （分数：2.00）A.For i=0 To List1.ListCount-1 NextB.For i=0 To ListCount-1 NextC.For i=1 To List1.listCount NextD.For i=1 To ListCount Next14.下

9、面语句正确的是（ ）。（分数：2.00）A.10，00936B.10，009360C.10，0093D.010，00936015.执行下列程序段后，输出的结果是（ ）。 For k1=0 To 4 y=20 For k2=0 To 3 y=10 For k3=0 To 2 y=y+10 Next k3 Next k2 Next k1 Print y （分数：2.00）A.90B.60C.40D.1016.设有如下通用过程： Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer strL=L

10、en(xStr) Do While i“ “Then Open CommonDialog1.File Name For Input As#1 EndIf End Sub 下面关于这两种算法的叙述中正确的是【 】 （分数：2.00）A.显示打开文件对话框后若未选择或输入任何文件名,则算法 2 会出错,算法 1 不会B.显示打开文件对话框后若未选择或输入任何文件名,则算法 1 会出错,算法 2 不会 C.两种算法的执行结果完全一样D.算法 1 允许输入的文件名中含有空格,而算法 2 不允许解析：在文件对话框的操作中,如果选择了某个文件并单击确定,则文件对话框的 FileName 的值是完整的文件名

11、称,包括路径；而如果没有选择任何文件或输人任何文件名,则文件对话框的 FileName 的值是空值,这时如果用 Open 语句进行操作会出错。6.数据库 DB、数据库系统 DBS、数据库管理系统 DBMS 之间的关系是_。 （分数：2.00）A.DB 包含 DBS 和 DBMSB.DBMS 包含 DB 和 DBSC.DBS 包含 DB 和 DBMS D.没有任何关系解析：数据库系统由如下几部分组成：数据库、数据库管理系统、数据库管理员、系统平台（硬件平台和 软件平台）。7.下面程序段的运行结果是（ ）。 a=1 b=1 Do a=a+1 b=b + 1 Loop Until b5 Print“

12、k=“；a；Spc(4)；“b=“；b+a （分数：2.00）A.k=7 b=14B.k=6 b=6C.k=4 b=8D.k=6 b=12 解析：本题中的 Do-Loop Until 循环为直到型循环结构，直到条件 b5 为止，此时 a=6，b=6，所以最后输出的结果是 k=6 b=12。所以正确答案是选项 D)。8.下列说法正确的是（ ）。（分数：2.00）A.ClickB.DbClickC.RightClickD.以上 3 项都是 解析：Chang 事件是当文本框的内容被改变时将触发该事件。文本框的 Text 属性是字符串类型，可将一个字符串常量或字符串变量直接赋给 Text 属性。如果

13、Text 属性值是由一个数字组成的字符串，要使它参与算术运算，应该用 Val 函数先将它转换成数值型数据。9. 以下语句的输出结果是( )。 a = Sqr(26) Print Formats (a，“#“) （分数：2.00）A.5.099 B.5.099C.5099D.0005099解析：用 Format()函数可以将数值按“格式字符串”指定的格式输出，包括在输出字符串前面加，字符串后面补 0 及千位分隔符等。“格式字符串”是一个常量或变量，它由专门的格式说明符组成，由这些字符决定数据项的显示格式，并指定显示区域的长度，当格式字符串为常量时，必须放在双引号中，格式说明符及作用见下表： 10

14、.单击命令按钮时，下列程序的执行结果为（ ）。 Private Sub Command1_Click() Dim x As Integer，y As Integer x=12：y=32 Call Proc(x，y) Print x；y End Sub Public Sub Proc(n As Integer，ByVal m As Integer) n=n Mod 10 m=m Mod 10 End Sub （分数：2.00）A.1 5 9 B.7 5 3C.3 5 7D.5 9 1解析：本题中可以看到 x=Int(Rnd()+3)语句，其中 Rnd 用来产生随机数，其值在 01 之间，而在(R

15、nd()+3)前面有 Int 进行强制转换 ，所以 x 为 3，执行 Print“pass“语句。11.下列程序段的执行结果为( )。 m=1 n=1 Select Case m Case 1 Select Case n Case 0 Print “* * 0 * *“ Case 1 Print “ * * 1 * * “ End Select Case 2 print “ * * 2 * * “ End Select （分数：2.00）A.159B.753 C.357D.591解析：首先，当 i=0 时，数组中的位置是 a00=1，当然，如果用排除法的话，就不用考虑后面的循环了，因为在 4

16、个选项中，第 1 个数为 1 的选项只有 A)。本题执行第 2 次循环时，i 的值为 1，则 cout 函数中的数组指向为 a11=5，依次循环，可求出答案。12.下列程序段执行结果为( )。 m=5 n=-6 If Not X0 Then m=n-3 Else n=m+3 Print m-n;n-m （分数：2.00）A.1，6，3，1，3B.1，6，3，6，3C.1，6，3，2，3 D.1，7，3，2，3解析：左移 1 位，相当于乘以 2，题中的 x 的值是一个八进制数，转换为十进制数是 32，再乘以 2，x 的值为 64。13.在窗体上画一个名称为 List1 的列表框，为了对列表框中的

17、每个项目都能进行处理，应使用的循环语句为（ ）。 （分数：2.00）A.For i=0 To List1.ListCount-1 Next B.For i=0 To ListCount-1 NextC.For i=1 To List1.listCount NextD.For i=1 To ListCount Next解析：14.下面语句正确的是（ ）。（分数：2.00）A.10，00936B.10，009360C.10，0093D.010，009360 解析：该字符串中包含的字符是/t(跳格符)、/“ (双引号)、/065 (ASCII 值为八进制 065，也即十进制为 51 的字符)、/xf

18、f(ASCII 值为十六进制 ff，也即十进制为 255 的字符)、/n(换行符)。15.执行下列程序段后，输出的结果是（ ）。 For k1=0 To 4 y=20 For k2=0 To 3 y=10 For k3=0 To 2 y=y+10 Next k3 Next k2 Next k1 Print y （分数：2.00）A.90B.60C.40 D.10解析：这是一个三重循环嵌套的程序。多重 For 循环的执行过程是：外层循环的循环控制变量每取一个值，内循环的循环控制变量要取遍所有的值。这个程序中最外两层循环的最后一次循环执行时 k1=4，k2=3，都要再执行一次 y=10，不管 y

19、以前取得何值，y 都要重新取得初值 10，这时再执行一次内循环。内层循环体要执行 3 次，即加 3 次 10。y 最终的值是 40。16.设有如下通用过程： Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer strL=Len(xStr) Do While i=strL2 tStr=tStr&Mid(xStr,i,1)&Mid(xStr,strL-i+1,1) i=i+1 Loop 在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮。然后编写如下的事件过

20、程： Private Sub Command1_Click() Dim S1 As String Textl.Text=UCase(Fun(S1) 程序运行后,单击命令按钮,则 Textl 中显示的是【 】 （分数：2.00）A.ABCDEFB.abcdefC.AFBECD D.DEFABC解析：Function 过程也叫函数过程,一般用于调用后不仅要执行一组代码完成相应操作,还需返回一个有用值的情况。Function 函数的参数有两种传递方式：按值传递(Byval)和按址传递(Byref),默认为按址传递。调用 Function 函数常放在在赋值符右端。D0 While 为当型循环,在本题程

21、序中它的作用是：依次从字符串变量 xstrr 的首尾分别向字符串中间取出一个字符,然后组成一个新字符串。循环过程为： 当 i=1时,tstr=“af“； 当 i=2 时,tstr=“afbe“； 当 i=3 时,=tstr=“afbecd“； 转换为大写后,在文本框中显示为“AFBECD“ 17.在 PasswordChar 属性中设置#，但运行时仍显示文本内容，原因是（ ）。（分数：2.00）A.doublex5=20，40，60，80，100；B.inty5=0，1，3，5，7，9； C.charcl=1，2，3，4，5；D.charc2：/x1O，/xa，/x8；解析：控件是窗体上用于显

22、示数据、执行操作、装饰窗体的对象，其类型可以 分为：结合型、非结合型、计算型，但注意没有非计算型。18.Sub 过程与 Function 过程最根本的区别是（ ）。（分数：2.00）A.Sub 过程的过程不能返回值，而 Function 过程能返回值 B.Function 过程可以有形参，Sub 过程不可以C.Sub 过程可以使用 Call 语句直接使用过程名调用，而 Function 过程不可以D.两种过程参数的传递方式不同解析：在 Visual Basic”中有两类过程，一类是系统提供的内部函数和事件过程； 另一类是用户根据自已的需要定义的，供事件过程的多次调用。在第二类过程中，涉及最多的

23、是子过程 它们的共同点都是完成某种特定功能的一组程序代码；不同的是函数 是可以直接返回值的特殊过程，所以函数过程定义时有返回值的类型说明。两者最大区别就是 Sub 过程的过程不能直接返回值，而 Function 过程能直接返回值。19.下列说法正确的是（ ）。（分数：2.00）A.删除查询B.更新查询C.参数查询 D.生成表查询解析：Click 是鼠标单击事件，DbClick 是鼠标双击事件，RishtClick 是鼠标右击事件。20.设在名称为 My form 的窗体上只有 1 个名称为 C1 的命令按钮,下面叙述中正确的是【 】（分数：2.00）A.窗体的 Click 事件过程的过程名是

24、My form ClickB.命令按钮的 Click 事件过程的过程名是 C1-Click C.命令按钮的 Click 事件过程的过程名是 Command1_ClickD.上述 3 种过程名称都是错误的解析：对于窗体的 Click 事件过程名应该是 Form Click(),不管工程中有几个窗体,其过程名是不变的,而对于窗体上的控件为了区分同类型的不同控件的事件过程,事件过程名应该是控件名一事件过程名,对于本题的命令按钮 C1 的 Click 事件过程名应谚是 C1_C1ick。21.下列各选项说法错误的一项是（ ）。（分数：2.00）A.文件对话框可分为两种，即打开(Open)文件对话框和保

25、存(Save As)文件对话框B.通用对话框的 Name 属性的默认值为 CommonDialogX，此外，每种对话框都有自己的默认标题C.打开文件对话框可以让用户指定一个文件，由程序使用；而用保存文件对话框可以指定一个文件，并以这个文件名保存当前文件D.DefaultEXT 属性和 DialogTitle 属性都是打开对话框的属性，但非保存对话框的属性 解析：文件对话框分为两种：即打开对话框和保存对话框，所以选项 A)正确；通用对话框的 Name 属性的默认值为 CommonDialogX ，此外，每种对话框都有自己的默认标题，所以选项 B)正确；打开文件对话框可以让用户指定一个文件，由程序

26、使用，而用保存文件对话框可 以指定一个文件，并以这个文件名保存当前文件，所以选项 C)正确；除 DefaultEXT、DialogTide 属性是打开和保存对话框共有的，还有 FileName、FileTitle、Filter、FilterIndex、Flags、InitDir、MaxFileSize、CancelError、HelpCommand、HelPContext 和 HelpFile 属性， 都是它们共有的，所以选项 D)不正确。22.下列叙述中正确的是_。 （分数：2.00）A.一个逻辑数据结构只能有一种存储结构B.数据的逻辑结构属于线性结构，存储结构属于非线性结构C.一个逻辑数据

27、结构可以有多种存储结构，且各种存储结构不影响数据处理的效率D.一个逻辑数据结构可以有多种存储结构，且各种存储结构影响数据处理的效率 解析：一般来说，一种数据的逻辑结构根据需要可以表示成多种存储结构，常用的存储结构有顺序、链接、索引等存储结构。而采用不同的存储结构，其数据处理的效率是不同的。23.以下叙述中错误的是【 】（分数：2.00）A.语句“Dim a,b As Integer“声明了两个整型变量 B.不能在标准模块中定义 Static 型变量C.窗体层变量必须先声明,后使用D.在事件过程或通用过程内定义的变量是局部变量解析：在 Visual Basic 中,定义变量的关键字有 Dim、蹦

28、 vate、Statie、ReDim、Public 或 Global,它们在使用上是不同的：Dim 用于标准模块、窗体模块或过程中定义变量或数组；Static 用于在过程中定义静态变量或数组；Public 或 Global 语句用于在标准模块中定义全局变量或数组；ReDim 主要用于重定义数组。窗体层变量要先定义后使用；语句“Dim a,b AsInteger“是错误的,其结果是：b 被声明为 Integer 类型,而 a 为缺省的 Variant 类型。24.当双击窗体 Form1 时，要将窗体 Form1 隐藏起来、将窗体 Form2 以模式方式显示出来的事件过程，正确的是( )。 （分数

29、：2.00）A.Private Sub Form _ Db1Click( ) FormlHide Form2Show 0 End SubB.Private Sub Form _ Db1Click( ) FormHide Form 2Show 1 End Sub C.Private Sub Form _ Click( ) Form lHide Form 2Show End SubD.Private Sub Form _ Dbl Click( ) Form lEnabled=False Form 2Enabled=True End Sub解析：语句 Form2，Show 0 是将 Form2以非模

30、态方式显示，所以选项 A) 错误；语句 Form 2Show 1中的参数 1 表示将 Form 2 以模态方式显示，所以选项 B) 正确；选项 C) 错误，该事件过程是窗体的单击事件，而题目要求的是窗体的双击事件；窗体 Enabled 属性的作用是设置窗体是否被激活，不是设置窗体是否可见，所以选项 D) 错误。25.关于自定义对话框概念的说明，错误的是（ ）。（分数：2.00）A.建立自定义对话框时必须执行添加窗体的操作B.自定义对话框实际上是 VB 的窗体C.在窗体上还要使用其他控件才能组成自定义对话框D.自定义对话框不一定要有与之对应的事件过程 解析：自定义对话框是在窗体控件上设置一些为应

31、用程序接收数据、输出信息的控件制作成的。所以自定义对话框实际上是 Visual Basic 的窗体，建立自定义对话框的第一步便是在工程中添加窗体。自定义对话框通常有命令按钮，一个命令按钮要对应一个事件过程，所以自定义对话框一定要有事件过程与之对应。26.资源文件的扩展名是（ ）。（分数：2.00）A.将在文本框 Text1 输入的数字变为数值B.将在文本框 Text1 输入的数字作为半径，求圆的周长并转换为字符串C.只要 Text1 中的内容一改变，Text2 中显示的圆周长也随之改变 D.事件过程中的 Val 函数和 Str 函数使用错误，事件过程不能执行解析：在此题中考查了函数的定义，及其

32、有关操作，对于奇数的判断是用取模来判断的，奇数不能被 2 争取，或者说奇数除以 2 后的余数是 1，而偶数能被 2 整数，即偶数除以 2 后的余数是 0，因此判断语句应为 If a Mod 2=0 Then CT=0 Else CT=1；即当 a 为偶数时返回值是 0，a 为奇数时返回值是 1，符合题意。27.阅读下面的程序段： For a=1 To 2 For b=1 To a For C=b To 2 I=I + 1 Next Next Next Print I 执行上面的三重循环后，I 的值为（ ）。 （分数：2.00）A.15B.16 C.17D.18解析：常用的格式是：javac选项

33、源文件名。常用的选项是-CLASSPATH：定义 javac 搜索类的路径。它将覆盖默认的 CLASS- PATH 环境变量的设置。运行该命令后将从源文件产生class 文件，保存在当前目录下，也可以用参数选项 d 放在哪个具体的目录下。28.在窗体上画一个名称为 Label1 的标签，然后编写如下事件过程： Private Sub Form_Click() Dim arr(10, 10) As Integer Dim i As Integer, j As Integer For i = 2 To 4 For j = 2 To 4 arr(i, j) = i * j Next j Next i

34、 Label1.Caption = Str(arr(2, 2) + arr(3, 3) End Sub 程序运行后，单击窗体，在标签中显示的内容是_。 （分数：2.00）A.12B.13 C.14D.15解析：本题中 For 循环语句就是对数组赋值，而 arr(i, j) = i * j。故 arr(2, 2)=2*2=4，arr(3, 3)=3*3=9，两者 相加为 13。29.如果在程序中要将 c 定义为静态变量，且为整型数，则应使用的语句是（ ）。（分数：2.00）A.视图结构可以使用 MODIFY STRUCTURE 命令来修改B.视图不能同数据库表进行联接操作C.视图不能进行更新操作

35、D.视图是从一个或多个数据库表中导出的虚拟表 解析：视图是根据表定义的，要依赖数据表而存在，但视图可以同数据表进行联接操作，而且可以用来更新数据。由于视图并不是独立 存在的基本表，它是由基本表派生出来的，因此不能利用 MODIFY STRUCTURE 命令修改表结构。30.设有如下过程： Sub ff(x，y，z，) x=y+z End Sub 以下所有参数的虚实结合都是传址方式的调用语句是（ ）。 （分数：2.00）A.Call ff(5，7，z)B.Call ff(x，y，z) C.Call ff(3+x，5+y，z)D.Call ff(x+y，x-y，z)解析：题目中 Sub 过程的形式

36、参数都没有特别指明是传址方式还是传值方式，隐含的是传址。实际调用时，还要根据实参的形式，才能确定是传值还是传址的数据传送方式。若实参为常量或表达式，则为传值的传递方式；若实参是变量名或数组名，则为传值的传递方式。31.下列关于退出 Visual Basic 系统的方法的描述错误的是（ ）。（分数：2.00）A.-128+127B.-32768 +32767 C.-2147483648 +2417483647D.-3.40282347E38 +3.40282347E38解析：主方法的格式为 public static viod mian(String args ) ，返回值 为 void。32.

37、一个工程必须包含的文件的类型是（ ）。（分数：2.00）A.*vbp*frm *frx B.*vbp*cls *basC.*bas*ocx *resD.*frm *cls*bas解析：一个工程中可以包含 7 类文件，其中，工程文件、窗体文件和窗体的二进制数据文件是一个工程不可缺少的文件，这 7 类文 件的扩展名及含义分别是： vbp 是 Visual Basic Project 的缩写，表示工程文件。 frm 是 Form 的缩写，表示窗体文件。 frx 笔试窗体的二进制数据文件。 cls 是 class的缩写，表示类模块文件。 bas 是 Basic 的缩写，表示标准模块文件。 ocx 表示

38、 ActiveX 控件的文件。 res 是 resource 的缩写，表示资源文件。33.设已经在“菜单编辑器”中设计了窗体的快捷菜单，其顶级菜单为 Bs，取消其“可见”属性，运行时，在以下事件过程中，可以使快捷菜单响应鼠标右键菜单的是（ ）。 （分数：2.00）A.Private Sub Form_Mouse Down(Button As Integer，Shift As Integer，- X As Single，Y As Single) If Button=2 Then PopupMenu Bs，2 End Sub B.Private Sub Form_MouseDown(Button

39、As Integer，Shift As Integer，- X As Single，Y As Single) PopupMenu Bs End SubC.Private Sub FOrm_MouseDown(Button As Integer，Shift As Integer，- X As Single，Y As Single) PopupMenu Bs，0 End SubD.Private Sub Form_MouseDown(Button As Integer，Shin As Integer，- X As Single，Y As Single) If(Button=vbLeftButton

40、)Or(Button=vbRightButton)Then PopupMenu Bs End Sub解析：在 Visual Basic 中，允许出现快捷菜单，对用户来说，提供了很大的方便，一般来说，菜单都在窗口的顶部，有时，用户需要执行菜单中的某一命令，就得把鼠标移动到窗口顶部，然后打开菜单选择命令，这对用户来说，会觉得麻烦。而快捷菜单并不需要到窗口的顶部来打开，只要单击鼠标右键，就会弹出菜单。设计快捷菜单仍然可以用 Visual Basic 中提供的菜单编辑器，只要把某个菜单设置成隐藏就可以了，实际上，不管是在窗口顶部菜单条上显示的菜单还是隐藏的菜单，都可以用 PopupMenu 方法把它们

41、作为快捷菜单在运行时显示出来。PopupMenu 方法的使用形式如下： 对象PopupMenu 菜单名，标志，x，y 其中，x，y 是提供菜单显示的位置；标志：指定快捷菜单的行为。 34.下列说法错误的是（ ）。（分数：2.00）A.Caption 不是只读属性，运行时对象的名称可以通过代码改变B.设置 Height 或 Width 的数值单位为 twip，1twip=1/10point C.Icon 属性用来设置窗体最小化时的图标D.用来激活属性窗口的快捷键是 F4 键解析：Caption 不是只读属性，在设计阶段可以在属性窗口中改变，也可以用代码在运行时改变，不同的运行状态可以有不同的 C

42、aption 属性值，所以选项 A)是正确的；Height 和 Width 的默认的单位是twip，1twip 等于 1/1440 英寸，是 1 点的 1/20，故选项 B)是不正确的；Icon 属性是用来设置窗体最小化图标的，所以选项 C)的表述是正确的；用来激活属性窗口的快捷键是 F4 键，所以选项 D)也是正确的。35.下列程序的功能是调用字体对话框来设置文本框字体，单击按钮弹出对话框后，按 Cancel 键退出对话框，则（ ）。 Private Sub Command1_Click( ) CommonDialoglCancelError=True CommonDialoglFlags=

43、cdlCFEffects Or cdlDFBotb CommonDialoglAction=4 CommonDialoglShowFont Text1.Font.Name=CommonDialoglFontName Text1FontSize=CommonDialoglFontSize Text1FontBold=CommonDialog1FontBold Text1FontItalic=CommonDialog1FontItalic Text1FontUnderline=CommonDialog1FontUnderline Text1FontStrikethru=CommonDialog1F

44、ontStrikethru Text1ForeColor=CommonDialog1Color End Sub （分数：2.00）A.Text1 的字体不发生变化B.Text1 的字体发生变化C.Text1 的字体和颜色发生变化D.程序出错! 解析：对话框的 Cancel Error 属性的作用是指示当选取“取消”按钮时是否出错，本题目中该属性为True，因此按 Cncel 键后将导致程序出错，一般应该在程序中添加对错误的处理。二、填空题（每空 2 分，共 30 分）(总题数：15，分数：30.00)36.为了选择多个控件，可以按住 1 键，然后单击每个控件。（分数：2.00）填空项 1:_

45、（正确答案：Shift 或 Ctrl）解析：有时候，可能需要对多个控件进行选择，例如移动多个控件、删除多个控 件等。选择多个控件有两种方法，一种是，按住 Shift 键或 Ctrl 键，不要松开，然后单击每 个要选择的控件；另一种是，把鼠标光标移动到窗体中适当得位置，然后拖动鼠标画出一 个虚线矩形，在该矩形内的控件即被选择。37.在 Visual Basic 的立即窗口内输入以下语句 X=97 ? Chr (X) 在窗门中显示的结果是 1。 （分数：2.00）填空项 1:_ （正确答案：a）解析：Chr-|_|-是求 ASCII 字符的函数，格式是 Chr(表达式)，其中“表达式” 应该是合法

46、的 ASCII 码值，Chr-|_|-函数把“表达式”的值转换为相应的 ASCII 字符。本题 中 X=97 对应的 ASCII 码是字符 a，所以显示的结果应该是 a。38.在窗体上有一个命令按钮，然后编如下事件过程： Function SR( x As Double)As Double Select Case Sgn(x) Case 1 SR=Sqr(x) Exit Function Case 0 SR=0 Case-1 SR=-1 End Select End Function Private Sub Command1 _ Click1 Dim Msg，SRN Dim N AS Doub

47、le N=InputBox(“请输入要计算平方根的数“) Msg=N&“的平方根“ Select Case SR(N) Case 0 Msg=Msg &“是 0“ Case-1 Msg=Msg&“是一个虚数“ Case ElSe Msg=Msg &“是“& SR(N) End Select MsgBox Msg End Sub 程序运行后，单击命令按钮，在输入对话框内输入1，输出结果是 2。 （分数：2.00）填空项 1:_ （正确答案：-1 的平方根是一个虚数）解析：在 Sub 过程中，定义了一个 Double 型变量 N，并调用 InputBox 函数，给 N 赋值，即将从对话框中输入的 -1 赋给 N；通过运算符“&”，将 N 与字符串“的平方根”连接起来并赋给 Msg；在条件块语句中将 N 作为参数，调用 SR 事件过程，将 Function 过程的返回值作为测试表达式；在 SR 函数中，调用Sgn 函数测试 x 的值为正数还是负数，如果是正数，那么就执行条件块语句中的 SR=Sqr(x)，即将 x 的平方根作为返回值，如果 x 值为零，Sp 函数返回值为零，那么就将 0 作为返回值；如果为负数，Sgn 函数返回值为- 1，SR=-1，即将-1 作为返回值；在 Sub 程序的条件块语句中，根据 SR 返回值的不同，执行不同操作，当返回值为 0，将