( 13 )设在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框。要求单击 Command 1按钮时可把光标移到文本框中。下面正确的事件过程是A ) Private Sub Command1_Click()Text1.GotFocusEnd SubB ) Private SubCommand1.GotFocusEndSubC ) Private Sub Command1_Click()Text1.SetFocusEnd SubD ) Private SubCommand1.SetFocusEnd Sub

( 13 )设在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框。要求单击 Command 1

按钮时可把光标移到文本框中。下面正确的事件过程是

A ) Private Sub Command1_Click()

Text1.GotFocus

End Sub

B ) Private Sub

Command1.GotFocus

EndSub

C ) Private Sub Command1_Click()

Text1.SetFocus

End Sub

D ) Private Sub

Command1.SetFocus

End Sub


相关考题:

在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框。程序运行后, Command1 为禁用(灰色),此时如果在文本框中输入字符,则命令按钮 Command1 变为可用。请填空。Private Sub Form_Load()Command1  Enabled=FalseEnd SubPrivate Sub Text1_ ________ ()Command1  Enabled=TrueEnd Sub

( 7 ) 在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框 。 程序运行后 , Command 1为禁用(灰色),此时如果在文本框中输入字符,则命令按钮 Command1 变为可用。请填空。Private Sub Form_Load()Command1.Enabled = FalseEnd SubPrivate Sub Text1_ 【 7 】 ()Command1.Enabled = TrueEnd Sub

窗体上有一个名称为Text1的文本框和一个名称为Command1、标题为“计算”的命令按钮,如图所示。函数fun及命令按钮的单击事件过程如下,请填空。Private Sub Command1_Click()Dim x As Integerx=Val(InputBox(“输入数据”))Text1=Str(fun(x)+fun(x)+fun(x))End SubPrivate Function fun(ByRef n As Integer)Ifn Mod 3=0 Thenn=n+nElsen=n*nEnd If________=nEnd Function当单击命令按钮,在输入对话框中输入2时,文本框中显示的是_______。

在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1),然后编写如下事件过程:打开窗体运行后,单击命令按钮,文本框中显示的内容是( )。

在窗体上面显示一个名称为Text1的文本框和一个名称为Command1的命令按钮,编写如下事件过程: Private Sub Command1_Click() Text1.Text="Visual" ME.Text1="Basic" Text1="Program" End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的是______。A.VisualB.BasicC.ProgramD.出错

窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮,要求程序运行时,单击命令按钮(如图1所示),就可以把文本框中的内容写到文件Out.txt中,每次写 入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是( )。

设有如下通用过程:在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如 下事件过程:End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是( )。A. 30B. 25C. 20D. 15

在窗体上画二个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:程序运行后,单击命令按钮,在文本框中显示的值是A.2B.3C.4D.5

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的是A. VisualB.BasicC.ProgramD.出错