二级VB在线笔试模拟考场6
|
1. 例1. 在窗体中添加一个命令按钮，然后编写如下程序: Private Sub Command1 - Click（） Dim I For I=1to13Step2 I=I 1 rint I; ext I End Sub 单击命令按钮，程序的执行结果为 （ ） A.24681012 B.135791113 C.258 D.2581114 2. 执行下面的程序段后，x的值为 （ ） x=5 For I=1to20Step2 x=x I5 Next I A.21 B.22 C.23 D.24 3. 执行下列程序: Private Sub Command1 - Click（） For j=1to4 rint Tab（2*j 1）;12*j ext j End Sub 单击命令按钮，程序执行结果为 （ ） A.12 B.12 C.12 D.12243648 24 24 24 36 36 36 48 48 48 4.在窗体中画一个命令按钮，然后编写如下的事件过程: Private Sub Command1 - Click（） For I=1to4 x=4 For j=1to3 x=3 For k=1to2 x=x 6 ext k ext j ext I rint x End Sub 程序运行后，结果为 （ ） A.7 B.15 C.157 D.538 5. 在文本框上画上两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（其Name属性为Command1），然后编写如下的事件过程: Private Sub Command1 - Click（） x=0 Do While x<50 x=（x 2）*（x 3） =n 1 Loop Text1.Text=Str（n） Text2.text=Str（x） End Sub 程序运行后，单击命令按钮，在两个文本框中显示的值分别为 （ ） A.1和0 B.2和72 C.3和50 D.4和168 6. 阅读下面的程序段: for I=1to3 for j=1to I for k=j to3 a=a 1 ext k ext j next I 执行上面的三重循环后，a的值为 （ ） A.3 B.9 C.14 D.21 7. 设a=6，则执行x=IIF（a>5，-1，0）后，x的值是 （ ） A.5 B.6 C.0 D.-1 8. 在窗体上画一个命令按钮，然后编写如下的事件过程: Private Sub Command1 - Click（） x=0 Do Until x=-1 a=I utBox（″请输入A的值″） a=Val（a） =I utBox（″请输入B的值″） =Val（b） x=I utBox（″请输入X的值″） x=Val（x） a=a b x Loop rint a End Sub 程序运行后，单击命令铵扭，一次在输入对话框中输入5、4、3、2、1、-1，则输出结果为（ ） A.2 B.3 C.14 D.15 9. 在窗体中添加命令按钮，编写如下程序: Private Sub Command1 - Click（） a=0 For m=1to10 a=a 1 =0 For j=1to10 a=a 1 =b 2 ext j ext m rint a，b End Sub 单击命令按钮，程序的执行结果为 （ ） A.10，20 B.20，110 C.110，20 D.200，110 相关资料 |
