单项选择题

有如下程序： 　　Private Sub Commandl_Click( ) 　　　　Dim i As Integer 　　　　For i=1 To 2 　　　　　　DS 　　　　Next i 　　　End Sub 　　　Sub DS( ) 　　　　Dim x As Integer，m As String 　　　　Static y，n 　　　　X=X + 1 　　　　y=y + 1 　　　　m=m &"*”：n=n&"#" 　　　　Print x，y，m，n 　　End Sub 　　程序运行后，输出的结果是( )。

A．1　1　*　#
B．1　1　*　#
C．1　1　*　#1　1　*　#　1　2　*　#
D．1　1　*　#1　1　*　##　　1　2　*　##
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click() Dim a1(4, 4), a2(4, 4)Dim i As Integer, j As IntegerFor i = 1 To 4For j = 1 To 4 a1(i, j) = i + j a2(i, j) = a1(i, j) + i + jNext j Next i Print a1(3, 3); a2(3, 3) End Sub程序运行后，单击命令按钮，在窗体上输出的是______。
A．6 6
B．10 5
C．7 21
D．6 12
单项选择题
在窗体上画一个命令按钮和两个标签,其名称分别为Command1、Label1和Label2,然后编写如下事件过程：Private Sub Command1_Click()a=0 For i=1 To 10a=a+1b=0For j=1 To 10a=a+1b=b+2Next jNext iLabel1.Caption=str(a)Label1.Caption=str(b)End Sub程序运行后,单击命令按钮,在标签Label1和Label2中显示的内容分别是【 】
A．10和20
B．20和10
C．200和110
D．110和20
相关试题