VB练习题-第七章选择题.doc

（1）设窗体上有一个名为Text1 的文体框和一个名为Command1 的命令按钮，并有以下事件过程： Private Sub Command 1_Click() x=Val(Text1.Text) Select Case x Case Is -10,Is=20 Print “输入错误” Case Is0 Print 20-x Case Is 10 Print 20 Case Is=20 Print x +10 End Select End Sub 程序运行时，如果在文本框中输入-5，则单击命令按钮后的输出结果是 A) 5 B) 20 C) 25 D) 输入错误 （）在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Labc11，然后编 写如下事件过程： Private Sub Command1_Click()Counter=0For i=1 To4For j = 6 To 1 Step -2Counter = Counter+1Next jNext iLabell.Caption = Str(Counter)End Sub程序运行后，单击命令按钮，标签中显示的内容是 A）11B）12 C）16D）20（）在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编 写如下事件过程： Private Sub Command1_Click()Dim i As Integer,n As IntegerFor i = 0 To 50i =i+3n =n+1If i 10 Then Exit ForNextText1.Text = Str(n)End Sub程序运行后，单击命令按钮，在文本框中显示的值是 A）2 B）3C）4 D）5(4)假定有一下程序段For　i=1　To　3　　For　j=5　To　1　Step　-1　　Print　i*jNext　jNext　i则语句Print i*j 的执行次数是A)15???? B)16??? C)17???? D)18)在窗体上画两个文本框（名称分别为Text1和Text2）和一个命令按钮（名称为Command1），然后编写如下事件过程：Private　Sub　Command1_Click()　x=0　Do　While　x50　x=(x+2)*(x+3)　n=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)设有以下程序Private　Sub　Form_Click()　x　=　50　For　i　=　1　To　4　y　=　InputBox(请输入一个整数)　y　=　Val(y)　If　y　Mod　5　=　0　Then　a　=　a　+　y　x　=　y　Else　a　=　a　+　x　End　If　Next　i　Print　aEnd　Sub程序运行后，单击窗体，在输入对话框中依次输入15,24,35,46,输出结果为A)100????????? B)50???????? C)120????????????? D)70 （）请阅读程序：　　Private Sub Form_ Click（）　　m=1　　For i=4 To 1 Step-1　　Print Str（m）；　　m=m＋1　　For j=1 To i　　Print；　　Next j　　Print　　Next i　　End Sub　　程序运行后，单击窗体，则输出结果是　　A）1****????????? B）4****?????????? C）****????????? D）*　　?? 2***????????????? 3***?????????????? ***????????????? **　　?? 3**?????????????? 2**????????????? ?? **????????????? ? ***　?? 　 4*??????????????? 1*???????????????? *??????????????? ****