实施冲击疗法，出现极限水平的标志是（）。

在名为Form1的窗体上绘制一个文本框(名称为Text1)和一个水平滚动条(名称为 HSl)。在属性窗口中对滚动条设置如下属性：

Min 500

Max 2000

LargeChange 50

SmallChange 20

编写适当的事件过程，使程序运行后，若移动滚动条上的滚动框，则可扩大或缩小文本框的高度，并使得文本框的宽度始终是其高度的1.2倍。运行后的窗体如下图所示。

注意：

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

在窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labe11)，程序运行后，如果在文本框中输入指定的信息，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是()。

True，然后编写如下的事件过程： Private Sub Form_Click() Open“d：\test\smText1.txt"For lnput As1 Do While Not【 】 Line lnput1，aspect＄ whole＄=wholes+aspect＄+Chr＄(13)+Chr＄(10) Loop Text1.Text=whole＄ Close1 Open“d：\test\smtexttxt"For Output As 1 Print 1，【 】 Close1 End Sub 上述程序的功能是，把磁盘文件，mText1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtexttxt。请填空。

置为True，然后编写如下的事件过程：

Private SUb Form_CnCk()

Open"d:\tes\smtext1.txt"For Input AS 1

Do While Not EOF(1)

Line Iput 1,aspect$

whole$=whole$+aspect$+Chf$(13)+Chr$(10)

Loop

A．Text1．Clear

B．Text1．Visible = False

C．Text1．Hide

D．Text1．Enabled = False

在窗体上画一个文本框，其名称为Text1。为了在程序运行后Text1中的文本不可编辑， 应当使用的语句：_______。

A．Text1.Clear

B．Text1.Locked=True

C．Text1.Visible=False

D．Text1.Enabled=True

置为True，然后编写如下的事件过程：

Private Sub Form. Click()

Open "d：\test\smtext1.txt" For Input As 1

Do While Not

Line Input 1，aspects

whole$=whole$+aspect$+Chr$(13)+Chr$(10)

Loop

Text1.Text=whole$

Close 1

Open "d：\test\smtext2.txt" For Output As 1

Print 1, ______

Close 1

End Sub

上述程序的功能是，把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtext2.txt。

在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是______。

A．Prlvate Sub Text1_Change() Command1. Caption="计算机等级考试" End Sub

B．Private Sub Command1_Click() Caption="计算机等级考试" End Sub

C．Private Sub Form_Load() Text1. Caption="计算机等级考试" End Sub

D．Private SubCommand1_Click() Text1. Text="计算机等级考试" End Sub