窗体上仅有两个文本框TextBox1和TextBox2控件, 当焦点在TextBox1时,按下Tab键后，如下叙述正确的是 。

在窗体上加上一个文本框控件TextBox，画一个命令按钮，当单击命令按钮的时候将显示"保存文件"对话框，设置该对话框可用于保存文本文件（默认） 和Word文档，然后在文本框控件中显示保存的文件名，请填空。

Private Sub Command1_Click（）

CommonDialog1.Filter= 【13】

CommonDialog1.Filter= 【14】

CommonDialog1.ShowSave

TextBox.Text= 【15】

End Sub

在窗体上有两个文本框控件和一个命令按钮，名称分别为Text1、Text2和Command1，以下程序实现的功能是当单击Command1按钮时，将把Text2控件中的文本全部选中，并把焦点设置在该文本框中。程序运行时的界面如图20-4所示，以下两空应填( )。

Private Sub Command1_Click() TextSelStart=0 Text________=Len(TextText) Text_______ End Sub

A．SelLength SetFocus

B．SelText SetFocus

C．SelLength GetFocus

D．SelText GetFocus

窗体上仅有一个文本框Text1，当执行程序后按下键盘“a”键时打印出的结果是( )。

Private Sub Text1_KeyDown(KeyCode As Integer, ShIft As Integer)

key1 = KeyCode > 0

Print key1

End Sub

A.True B.False C.65 D.0

在窗体上有两个文本框控件，名称分别为Text1和Text2，以下程序实现的功能是希望在文本框Text1中输入字符时，输入的字符也将出现在Text2文本框中。运行时的程序界面如图20-1所示，下划线处应填( )。

Private Sub Text1_ _________() TextText=Text1.Text End Sub

A．SetFocus

B．Change

C．GetFocus

D．Click

在窗体上绘制出3个文本框，名称分别为Text1、Text2和Text3。要求程序运行时，焦点位于Text1，当按Tab键时，焦点从Text1越过Text2直接跳到Text3上。本题不得使用任何变量。程序运行时的窗体界面如图2—2所示。注意：保存时必须存放在考生文件夹下，窗体文件名为sj2．frm，工程文件名为sj2．vbp。

在窗体上绘制两个文本框，名称分别为Text1和Text2。请设置适当的控件属性，并编写适当的事件过程，使得在运行时，若在Text1中每输入一个字符，则显示输入的内容，同时在Text2中显示一个“*”。若在Text2中每输入一个字符，则显示—今“*”，如下图所示。

注意：

程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为 execise40.vbp，窗体文件名为execise40.frm。

在窗体上画两个文本框Text1和Text2，一个命令按钮Command1，请阅读以下程序段： Private Sub Command1_Click() x=0 Do Until x＞=50 x=(x+4)*(x+3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x) End Sub 运行程序后，单击命令按钮，在两个文本框中显示的值分别为( )。

A．1和0

B．2和240

C．3和50

D．4和168

在窗体上画两个文本框Text1和Text2，一个命令按钮Command1，请阅读以下程序段： Private Sub Command1_Click() x=0 Do Until x＞=50 x=(x+4)*(x+3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x) End Sub 运行程序后，单击命令按钮，在两个文本框中显示的值分别为( )。

A．1和0

B．2和240

C．3和50

D．4和168

在窗体上画一个文本框和一个计时器控件，名称分别为Text1和Timer1，在属性窗口中把计时器的Interval属性设置为1000，Enabled属性设置为False。程序运行后，如果单击命令按钮，则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程序：

Private Sub Command1_Click（）

Timer1.（）

End Sub

Private Sub Timer1_Timer（）

Text1.Text = Time

End Sub

在下划线处应填入的内容是（ ）。

A．Enabled = True

B．Enabled = False

C．Visible = True

D．Visible = False

在窗体上画两个文本框Text1和Text2，一个命令按钮Command1，请阅读下列程序段： Private Sub Command1_Click() x=0 Do Until x>=50 X=(x+4)﹡(x＋3) N=n+1 Loop Text1.Text＝Str(n) Text2.Text＝str(x) End Sub运行程序后，单击命令按钮，在两个文本框中显示的值分别为A. 1和0 B. 2和240 C. 3和50 D. 4和168