农艺师考试
相似问题和答案
第1题：
下列关于Sub过程的叙述正确的是A.一个Sub过程必须有一个Exie Sub语句B.一个Sub过程必须有一个Enb Sub语句C.在Sub过程中可以定义一个Function过程D.可以用Goto语句退出Sub过程
【解析】每个Sub过程必须以Sub开始，以End Sub结束；Exit Sub语句使程序立即从一个Sub过程中退出，在Sub过程中可以使用一个或多个Exit Sub语句，也可以没有Exit Sub语句，因此选项A）错误，选项B）正确。在Sub过程中不能嵌套定义Sub过程或者Function过程，不能使用Goto语句进入或转出一个Sub过程，因此选项C）、D）说法是错误的。
第2题：
（12）有下列Sub过程: Sub Sub(x As Single,y As Single) t=x x=t/y y=t Mody End Sub 在窗体上的命令按钮Commandl中，编写下列事件过程，执行该事件过程调用Sun过程，结果是（ ）。 Private Sub Commandl_Click() Dim a As Single Dim b As Single a=5 b=4 Sun a,b Print a；b End Sub A.1.25 1 B.5 4 C.4 5 D.1 1.25
【解析】本题考查过程的调用，如果用Call语句调用子过程时，实际参数要放在括号中，如果不使用Call子句，则不必使用括号。本题参数调用时是按地址传递，因此Sun过程中变量的值改变也即改变了单击事件中的a、b变量值。
Sun a,b的执行过程是：t=x=5,x=t/y=1.25,y=t Mod y=1。
第3题：
下列过程定义语句中，参数不是对象的定义语句是（ ）。
A．Sub Pro4（x As Form）
B．Sub Pro4（y As Control）
C．Sub Pro4（Form1 As Form,Labell As Control）
D．Sub Pro4（x As Currency）
第4题：
在窗体上画一个命令按钮，然后编写下列程序： Private Sub Command12_Click() Tt 3 End Sub Sub Tt(a As Integer) Static X As Integer X=X * a + 1 Print x； End Sub 连续三次单击命令按钮，输出的结果是
A．1 5 8
B．1 4 13
C．3 7 4
D．2 4 8
解析：在过程Tt中，将Integer型变量x定义为静态变量(StatiC，Static语句的格式与Dim语句完全一样，但Static语句只能出现在事件过程，Sub过程或Function过程中，在过程中的Static变量只有局部的作用域，即只能在本过程中可见，但可以和模块级变量传递，即使过程结束后，其值仍能保留。Tt过程是将变量a的值乘以x然后加1赋给x，然后输出x的值。第一次调用Tt过程时，x未赋值，默认为0，所以输出结果为1;第二次调用Tt过程时，因为x为静态变量，所以它的值为上次调用后的值，即为1，加上乘以a加1后，x的值变为4，输出结果为4；同理，第三此调用后输出结果为13。
第5题：
在窗体中添加一个命令按钮，编写如下程序： Private Sub Subl(p,m,n) p=p+1:m=m+1:n=n+1 Print"subl:";p;m;n End Sub Private Sub Command1_Click() al=1:b=2:c1=3 Call Subl(a,b1+3,c1) Print"Main:";a1;b1;c1 End Sub 程序运行后，输出结果为
A．Sub：2 6 4 Main：2 6 4
B．Sub：2 6 4 Main：2 6 4
C．Sub：2 6 4 Main：1 2 3
D．Sub：2 6 4 Main：2 2 3
解析：考查考生对参数传递的掌握情况。
[解题要点] 这是在实现子过程被调用时参数虚实结合的问题。a1为变量按址传送，b1+3和c1为表达式按值传送。
[错解分析] 参数的传值方式和传址方式的区别。
[考点链接] 函数调用和参数传递。
第6题：
（9）下列程序的输出结果是。 Sub Prin() Dim B As String A=1 B=A & Space(4)&A PrintA Print trim(B) End Sub
1
1 1
【解析】Space(Integer)函数的功能是返回指定数目空格；Trim函数的功能是去掉字符串两边的空白字符，注意Trim(B)不能将字符中间的空白字符去掉。B=A&Space(4)&A的结果是“1 1”（中间有4个空格）。
LTrim(String)函数的功能是去掉String字符串左边的空白字符；RTrim(String)函数的功能是去掉String字符串右边的空白字符。
第7题：
运行以下程序后，输出结果为_____________。 Private Sub Command1_Click() a=1:b=2:c=3 Call test(a,b+3,(c)) Print "main:";a;b;c End Sub Private Function test(p,m,n) p=p+1:m=m+1:n=n+1 Print "sub:";p;m;n End Function
：A. sub:2 6 4 main:1 2 3
B. sub:2 6 4 main:2 2 3
C. sub:2 6 4 main:2 6 4
D. sub:2 6 4 main:1 6 4
第8题：
在通用声明中定义a，在窗体中添加一个命令按钮Command1，编写如下程序代码：
DimaAsInteger
Subtest()
a=a+1:b=b+1:c=c+1
Print"Sub:";a;"，";b;"，";c
EndSub
PrivateSubCommand1_Click()
a=2:b=3:c=4
Calltest
Calltest
EndSub
程序运行后，单击命令按钮，窗体中将显示( )
A.Sub：3，4，5Sub：4，5，6
B.Sub：2，3，4Sub：2，3，4
C.Sub：3，1，1Sub：4，1，1
D.Sub：1，1，1Sub：1，1，1
第9题：
下列Sub 过程中描述错误的是______。
A．Sub 过程只能在窗体模块中定义
B．Goto 语句不能用于Sub 过程
C．Sub 过程只能在窗体模块中定义
D．Sub 过程中不能嵌套定义Sub 过程
第10题：
在窗体上画一个命令按钮，然后编写下列程序 Private Sub Command3_Click( ) Tcl 2 Tcl 3 Tel 4 End Sub Sub Tcl(a As Integer) Static x As Integer x=x + a Print x； End Sub 程序运行后，单击命令按钮，输出结果为
A．2 3 4
B．2 5 9
C．3 5 4
D．2 4 3
解析：在过程TCL中，将Integer型变量x定义为静态变量(StatiC)，Static语句的格式与Dim语句完全一样，但Static语句只能出现在事件过程，Sub过程或Func-tion过程中，在过程中的Static变量只有局部的作用域，即只能在本过程中可见，但可以和模块级变量传递，即使过程结束后，其值仍能保留。Tcl过程是将变量a的值加上x赋给x，然后输出x的值；第一次调用Tcl过程时，x未赋值，默认为0，所以输出结果为2，第二次调用Tcl过程时，因为x为静态变量，所以它的值为上次调用后的值，即为2，加上a后，x的值变为5，输出结果为5，同理，第三次调用后输出结果为9。