下列程序用于在带垂直滚动条的文本框Text1中输出3到100之间的全部素数。请填空。 Private Sub Command1_click（) Text1.Text="" For n=3 to 100 k=Int（Sqr（n)) i=2 Flag=0 Do While i＜= ______And Flag=0 If n Mod i=0 ThenFlag=1 Elsei=i+1 End If Loo

在窗体上有一个文本框Text1，Text属性值为空，然后编写下列事件过程： Private Sub Text1 KeyPress(KeyAscii As Integer) Dim str As String,n As Integer str=UCase(Chr(KeyAscii)) n=Len(str) Text1.Text=String(n,str) End Sub 程序运行后，若在文本框中输入单字母“p”，则在文本框Text1中显示的内容为( )。 设窗体中有一个文本框Text1，若在程序中执行了Text1.SetFocus，则触发______。 设窗体中有一个文本框Text1，若在程序中执行了Text1.SetFocus，则触发 在窗体上画两个文本框，名字分别为Text1和Text2，然后编写下列程序。程序运行后，如果在文本框 Text2中输入lmn，那么在文本框Text1中显示的内容将是 【8】 。 Private Sub Form_Load（) Show Text1.Text=" " Text2.Text=" " Text2.SetFocus End Sub Private Sub Text2_KeyPress（Key 清除文本框Text1中选中内容的代码是：Text1.SelText="" 文本框具有滚动条属性（） 在窗体上画一个名称为Text1的文本框和名称为HScrolll的水平滚动条（Max属性为 10，Min属性为0)，然后画两个标题分别为“慢”和“快”的标签。程序运行后，移动滚动块，如果滚动块位于滚动条的正中间位置，则在文本框中显示“适中”；如果滚动块位于滚动条的正中间位置的左侧，则在文本框中显示“慢”；如果滚动块位于滚动条的正中间位置的右侧，则在文本框中显示“快”，如下图所示。请填空。 Priva 设窗体上有一个文本框Text1和一个命令按钮Command1，并有以下事件过程：程序执行时，在文本框中输入“Basic”，然后单击命令按钮，则Text1中显示的是（） 文本框Text1中有选定的文本，执行Text1.SelText=”Hello”的结果是（） 在窗体上画两个名称分别为Text1、Text2的文本框。Text1的Text属性为“Database”， 如图所示。现有如下事件过程： Private Sub Text1_Change（)Text2.Text=Mid（Text1,1,1)End Sub运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是：（）。 当ScrollBars属性的值为 ______ 时，给文本框同时加水平滚动条和垂直滚动条。 窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下：Private Sub Text1_KeyUp（KeyCode As Integer，Shift As Integer)Dim c As Stringc=UCase（Chr（KeyCode))Text2.Text=Chr（Ase（c)+2)End Sub当向文本框Text1中输入小写字母a时，文本框Text2 在窗体中有一个命令按钮Command1和一个文本框Text1，编写事件代码如下：打开窗体运行后，单击命令按钮，文本框Text1输出的结果是（） 在窗体上有三个控件：名称为Label1的标签控件、名称为Text1的文本框控件和名称为Hscroll1的水下滚动条控件。程序的功能是通过滚动条移动Label1，并把滚动条的值显示在文本框中。滚动条的值作为Label1的Left属性。程序运行时的界面如右图所示。Private Sub form_ Load（) HScroll1.Max = form1. Width HScroll1. Min= 0 窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyDown事件过程如下： Private Sub Text1_KeyDown（KeyCode As Integer, Shift As Integer) Dim s As String s=Chr（KeyCode+35) Text2.Text=s End Sub 当向文本框Text1中输入小写字母a时，文本框Text2中显示的是 假定窗体上有一个文本框，名为txt1，为了使该文本框的内容能够换行，并且具有垂直滚动条，没有水平滚动条正确的属性设置为 在窗体上画一个名称为Text1,的文本框和一个名称为Command1的命令按钮，然后编写以下程序代码：运行程序，单击Command1，则在文本框Text1中显示的结果为（） 在窗体上画一个文本框，其名称为Text1。为了在程序运行后Text1中的文本不可编辑，应当使用的语句是______。 在窗体上画一个文本框，名称为Text1，然后编写如下程序：程序运行后，在文本框中输入一个字符串，然后单击窗体，则文本框中的内容（） 在考生文件夹下完成如下基本操作： 1．创建名称为Form1的窗体，在该窗体上画一个文本框，名称为Text1，文本框中初始内容为Visual Basic。在文本框的右边画一个垂直滚动条，名称为VScroll1。滚动条的高度为 3000，宽度为375。在图片框的下方画一个命令按钮，名称为Command1，标题为“清除”。文本框的宽度为2000，高度为600，如图3所示。编写一个事件过程，使程序运行后，