在名称为Form1的窗体上绘制一个文本框，其名称为Text1，在属性窗口中把该文本框的Multiline属性设置为True，然后编写如下的事件过程，请在空白处填上适当的内容，将程序补充完整。 Private Sub Form_Click（) Open”d:estsmtext1.txt" For input As1 Do While Not EOF（) Line Input1，aspect$ who

工程中有Form1和Form2两个窗体。Form1窗体外观如图5所示。程序运行时，在Form1中名称为Text1的文本框中输入一个数值（圆的半径)，然后单击命令按钮“计算并显示”（其名称为Command1)，则显示Form2窗体，且根据输入的圆的半径计算圆的面积，并在Form2的窗体上显示出来，如图6所示。如果单击命令按钮，文本框中输入的不是数值，则用信息框显示“请输入数值数据!”。请填空。 Pr 在名称为Forml的窗体上绘制一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程： Private SUb Form_CnCk（) Open"d:essmtext1.txt"For Input AS 1 Do While Not EOF（1) Line Iput 1,aspect$ whole$=whole$+aspect$+Chf 工程中有Form1、Form2两个窗体，Form1窗体外观如图1所示。程序运行时，在Form1中名称为Text1的文本框中输入______个数值（圆的半径)，然后单击命令按钮“计算并显示”（其名称为Command1)，则显示Form2窗体，且根据输入的圆的半径计算圆的面积，并在Form2的窗体上显示出来，如图2所示。如果单击命令按钮时，文本框中输入的不是数值，则用信息框显示“请输入数值数据!”，请 在考生文件夹下完成如下基本操作： 1．创建名称为Form1的窗体，在该窗体上画一个文本框，名称为Text1，文本框中初始内容为Visual Basic。在文本框的右边画一个垂直滚动条，名称为VScroll1。滚动条的高度为 3000，宽度为375。在图片框的下方画一个命令按钮，名称为Command1，标题为“清除”。文本框的宽度为2000，高度为600，如图3所示。编写一个事件过程，使程序运行后， 在名称为Form1的窗体上添加一个标签（名称为Label1，标题为空白，BorderStyle属性为1，Visible属性为False)、一个文本框（名称为Text1，Text属性初始内容为空)和一个命令按钮（名称为Command1，标题为“显示”)，如图1所示。然后编写命令按钮的Click事件过程。程序运行后，在文本框中输入“计算机等级考试”，然后单击命令按钮，则文本框消失，并在标签内显示文本框 在名称为Form1的窗体上画一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：上述程序的功能是，把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtext2.txt。请填空（）。 假定一个文本框，其名称为Text1，为了使该文本框具有焦点，应执行的语句是______。 窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Label1)。要求程序运行后，如果在文本框中输入字符，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是： ______。 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然，如果单击命令按钮，则在文本框中显示的是 在窗体上画一个文本框(其名称为Textl)和一个标签(其名称为Label1),程序运行后,如果在文本框中输入指定的信息,则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是【 】 设一个工程由两个窗体组成，其名称分别为Form1和Form2，在Form1上有一个名称为Command1的命令按钮。窗体Form1的程序代码如下： Private Sub Command1_Click（) Dim a As Integer a=10 Call g（Form2，a) End Sub Private Sub g（f As Form, X As Integer) y=IIf（x＞,10, 假定有一个文本框，其名称为Text1，为了使该文本框具有焦点，应执行的语句是 【11】 。 在窗体上画一个文本框，名称为Text1，然后编写如下程序：程序运行后，在文本框中输入一个字符串，然后单击窗体，则文本框中的内容（） 在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，再编写如下程序：程序运行后在文本框中输入“Number100”，并单击命令按钮，则文本框中显示的是（） 在窗体上有一个文本框控件，名称为TextTime，一个计时器控件，名称为Timer1。要求每一秒在文本框中显示一次当前的时间。 假定建立了一个工程，该工程包括两个窗体，其名称（Name属性)分别为Form1和Form2。启动窗体为 Form1，在Form1上画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示窗体Form2，在横线处将程序补充完整。 Private SubCommand1_Click（) Unload Form1 Form2． 【7】 End Sub 假定建立了一个工程，该工程包括两个窗体，其名称（Name属性)分别为Form1和 Form2，启动窗体为Form1。在Form1上画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示窗体Form2，请将下面的程序补充完整。Private Sub Command1_ Click（) 【14】 Form1 Form2. 【15】 End Sub 假定建立了一个工程，该工程包括两个窗体，其名称（Name属性)分别为Form1和Fonn2，启动窗体为Form1。在Form1画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示窗体Form2，请将程序补充完整。 Private Sub Command1_Click（)______Form1Form2.______ End Sub 在名称为Forml的窗体上画一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：Private Sub Form Click（)Open"d:estsmText1.txt"For Input As 1Do While Not（）Line Input 1,aspect$whole$=whole$+aspect$+C 假定建立了一个工程，该工程包括两个窗体，其名称（Name属性)分别为Form1和Form2，启动窗体为 Form1。在Form1中画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示窗体Form2，请将程序补充完整。 Private Sub Command1_Click（) 【8】 Me Form2． 【9】 End Sub