在窗体上画一个名称为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 程序运行后,单击命令按钮,在文本框中显示的值是()
语句Dim arr(-3 To 5,2 To 6)As Integer定义的数组元素有()个。
设有如下程序: Option Base 0 Private Sub Form_Click() Dim a Dim i As Integer a = Array(1,2,3,4,5,6,7,8,9) For i = 0 To 3 Print a(5 – i); Next End Sub 程序运行后,单击窗体,则在窗体上显示的是()
下面这段代码中,变量myInteger的结果是()。 Dim myString As String="ABCDE" Dim myInteger As Integer myInteger=myString.IndexOf("D")
语句Dim s(1 to 5)as String定义的数组是()类型的元素。
用下面语句定义的数组的元素个数是() Dim A (-4 to 6) As Integer
下面这段代码中,变量myChar的结果是()。 Dim myString As String = "ABCDE" Dim myChar As Char myChar = myString.Chars(3)
定义变量的语句Dim abc As String*3是正确的。
有如下函数过程: Function secproc(x As Integer, y As Integer, z As Integer) secproc = 3 * y + z + 2 * x End Function Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer a = 2: b = 3: c = 4 Print secproc(c, b, a) End Sub 该程序的运行结果是( )。
语句Dim abc(-2 To 4,0 To 4,5)As Long定义的三维数组,其数组元素有__________ 。
用语句Dim A (-3 To 5) As Integer定义的数组的元素个数是().
用 Dim c(2 to 5) As Integer 语句定义的数组占用 个字节的内存空间。
用如下语句所定义的数组的元素个数是( )个。Dim b(-2 to 4) as string
下列程序的执行结果是 _ ________ __ Dim a(5) As String Dim b As Integer Dim I As Integer For I = 0 To 5 a(I) = I + 1 Print a(I); Next I
用Dim arr(3 To 5,-2 To 2)语句定义的数组元素个数是()。A. 20B. 12C. 15D. 24
DIM a(3, -3 to 0, 3 to 6)AS STRING语句定义的数组元素有【】个。
用如下语句所定义的数组的元素个数是()个。Dim b(-2 to 4)asstringA.2B.4C.6D.7
下列程序段错误的是()。A.Dim a As Integer a=array(1,2,3,4)B.Dim a(),b() a=array(1,2,3,4): b=
在窗体上画一个名称为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
在窗体上画l个命令按钮和l个文本框,其名称为Command1和Text1,再编写如下程序: Dim ss As String Private Sub Text1 KeyPress(KeyAscii As Integer) If Chr(KeyAscii)<>""Then ss=ss+Chr(KeyAscii) End Sub Private Sub Command1 Click() Dim m As String,i As Integer For i=Len(ss)To 1 Step-1 m=m+Mid(SS,i,1) Next Text1.Text=UCase(m) End Sub 程序运行后,在文本框中输入“Number 100”,并单击命令按钮,则文本框中显示的就是()。
语句Dim Arr(-2 To 3)As Integer所定义的数组的元素个数为()。
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序代码: Option Base 1 Dim arr() As Integer Private Sub Command1_Click() Dim i As Integer, j As Integer Dim s As Integer ReDim arr(4, 2) s = 0 For i = 1 To 3 For j = 1 To 2 arr(i, j) = i + j Next j Next i ReDim Preserve arr(4, 4) For j = 3 To 4 arr(3, j) = j + 10 Next j For i = 1 To 4 s = s + arr(i, i) Next i Print s End Sub 程序运行过程中,当单击Command1时,输出结果为________。
有如下事件过程,单击命令按钮扣,输出结果是()。 Private Sub Command1 Click() Dim b% (1 To4) ,j%, t For j=1 To 4 b(j) =j Next j t=Tax(b() ) Print "t="; t, End Sub Function Tax (a() As Integer) Dim t, i% t=1 For i=2 To UBo
下面的事件过程随机产生一个3位3位正整数,然后逆序输出,并将产生的数与逆序数相隔4个字符显示在一行上,例如:产生345,输出345,543Private Sub Form_Click()Dim a As Integer,s As String,b AS Integer Randomize A=Int()S=Trim()) B=Val()&Mid()&Left()Print