单项选择题

下列程序的执行结果是( )。 Privaae Sub Form_Activate Dim score(3)As Integer,total As Integer Dim aa_score As Variant score(1)=50:score(2)=14:score(3)=36 total=0:i=0 For Each aa_score In score i=i+1 total=total+aa_score Print i,aa_score,total Next End Sub

A．1 0 0 2 50 50 3 14 64 4 36 100
B．1 50 50 2 14 64 3 36 100
C．0 50 50 1 14 64 2 36 100 3 36 100
D．0 0 0 1 50 50 2 14 64
<上一题 目录 下一题>
热门 试题

单项选择题
设窗体上有一个名为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text= Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer，_ Shift As Integer,X As Single,Y As Single) Print 程序设计 End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print Visual Basic ; End Sub 程序运行后，如果在文本框中输入字母“a”，然后单击窗体，则在窗本上显示的内容是( )。
A．Visual Basic
B．程序设计
C．Visual Basic程序设计
D．a程序设计
单项选择题
在窗体上绘制一个名称为Label1的标签，然后编写如下事件过程： Private Sub Form_Click() Dim arr(10,10)As Integer Dim i As Integer,j As Integer For i =2 To 4 For j =2 To 4 arr(i,j)=i*j Next j Next i Label1.Caption=Str(arr(2,2)+arr(3,3)) End Sub 程序运行后，单击窗体，在标签中显示的内容是( )。
A．12
B．13
C．14
D．15
相关试题