北京林业大学《监控系统程序设计》选择题及答案

选 择 题 Part 1 1、VisualBasic是一种面向__D___的程序设计语言。 A、过程 B、用户 C、工程 D、对象 2、VisualBasic是用于开发__B___环境下的应用程序的工具。 A、UNIX B、Windows C、DOS D、DOS和Windows 3、在VB集成环境创建VB应用程序时，除了工具箱窗口、窗体中的窗口、属性窗口外，必不可少的窗口是______B______。 A、立即窗口 B、代码窗口 C、窗体布局窗口 D、监视窗口 4、如果单击一个当前没有被选中的复选框，其他已被选中的复选框会处于__B___状态。 A、不显示 B、选中 C、禁止 D、不选中 5、要使某控件在运行时不可显示，应对___B__属性进行设置。 A、BackColor B、Visible C、Caption D、Enabled 6、窗体Form1的名称属性是frm，它的Load事件过程名是__D___。 A、frm_Load B、Me_CmdOK C、Form-Load D、Form_Load 7、使用__B___方法，可取得列表框中的项数。 A、RemoveItem B、ListCount C、AddItem D、Clear 8、对于一个含有计时器控件的窗体，每经过一段由___A__属性指定的时间间隔，就会产生一个Timer事件。 A、Interval B、Enabled C、Name D、Caption 9、下列不正确的变量名是___A_____。 A、Arry@ B、Text C、Command D、Form 10、以下各项中，______B______不是一个合法的字符串。 A、"等级考试" B、#Basic# C、"" D、"Visual" 11、下列没有类型说明符的变量是____B_____。 A、货币型 B、日期型 C、字符串型 D、长整型 12、工程文件的扩展名是（B）。 A、vbg B、vbp C、vbw D、vbl 13、在以下窗体中没有采用的控件是（B）。

A、文本框 B、垂直滚动条 C、框架 D、命令按钮 14、滚动条控件（如图所示）的Largechange属性所设置的是（A） A、单击滚动条和滚动箭头之间的区域时，滚动条控件Value属性值的改变量 B、滚动条中滚动块的最大移动位置 C、滚动条中滚动块的最大移动范围 D、滚动条控件无该属性 15、要在垂直位置上移动控件，应利用控件的（C）属性。 A、Left B、Width C、Top D、Height 16、在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是（A） A、Private Sub Text1_Change() Command1.Caption = "计算机等级考试" End Sub B、Private Sub Command1_Click() Caption = "计算机等级考试" End Sub C、Private Sub Form_Click() Text1.Caption = "计算机等级考试" End Sub D、Private Sub Command1_Click() Text1.Text = "计算机等级考试" End Sub 17、如果将布尔常量False赋值给一个整形变量，则整型变量的值为_______A_____。 A、0 B、-1 C、False D、True 18、以下语句的输出结果是____C________。 print Format(3678.234,"000，000，000") A、003,678.23 B、000,003.678 C、000,003,678 D、003,678,234

19、要改变控件的宽度，应修改该控件的（ B ）属性。 A、TOP B、width C、Left D、Height 20、用于从字符串左边截取字符的函数是（ C ）

Ａ、Ltrim( ) Ｂ、Trim( ) Ｃ、Left( ) Ｄ、Instr( ) 21、在文本框Text1中输入数字12，Text2中输入数字34，执行以下语句，只有__C___。可使文本框Text3中显示46。 A、Text3. Text=Val(Text1. Text) & Val(Text2.Text) B、Text3. Text=Text1. Text & Text2. Text C、Text3. Text=Val(Text1. Text)+Val(Text2.Text) D、Text3. Text=Text1. Text+Text2.Text 22、在窗体（Name属性为Fomal）上画两个文本框（Name属性分别为Fext1和Text2）和一个命令按钮（Name属性为Command1），程序如下。执行后结果为__C___。 Private Sub Command1_Click() a=Text1.Text+Text2.Text Print a End Sub Private Sub Form_load() Text1.Text="123" Text2.Text="321" End Sub A、132231 B、444 C、123321 D、321123

23、将命令按钮Command1设置为不可见，应修改该命令按钮的（A）属性。 A、Visible B、Value C、Caption D、Enabled 24、在一行内写多条语句时，每个语句之间用（ B ）符号分隔。 A、, B、： C、. D、；

25、可获得当前系统日期的函数是（A） Ａ、Date( ) Ｂ、Time( ) Ｃ、IsDate( ) Ｄ、Year( ) 26、单机滚动条两端的任何一个滚动箭头，将触发该滚动条的（C）事件。 A、Scroll B、KeyDown C、change D、Dragver 27、退出For循环可使用的语句为（ A ）

Ａ、Exit For Ｂ、Exit Do Ｃ、End For Ｄ、End Do 28、在窗体Form1上，有一个图片控件Picture1和命令按钮控件Command1，在窗体的Command1_Click事件中有如下代码： Private Sub Command1_Click( ) Dim x As Integer Dim s1 As String,s2 As String s1="ABCDE" For x=1 To Len(s1) s2=Lcase(Mid(s1,x,1)) & x Picture1.Print s2 Next x End Sub 运行此程序后在窗体的第4行为__C___。 A、d2 B、b4 C、d4 D、b2 29、下面（A）是合法的变量名。 A、X_YZ B、123ABC C、INTEGER D、X-Y

30、窗体的标题栏显示内容由窗体对象的（D）属性决定。

Ａ、BackColor Ｂ、BackStyle Ｃ、Text Ｄ、Caption 31、程序运行时，若要通过回车键调用某命令按钮的Click事件过程，则可设置该命令按钮的（C）属性值为True来实现。 Ａ、Value Ｂ、Enabled Ｃ、Default Ｄ、Cancel 32、当发生Command1_Clik事件后，下列程序的输出结果是_____C_______。 Dim i As Integer Dim a(10) As Integer For i=9 To 0 Step -1 a(i)=10+I Next I Print a(2);a(5);a(8) A、7 4 1 B、8 5 2 C、12 15 18 D、3 6 9 33、下面（B）是合法的字符常量。 A、 ABC$ B、“ABC” C、 ‘ABC’ D、 ABC 34、某过程的说明语句中，正确的数组说明语句是_____B_______。Const N as integer=4 Dim L as integer ①.Dim X (L) As Integer ②.Dim A(K) As Integer Const K As Integer=3 ③.Dim B(N) As Integer ④.Dim Y(2000 To 2008) As Integer A、②③ B、③④ C、①②④ D、①③④ 35、表达式16/4 - 2^5*8 MOD 5\2的值为（B）。 A、14 B、4 C、20 D、2 36、在参数传递过程中，使用关键字______D__________来修饰参数，可以使之按值传递。 A、Value B、ByRef C、Reference D、ByVal 37、Sub过程和Function过程最根本的区别是________A________。 A、Sub过程的过程名不能返回值，而Function过程能通过过程名返回值 B、Function过程可以有参数，Sub过程不可以 C、Sub过程可以使用Call语句或直接使用过程名调用，而Function过程不可以 D、两种过程参数的传递方式不同 38、设有下列程序代码，在单击命令按钮时的输出结果是___A_____。 Sub SS (ByVal x, ByRef y, z) x=x+1 y=y+1 z=z+1 End Sub Private Sub Command1_Click ( ) A=1: B=2 :C=3 Call SS (A,B,C) Print A,B,C End Sub