06-10笔试读程序题集锦.docVIP

06年秋： 1．单击命令按钮Command1，窗体上输出的结果是（? ） Private Sub Command1_Click() ??? x = 3 ??? y = 4 ??? Call Test(x, y) ??? Print x; y End Sub Private Sub Test(var1, var2) ??? var1 = var1 ^ 2 ??? var2 = var2 ^ 2 ??? var3 = Sqr(var1 + var2) ??? Print var3; End Sub A．5? 3? 4 B．5? 9? 16 C．25? 3? 4 D．25? 9? 16 ? 2．执行下面程序，单击窗体后，窗体上显示的内容是（? ） Private Sub Form_Click() Dim a a = Array(Mon, Tue, Wed, Thu, Fri, Sat, Sun) Print a(5), LBound(a), UBound(a) End Sub A．Fri? 1?? 7???? ? ??? B．Fri? 0?? 6??????????? C．Sat?? 1?? 7?????? ??? D．Sat?? 0?? 6 ? 3．执行下面程序，单击窗体后，窗体上显示的内容是（? ） Private Sub Form_Click() ????? For I = 0