p(i,j) = _________ '选答案 Next j Next i End Sub
A. (i+j)^2 B. i^2+j C. i+j^2 D. i^2+j^2
[A]选A [B]选B [C]选C [D]选D 答案: D
第29 题: (单选题, 1 分)
在窗体上已经建立1个文本框控件txt1和1个命令按钮控件cmd1。请完
善程序,使之完成以下操作:
程序运行时,文本框上显示“VBA程序设计”,命令按钮的标题上显
示“隐藏”;
单击命令按钮时文本框消失; 单击窗体时显示出文本框。 Private Sub cmd1_Clic() txt1.Visible = False End Sub
Private Sub Form_Click()
txt1._________ = True '选答案 End Sub
Private Sub Form_Load()
txt1.Value = \程序设计\ txt1.Visible = True
cmd1.Caption = \隐藏\ End Sub
A. Enable B. Value C. Visible D. Caption [A]选A [B]选B
[C]选C [D]选D 答案: C
第30 题: (单选题, 1 分)
在窗体上已经建立1个标签控件lab1和1个命令按钮控件cmd1。请完善程
序,使之完成以下操作:
打开窗体后单击命令按钮,则通过输入对话框分别输入3个数值,然
后求出其中最大的数,并将最大的数显示在标签lab1中。 Private Sub cmd1_Click()
Dim a As Single, b As Single, c As Single Dim k As Single
a = Val(InputBox(\输入第一个数\ b = Val(InputBox(\输入第二个数\ c = Val(InputBox(\输入第三个数\ If a
k = a End If
If k ____________ '选答案 End Sub A. lab1.Value = a B. lab1.Value = b C. lab1.Caption = c D. lab1.Caption = k [A]选A [B]选B [C]选C [D]选D 答案: D 第31 题: (填空题, 2 分) 7 ^ 2 Mod 11 + 7 \\ 4 * 9 / 5 Mod 6 上述表达式的值是_______。 <空1>____________________ 答案: Lower(Trim(GetFill(1)))=\第32 题: (填空题, 2 分) 通过编程求出结果。 把 9786 表示为两个加数之和,使其中一个加数能被91整除,而另一个 加数能被87整除。请求出:在这两个加数中,能被91整除的加数等于多少? <空1>____________________ 答案: Lower(Trim(GetFill(1)))=\第33 题: (填空题, 2 分) 通过编程求出结果。 求 S = 1/5 + 1/10 + 1/15 + 1/20 + 1/25 + … + 1/(5*n) + … 的前 n 项之和, 当 S 第一次大于或等于 1.4 时终止计算,此时项数 n 为_____。 <空1>____________________ 答案: Lower(Trim(GetFill(1)))=\