铁路机务系统考试
GKD1机车是（）电传动内燃机车。A、直—直B、直—交C、交—直D、交—交
题目
GKD1机车是（）电传动内燃机车。
- A、直—直
- B、直—交
- C、交—直
- D、交—交
参考答案和解析
相似问题和答案
第1题：
（30）下列事件过程可以将打开文件对话框的标题改变为“new Caption”.A.Private Sub Commandl_Click() CommonDialog1.DialogTitle="new Caption" CommonDialog1.ShowFont End Sub B.Private Sub Commandl_Click() CommonDialog1.DialogTitle="new Caption" CommonDialog1.ShowOpen End Sub C.Private Sub Commandl_Click() CommonDialog1.DialogTitle="new Caption" CommonDialog1.ShowHelp End Sub D.Private Sub Commandl_Click(） CommonDialog1.DialogTitle="new Caption" CommonDialog1.ShowColor End Sub
【解析】可以通过DialogTitle属性设置打开文件对话框的标题，使用ShowOpen方法设置通用对话框的类型为打开文件对话框。
DialogTitle属性指定对话框中标题栏的名称。“打开”对话框默认的标题是“打开”；“另存为”对话框默认的标题是“另存为”。
第2题：
执行下面程序，第一行输出结果是【 】，第二行输出结果是47。
Option Explicit
Private Sub Form_Click( )
Dim A As Integer
A=2
Call Sub1 (A) End Sub
Private Sub1 (x As Integer)
x=x*2+1
If x＜10 Then
Call Sub1 (x)
End If
x=x*2+1
Print x
End Sub
23 解析：递归是一种十分有用的程序设计技术。递归过程是在过程定义中调用(或间接调用)本过程的过程。递归过程的关键部分就是要子过程函数 Sub1()被调用了多少次。当x=2时调用了第1次，当 x=5时调用了第2次，当x=11时不再调用，退出之前分别按x=23和x=47输出。注意：通用过程的调用和通用过程中的参数调用。
第3题：
有一过程如下:
Sub Sub1(m As Integer,total As Long)
Dim i As Integer
total=1
For i=1 To m
total=total*i
Next
End Sub
调用它的事件过程如下:
Private Sub Command1_Click()
Dim tot As Long,a As Integer
a=Val(InputBox("请输入数据"))
Call Sub1(a,tot)
Print tot
End Sub
则输入数据5,运行结果为【 】。
120 解析：考查考生对过程中参数传递方式的掌握情况。本题的难点是实参与形参的传递问题。total按ByRef参数传递。子过程的功能是计算n!,题中输入5,因此5!=120。参数按传值方式传递时,不改变实参中的值;按传地址的方式传递时,实参和形参指向的内容被改变。
第4题：
有如下Sub过程：
Sub ind(a As Integer)
Static x As Integer
x= x + a
Print x：
End Sub
以下是调用它的事件过程，程序运行后，单击命令按纽Command1三次，输出结果为【 】。
Private Sub Command1_Click()
Ind 2
End Sub
6
第5题：
在窗体中添加一个命令按钮,编写如下程序:
Private Sub Sub1(p,m,n)
p=p+1:m=m+1:n=n+1
Print "sub1:";p;m;n
End Sub
Private Sub Command1_Click()
a1=1:b=2:c1=3
Call Sub1(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题：
窗体Form1上有一个名称为Command1的命令按钮，以下对应窗体单击事件的事件过程是（ ）。
A.Private Sub Form1 Click（ ）
End Sub···
B.Private Sub Form1. Click（ ）
End Sub···
C.Private Sub Command1 click（ ）
End Sub···
D.Private Sub Command Click（ ）
End Sub···
B。【解析】窗体单击事件为Form—Click事件。
第7题：
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Call sub1(-15.1,2.54) End Sub Public Function sub1(a As Integer,ByVa1 b As String) As Integer a＝Val(B)sub1=a Print sub1 End Function 程序运行后，单击命令按钮，在窗体上输出的是
A．3
B．2
C．-15
D．提示出错
解析：本题主要考查了功能函数的调用。特别要注意的是转换函数Va1的含义。 Va1表示的含义是将字符串转换为数值型，在本题中要求转换为整型值，在转换过程中应用到了四舍五人的规则，Va1(2.54)的结果值为3。故程序运行后单击命令按扭，在窗体上输出的数为3。选项A正确。
第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题：
在窗体中添加一个命令按钮，编写如下程序： Private Sub Sub1(p，m，n) p=p+1：m=m+1：n=n+1 Print "sub1："；p；m；n End Sub Private Sub Command1_Click() a1=1：b=2：c1=3 Call Sub1(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为表达式按值传送。
第10题：
窗体Form. 1上有一个名称为Command 1的命令按钮，以下对应窗体单击事件的事件过程是
A）Private Sub Form. 1_Click() B）Private Sub Form. _Click()
End Sub End Sub
C）Private Sub Commandl_Click() D）Private Sub Command_ Click()
End Sub End Sub