在窗体的单击事件中有如下程序:privatesubform_click()forj=1to15a=a+jnextjPrintaendsub程序运行后单击鼠标左键,输出的结果是( )A.1B.15C.90D.120

在窗体的单击事件中有如下程序:

privatesubform_click()

forj=1to15

a=a+j

nextj

Printa

endsub

程序运行后单击鼠标左键,输出的结果是( )

A.1

B.15

C.90

D.120


相关考题:

在窗体上画一个名称为Label1的标签,然后编写如下事件过程: Private Sub Form_Click() Dim arr(10, 10)As Integer Dimi 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.12B.13C.14D.15

在窗体上画一个名称为Labell的标签,然后编写如下事件过程: 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 Labell.Caption=Str(arr(2,2)+arr(3,3)) End Sub 程序运行后,单击窗体,在标签中显示的内容是A. 12B.13C.14D.15

在窗体上画一个名称为Label1的标签,然后编写如下事件过程:Private Sub Form_Click()Dim arr(10, 10) As IntegerDim i As Integer, j As IntegerFor i = 2 To 4For j = 2 To 4arr(i, j) = i * jNext jNext iLabel1.Caption = Str(arr(2, 2) + arr(3, 3))End Sub程序运行后,单击窗体,在标签中显示的内容是( )。A.12B.13C.14D.15

阅读程序:Private Sub Command1_Click()A=0For j=1 to 15a=a+j mod 3Next jPrint aEnd Sub程序运行后,单击窗体,输出结果是A )105B)1C)120D)15

在窗体上绘制一个名称为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.12B.13C.14D.15

阅读程序:Private Sub Form. Click( )a=0For j=1 To 15a=a+j Mod 3Next jPrint aEnd Sub程序运行后,单击窗体,输出结果是( )。A.105B.1C.120D.15

阅读程序:Private Sub Form_ Click() a=0 For j=1 To 15 a=a+j Mod 3 Next j Print aEnd Sub 程序运行后,单击窗体,输出结果是______。A.105B.1C.120D.15

在窗体上画一个名称为Labell的标签,然后编写如下事件过程。 Private Sub Form_Click( ) Dim arr(10, I0) 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 Next Labell. Caption = Str(arr(2,2) + arr(3,3) ) End Sub 程序运行后,单击窗体,在标签中显示的内容是A.12B.13C.14D.15

在窗体上绘制一个名称为Labell的标签,然后编写如下事件过程: 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 i Next i Labell.Caption=Str(arr(2,2)+arr(3,3)) End Sub 程序运行后,单击窗体,在标签中显示的内容是A.12B.13C.14D.15