在窗体中有一个文本框Text1,编写事件代码如下: Private Sub Fo...入12,则文本框Text1中输出的结果是
2
举一反三
- 在窗体中有1个命令按钮Command1和1个文本框Text1,编写事件代码如下:Private Sub Command1_Click() For i=1 To 4 x=3 For j=1 To 3 For k=1 To 2 x=x+3 Next k Next j Next i Text1.Value=Str(x) End Sub 打开窗体运行后,单击命令按钮,文本框Text1输出的结果是
- 在窗体上添加一个文本框，其名称为text1，然后编写如下的Load事件过程，则该程序的运行结果是______。Private Sub form_ load Text1. Text = " " t = 1 for k = 10 To 6 Step -2 t= t* k Next k Text1. Text = tEnd Sub A: 在文本框中显示120 B: 文本框中仍为空 C: 在文本框中显示480 D: 出错
- 在窗体中有1个命令按钮Command1和1个文本框Text1，编写事件代码如下： Private Sub Command1_Click() x = 3 For i = 1 To 4 x = x + 3 Next i Text1.Value =Str(x) End Sub 打开窗体运行后，单击命令按钮，文本框Textl输出的结果是（ ）。
- 在窗体上画4个文本框，并用这4个文本框建立一个控件数组，名称为Text1(下标从0开始，自左至右顺序增大)，然后编写如下事件过程： Private Sub Command1_Click() For Each TextBox In Text1 Text1(i).Text＝Text1(i).Index i＝i＋1 Next End Sub 程序运行后，单击命令按钮，4个文本框中显示的内容分别为( )。
- 窗体上有文本框Text1，编写如下事件过程，运行时，向文本框输入字符“y”，输出的数值是（ ）。 Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print KeyCode End Sub
内容
- 0
在窗体中添加一个命令按钮command1两个文本框text1和text2然后编写如下程序private sub
- 1
窗体上有1个名称为Text1、内容为空的文本框。编写如下事件过程： Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer) Print Text1. Text; End Sub 运行程序，并在文本框中输入“123”，则在窗体上的输出结果为( )。 A: A) 123 B: B) 112 C: C) 12123 D) 112123
- 2
在窗体上画一个命令按钮和一个文本框，名称分别为Command1和Text1，然后编写如下程序： Private Sub
- 3
在窗体上添加一个文本框，名称为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
- 4
在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下事件过程： Private Sub Form_Load() Show Textl.Text="" Text2.Text="" Text2.SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer，Shift As Integer) Textl.Text=Textl.Text+Chr(KeyCode-4) End Sub 程序运行后，如果在Text2文本框中输入“efghi”，则Text1文本框中的内容为 【11】 。