假定一个表单里有一个文本框Text1和Command1、Command2两个命令按钮，如果要在Command1命令按钮的某个方法中访问文本框的Value属性值，下面______式子是正确的是

A．This.ThisForm.Text1.Value

B．ThisForm.Text1.Value

C．Parent.Parent.Text1.Value

D．This.parent.Text1.Value

[单选题]假定一个表单里有一个文本框Text1和一个命令按钮组Command Group1。命令按钮组是一个容器对象，其中包含Command1和Command2

[单选题]假设在一个表单里有一个文本框Text1和一个命令按钮组CommandGroup1。命令按钮组是一个容器对象，其中包含command1和command2

[单选题]（ 24 ）窗体上有一个 Text1 文本框，一个 Command1 命令按钮，并有以下程序Private Sub Commandl_Click （）D．im nIf Text1.Text<> " 23456 " Thenn=n ＋ 1Print " 口令输入错误 " & n & " 次 "E．nd IfE．nd Sub希望程序运行时得到左图所示的效果，即：输入口令，单击 “ 确认口令 ” 命令按钮 ， 若输入的口令不是 “ 123456 ” ，则在窗体上

[单选题]在窗体上画两个文本框Text1和Text2，一个命令按钮Command1，请阅读以下程序段： Private Sub Command1_Click() x=0 Do Until x＞=50 x=(x+4)*(x+3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x) End Sub 运行程序后，单击命令按钮，在两个文本框中显示的值分别为( )。A．1和0B．2和240C．3和50D．4和168

[单选题]在窗体上画两个文本框Text1和Text2，一个命令按钮Command1，请阅读下列程序段： Private Sub Command1_Click() x=0 Do Until x>=50 X=(x+4)﹡(x＋3) N=n+1 Loop Text1.Text＝Str(n) Text2.Text＝str(x) End Sub运行程序后，单击命令按钮，在两个文本框中显示的值分别为A. 1和0 B. 2和240 C. 3和50 D. 4和168

[单选题]窗体上有两个文本框Text1、Text2以及一个命令按钮Command1，编写下列程序：D．im y As IntegerPrivate Sub Command1_Click()D．im x As Integerx=2Text1.Text=p2(p1(x),y)Text2.Text=p1(x)E．nd SubPrivate Function p1(x As Integer)As Integerx=x+y:y=x+yp1=x+yE．nd FunctionPrivate Function p2(x

[单选题]窗体上有两个文本框Text1、Text2以及一个命令按钮Command1，编写下列程序： Dim y As IntegerPrivate Sub Command1_Click()Dim x As Integer x=2 Text1.Text=p2(p1(x), y) Text2.Text=pi(x)End SubPrivate Function p1(x As Integer) As Integer x=x+y:y=x+y p1=x+yEnd FunctionPrivate Function p

[单选题]（ 33 ）在窗体中有一个命令按钮 command1 和一个文本框 text1, 编写事件代码如下：Private sub command1_click()F．or i=1 to 4X=3F．or j=1 to 3F．or k=1 to 2X=x+3Next kNext jNext iText1.value=str(x)E．nd sub打开窗体运行后，单击命令按钮，文本框 text1 输出的结果是A． ） 6B． ） 12C． ） 18D． ） 21

[单选题]在窗体下画两个文本框Text1和Text2，一个命令按钮Command1，请阅读下列程序段：Private Sub Command1_Click()x=0D．o Until x＞=50x=(x+4)*(x+3)n=n+1LoopText1.Text=Str(n)Text2.Text=Str(x)E．nd Sub运行程序后，单击命令按钮，在两个文本框中显示的值分别为( )。A．1和0B．2和240C．3和50D．4和168

[单选题]窗体上有Text1、Text2两个文本框及一个命令按钮Command1，编写下列程序：D．im y As IntegerPrivate Sub Command1_Click()D．im x As Integerx=2Text1.Text=Fun2(Fun1(x),y)Text2.Text=Fun1(x)E．nd SubPrivate Function Fun1(x As Integer) As Integerx=x+y:y=x+yF．un1=x+yE．nd FunctionPrivate Fun