成形车刀名义后角αf
第1题:
下面子过程语句说明合法的是( )。
A.Function f1(By Valn%)
B.Sub f1(n%)As Integer
C.Function f1%(f1%)
D.Sub f1(ByValn%())
第2题:
(33)下列子过程语句的说明正确的是A.Sub f1(By Val x()As Integer) B.Sub f1(X%())As IntegerC.Function f1l%(f1%) D.Function f1%(x As Integer)
第3题:
A.Sub fib(ByRef i%())
B.Sub fib(j%) As Integer
C.Functionf%(f%)
D.Function f1!(ByValn%)
第4题:
下面子过程语句说明合法的是
A.Sub f1(s1 As String*8)
B.Sub f1(n()As Integer)As Integer
C.Function f1(f1 As Integer)As Integer
D.Function f1(By Val n As Integer)
第5题:
A、Sub f1(ByVal n%())
B、 Sub f1(%)As integer
C、 Function f1%(f1%)
D、 Function f1(ByVal n%)
第6题:
下列子过程语句中正确的是 A.Sub f1(By Val()As Integer) B.Sub f1(n()As Integer)As Integer C.Function f1(f1 As Integer)As Integer D.Function f1(By Val f As Integer)
第7题:
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:
Private Sub f(ByVal x As Integer)
x=x+4
End Sub
Private Sub Command1_Click()
i=3
Call f(i)
If i>4 Then i=i*2
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。
第8题:
在窗体上添加一个名称为Command1的命令按钮,然后编写如下程序:
Private Sub f(ByVa1 x As Integer)
x=x+4
End Sub
Private Sub Command1_Click()
i=3
Call f(1)
If i>4 Then i=i*2
MsgBox i
End Sub
打开窗体运行后,单击命令按钮,则消息框的输出结果为______。
第9题:
设有如下程序: Private Sub Form. Click( ) Dim s As Long,f As Long Dim n As Integer,i As Integer f=1 n=4 For i=1 To n f=f*i s=s+f Next i Print s End Sub 程序运行后,单击窗体,输出结果是( )。
A.32
B.33
C.34
D.35
第10题:
假定有如下的Sub过程:
Sub Sub1(x As Single,y As single)
t=x
x=t/y
y=t Mod y
End Sub
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_click()
Dim a As Single
Dim b As Single
a=5
b=4
Sub1 a,b
Print a;b
End Sub
程序运行后,单击命令按钮,输出结果为
A.
B.
C.
D.