在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件程序: Private Function fun(ByVal m As Integer) If m Mod 2 = 0 Then fun = 2 Else fun = 1 End If End Function Private Sub Command1_Click() Dim i As Integer,s As Integer s = 0 For i = 1 To 5 s = s + fun(i) Next Print s End Sub 程序运行后,第一次单击命令按钮时,x的结果为( )。
查看答案
要想从子过程调用后返回两个结果,下面子过程说明语句合法的是( )。
A. Sub f1(ByVal n%, m%)
B. Sub f1(n%, m%)
C. Sub f1(n%, ByVal m%)
D. Sub f2(ByVal n%, ByVal m%)
在定义通用过程时,下列关键字中不能用来修饰形参的是( )。
A. Static
ByVal
C. Optional
D. ByRef
以下语句中正确的是( )。
A. Private Sub PPP(str1 as String * 8)
B. Private Sub PPP(a() As Integer)
C. Public Sub PPP(a(n) As Integer)
Dim a As Integer Private Sub a(n As Integer)
设有如下程序: Option Base 1 Private Sub Form_Click() Dim a(5) As String, i As Integer For i = 1 To 5 a(i) = Chr(Asc("A") + i) Call f(a, i) Next i End Sub Sub f(ta() As String, n As Integer) Dim i As Integer For i = 1 To n Print ta(i); Next i Print End Sub 对上述程序,以下叙述中正确的是( )。
A. 程序可正常运行,输出内容的第一行是数字65
B. 程序可正常运行,输出内容的第二行是字符串“AB”
C. 程序可正常运行,输出内容的第二行是字符串“BC”
D. 程序有错,因为在过程f的定义中数组参数格式不正确