单选题在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim array1(10,10)As Integer Dim I,j As Integer For I=1 To 3 For j=2 To 4 array1(I,j)=I+j Next j Next I Text1.Text=array1(2,3)+array1(3,4) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是()A12B13C14D15
单选题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim array1(10,10)As Integer Dim I,j As Integer For I=1 To 3 For j=2 To 4 array1(I,j)=I+j Next j Next I Text1.Text=array1(2,3)+array1(3,4) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是()
A
12
B
13
C
14
D
15
参考解析
解析:
暂无解析
相关考题:
在窗体上画一个名称为 Text1 的文本框和一个名称为 Commandl 的命令按钮,然后编写如下事件过程:Private Commandl_Click()Dim i As Integer, n As IntegerFor i=0 To 50i = i+3n = n+1If i10Then Exit ForNextTextl.Text=Str(n)End Sub程序运行后,单击命命令按钮,在文本框中显示的值是( )。 A.5B.4C.3D.2
( 19 )在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim i As Integer, n As IntegerFor i = 0 To 50i = i + 3n = n + 1If i 10 Then Exit ForNextText1.Text = Str(n)End Sub程序运行后,单击命令按钮,在文本框中显示的值是A ) 5B ) 4C ) 3D ) 2
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dimarrayl(10,10)As Integer Dimi As Integer,j As Integer Fori=1 To 3 Forj=2 To 4 arrayl(i,j)=i+j Nextj Nexti Text1.Text=axvayA.15B.14C.13D.12
在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Labell,文本框的Text1属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Labell.Caption=Str(x) End Sub 程序运行后,在文本框中输入28.653,单击命令按钮,标签中显示的内容是 ______。A.27B.28C.29D.30
在窗件上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a=12345 Print Format S(a, "000. 00") End Sub 程序运行后,单击命令按钮,窗体上显示的是______。A.123.45B.12345.00C.12345D.00123.45
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a S="VisualBasic" Print String(3, a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是______。A.VVVB.VisC.sicD.11
设有如下通用过程: Public Sub Fun(a() As Integer, x As Integer) For i=1 To 5 x=x+a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程: Private Sub Command1_Click() Dim arr(5)As Integer, n As Integer For i=1 To 5 art(i)=i+i Next Fun arr, n Text1. Text=Str(n) End Sub 程序运行后,单击命令按钮,在文本框中显示的内容是______。A.30B.25C.20D.15
( 30 )有如下通用过程:Public Function Fun(xStr As String) As StringDim tStr As String ,strL As IntegertStr= ” ”strL=Len(xStr)i=strL/2Do While i=strLtStr=tStr Mid(xStr,i+1,1)i=i+1LoopFun=tStr tStrEnd Function在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim S1 As StringS1= ” ABCDEF ”Text1.Text=Lcase(Fun(S1))End Sub程序运行后,单击命令按钮,文本框中显示的是A ) ABCDEFB ) abcdefC ) defdedD ) defabc
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Option Base 1Private Sub Command1_Click( )Dim s As IntegerDim aa(3, 2) As IntegerFor i = 1 To 3For j = 1 To 2aa(i, j) = i + jNext jNext is = aa(1, 2) + aa(2, 1)Print sEnd Sub程序运行后,单击命令按钮,窗体上显示的值是( )A. 4B. 5C.6D. 7
在窗体上添加一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a(10,10)As IntegerDim i,j As IntegerFor i=2 To 4For j=3 To 6Next iText1.Text=a(2,3)+a(4,6)End Sub程序运行后,单击命令按钮,在文本框中显示的值是( )。
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编如下事件过程:Private Sub Command1_Click()Dim i As Integer, n As Integern=0For i=0 To 50i=i+3n=n+1If i>10 Then Exit ForNext iText1.Text=Str(n)End Sub程序运行后,单击命令按钮,在文本框中显示的值是______。
在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为Text1、Command1和Labe11,文本框的Text1属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() x=Int(Val(TextText)+0.5) LabeCaption=Str(x) End Sub 程序运行后,在文本框中输入653,单击命令按钮,标签中显示的内容是______。A.27B.28C.29D.30
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click( ) a=12345 Print Format $(a,"000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是A.123.45B.12345.00C.12345D.00123.45
在窗体上画一个命令按钮(名称为Command1)和一个文本框(名称为Text1),然后编写如下事件过程:Private Sub Command1_Click()x=Val(Text1.Text)Select Case xCase 1,3y=x*xCase IS>=10,IS<=-10y=xCase-10 To 10y=-xEnd SelectEnd Sub程序运行后,在文本框中输入3,然后单击命令按钮,则y的值变为______。
在窗体上画一个名称为CommRnd1的命令按钮,一个名称为Labell的标签,然后编写如下事件过程:Private Sub Command1 Click()s=0For i=1 TO 15x=2*i-1if x Mod 3;0 Then s=s+lNext iLabe11.Caption=sEnd Sub程序运行后,单击命令按钮,则标签中显示的内容是上【 】。
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写 如下事件过程: Private Sub Command1_Click() Dim arrayl(10,10)As Integer Dim i, j As Integer For i=1 To 3 For j=2 To 4 arrayl(i,j)=i + j Next j Next i Text1.Text=arrayl(2, 3)+arrayl(3, 4) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是A.12B.13C.14D.15
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a As Integer,s As Integer a = 8 s = 1 Do s = s + a a = a - 1 Loop While a<=0 Print s,a End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是A.7 9B.34 0C.9D.死循环
在窗体上面显示一个名称为Text1的文本框和一个名称为Command1的命令按钮,编写如下事件过程: Private Sub Command1_Click() Text1.Text="Visual" ME.Text1="Basic" Text1="Program" End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的是______。A.VisualB.BasicC.ProgramD.出错
设有如下通用过程:在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如 下事件过程:End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是( )。A. 30B. 25C. 20D. 15
在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:Private Sub Command1_Cilck()End Sub运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是( )。
在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程: Private Funcdonf(m As Integer) If m Mod2=0 Then f=m E1Se f=1 End If End FunCdOn Private Sub Cmnmalldl_CUCk() Dimi As Integer S=0 Fori=1 To 5 s=s+f(i)A.11B.10C.9D.8
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是A. 123.45B.12345.00C.12345D.00123.45
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的是A. VisualB.BasicC.ProgramD.出错
在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl),然后编写如下事件过程:程序运行后,在文本框中输入3,然后单击命令按钮,则Y的值变为__________。