网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
在窗体中添加了一个文本框和一个命令按钮(名称分别为Text1和Command1)，并编写了相应的事件过程。运行此窗体后，在文本框中输入一个字符，则命令按钮上的标题变为“Access模拟”。以下能实现上述操作的事件过程是( )。
A．Private Sub Command1_Click() Caption="Access模拟" End Sub
B．Private Sub Text1_Click() Command1.Caption="Access模拟" End Sub
C．Private Sub Command1_Change() Caption="Access模拟" End Sub
D．Private Sub Text1_Change() Command1.Caption="Access模拟" End Sub
参考答案
更多 “ 在窗体中添加了一个文本框和一个命令按钮(名称分别为Text1和Command1)，并编写了相应的事件过程。运行此窗体后，在文本框中输入一个字符，则命令按钮上的标题变为“Access模拟”。以下能实现上述操作的事件过程是( )。A．Private Sub Command1_Click() Caption="Access模拟" End SubB．Private Sub Text1_Click() Command1.Caption="Access模拟" End SubC．Private Sub Command1_Change() Caption="Access模拟" End SubD．Private Sub Text1_Change() Command1.Caption="Access模拟" End Sub ” 相关考题
考题
在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Labell，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Labell.Caption=Str(x) End Sub 程序运行后，在文本框中输入28.653，单击命令按钮，标签中显示的内容是 ______。A．27B．28C．29D．30
考题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编如下事件过程：Private Sub Command1_Click()Dim i As Integer, n As Integern=0For i=0 To 50i=i+3n=n+1If i＞10 Then Exit ForNext iText1.Text=Str(n)End Sub程序运行后，单击命令按钮，在文本框中显示的值是______。
考题
在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Labe11，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(TextText)+0.5) LabeCaption=Str(x) End Sub 程序运行后，在文本框中输入653，单击命令按钮，标签中显示的内容是______。A．27B．28C．29D．30
考题
在窗体上面显示一个名称为Text1的文本框和一个名称为Command1的命令按钮，编写如下事件过程： Private Sub Command1_Click() Text1.Text="Visual" ME．Text1="Basic" Text1="Program" End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是______。A．VisualB．BasicC．ProgramD．出错
考题
设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如 下事件过程：End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）。A. 30B. 25C. 20D. 15
考题
在窗体中添加了一个文本框和一个命令按钮（名称分别为Textl和Commandl），并编写了相应的事件过程。运行此窗体后，在文本框中输入一个字符，则命令按钮上的标题变为"Access模拟”。以下能实现上述操作的事件过程是（ ）。A.Private Sub Commandl．Click（ ） Caption=”Access模拟”Commandl．B.Private Sub Textl click（ ） Caption=”Access模拟”EndSubEndSubC.Private SUb Commandl Change（ ） Caption=”Access模拟”Commandl．D.Private Sub Textl_Change（ ） Caption=”Access模拟”End SubEnd Sub
热门标签
最新试卷