在VB中，若要使一个文本框（Text）中的内容在超过文本框的宽度

在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：

Private Sub Form_Click（）

Text1.Text = "VB程序设计"

End Sub

Private Sub Text1_Change（）

Picture1.Print "VB Programming"

End Sub

程序运行后，单击窗体，则在文本框中显示的内容是______，而在图片框中显示的内容是_____。

在VB中，要设置文本框中显示内容的字体，应设置文本框的( )属性

A.Text

B.Name

C.Caption

D.Font

在窗体上画一个文本框(其Name属性为Text1)，然后编写如下事件过程：

Private Sub Form_Load()

Text1.Text=""

Text1.SetFocus

For i=1 To 9

Sum=Sum=i

Next i

Text1.Text=Sum

End Sub

上述程序的运行结果是

A．在文本框Text1中输出45

B．在文本框Text1中输出0

C． 出错

D． 在文本框Text1中输出不定值

设有如右图所示的窗体和下列程序：

Private Sub Command1_Click() Text1.Text="Visual Basic" End Sub Private Sub Text1_LostFocus() If Text1.Text＜＞"BASIC" Then Text1.Text=" " Text1.SetFocus End If End Sub程序运行时，在Text1文本框中输入“Basic”(如图所示)，然后单击Command1按钮，则产生的结果是( )。

A．文本框中无内容，焦点在文本框中

B．文本框中为"Basic"，焦点在文本框中

C．文本框中为"Basic"，焦点在按钮上

D．文本框中为"Visual Basic"，焦点在按钮上

在窗体上添加一个文本框Text1，然后编写下列Load事件过程，则程序运行结果是( )。

Private Sub Form_Load()

Text1.Text=""

Text1.SetFocus

For k=1 To 5

t=t*k

Next k

Text1.Text=t

End Sub

A．在文本框中显示120

B．文本框中仍为空

C．在文本框中显示1

D．出错

在VB中，要设置文本框中显示的内容，应设置文本框的( )属性。

A.Text

B.Name

C.Caption

D.Font

（10）在窗体上画一个文本框和一个图片框，然后编写下列两个事件过程： Private Sub Form_Click() Text1.Text="VB Programming" End Sub Private Sub Text1_Change() Picture1.Print"VB程序设计" End Sub 程序运行后，单击窗体，则在文本框中显示的内容是，而在图片框中显示的内容是 。

在窗体上画一个文本框(其中Name属性为Text1)，然后编写如下事件过程： Private Sub Form_ Load() Text1.Text=“” Text1.SetFocus For i=1 To 10 Sum=Sam+ i Next i Text1.Text=Sam End Sub上述程序的运行结果是______ 。

A．在文本框Text1中输出55

B．在文本框Text1中输出0

C．出错

D．在文本框Text1中输出不定值

假设窗体上有一个命令按钮Cmd1，一个文本框Text1。要求单击命令按钮后，在文本框中显示的内容为"ABC"，则该单击事件中相应的过程代码是______。

A．Text1.Name="ABC"

B．Text1.Text="ABC"

C．Text1.Caption=ABC

D．Text1.Text=ABC

在窗体上画两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：

Private Sub Command1_Click()

Text 1="VB programming"

Text 2=Text 1

Text 1="ABCD"

End Sub

程序运行后，单击命令按钮，文本框Text 2中显示的内容为【 】。