在窗体中有一个命令按钮Commandl和一个文本框Textl,编写事件代码如下: Private Sub Command1_Click() For I=1 To 4 x=3 For j=l T0 3 For k=1 To 2 x=x+3 Next k Next j Next I Text1.value=Str(x) End Sub打开窗体运行后,单击命令按钮,文本框Text1输出的结果是( )。
查看答案
有如下程序段: Dim str As String*10 Dim i Strl=“abcdefg” i=12 lenl=Len(i) str2=Right(str1,4) 执行后,len1和str2的返回值分别为( )。
A. 12,abed
B. 10,bcde
C. 2,defg
D. 0,cdef
下列Case语句中错误的是( )。
A. Case 0 To 5
B. Case Is>5
Case Is>5 And Is<10
D. Case 1,3,Is>10
下列程序段的功能是实现“教师”表中“工资”字段值加500,即每位教师的工资增加500。 Dim Str As String Str=“_______” Docmd.RunSQL Sti空白处应填入的程序代码是( )。
A. 工资=工资+500
B. Update教师Set 工资=工资+500
C. Set工资=工资+500
D. Edit教师Set工资=工资+500
在模块的声明部分使用“Option Base 1”语句,然后定义二维数组A(3 to 6,4),则该数组的元素个数为( )。
A. 16
B. 20
C. 24
D. 35