单项选择题

在窗体上画一个名称为command1的命令按钮，然后编写如下程序； Option Base 1 Private Sub Command1_Click() Dim arr(4)As String For i=1 To 4 arr(i) = Chr(Asc("A")+(i-1)) Next i For Each b1 In arr Print b1； Next End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为 ______。

A．ABCD
B．abcd
C．出错信息
D．1 2 3 4
<上一题 目录 下一题>
热门 试题

填空题
在窗体上建立名称为Text1、Text2和删的三个文本框，其中Text1和Text2文本框用来接受两个整数(假设为M和N)，建立一个名称为command1的命令按钮，单击它将得到数M从右边起的N位数字，并把该数字显示在Text3文本框中，如下图所示。请填空。private Fuction digit(ByVal m As Integer, ByVal n As Integer) As IntegerDim i As IntegerFor i = 1 To n - 1M=m 10Next iDigit= 【6】 End FunctionPrivate Sub Command1_Click()Dim m As Integer，n As Integer，k As Integerm=Val(Text1.Text)n=Val(Tex2.Text)k= 【7】 Text3.Text = Str(k)End Sub
填空题
在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()a=0For i=1 To 3For j=1 To 4If j Mod 2＜＞0 Thena=a+1End Ifa=a+1Next jNext iPrint aEnd Sub程序执行后，单击命令按钮，输出结果是 【3】 。
相关试题