考试网 >> IT认证 >> 等级 >> 二级考试 >> VB二级考试最新冲刺模拟题

发布时间：2006-06-27 23:27     点击：

24、设有如下程序：

  Private Sub Form_Click( )

Print “*”;Tab(6);2,5

For I=15 To 16

Print I

For j=2 To 6 Step 3

Print Tab(3*j);j*I;

Next j

Print

Next I

  End Sub

程序运行后，单击窗体，则在窗体上显示的是（ ）

A．                   B．

          

C．                   D．

         

25、在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序；

Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

  If Button = 2 Then

  Print "12345"

  End If

End Sub

Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)

Print "67890"

End Sub]

程序运行后，在命令按钮上单击鼠标右键，则在窗体上显示的内容是（ ）

A．12345      B．67890        C．12345       D．67890

67890        12345

26、在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序：

Private Sub Command1_Click()

Dim a(5),b(5)

For j =1 to 4

A(j)=3*j

B(j)=a(j)*3

Next j

Text1.text=b(j\2)

End Sub

程序运行后，单击命令按钮，在文本框中显示（ ）

A．25     B．18      C．36      D．35

发表评论： 匿名发表 用户名: 查看评论

您将承担一切因您的行为、言论而直接或间接导致的民事或刑事法律责任 留言板管理人员有权保留或删除其管辖留言中的任意内容 本站提醒：不要进行人身攻击。谢谢配合。