[单选题]

在窗体中添加了一个文本框和一个命令按钮(名称分别为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

参考答案与解析:

相关试题

在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text1

[单选题]在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text1和.Text2,然后编写如下程序: Private Sub Command1_Click() Dim x As String,y As String, C As String,d As String x = Text1.Text : y = TextText c = LCase(x):d = UCase(y) Print c; d End Sub 程序运行后,在文本框Texn、Text2中分别输入AbC和efG,结果

  • 查看答案
  • 在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text1

    [单选题]在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text1、Text2,然后编写如下程序: Private Sub Command1_Click() a=Text1.Text b=Text2.Text c=LCase (A)d=UCase (B)Print c;d End Sub程序运行后,在文本框Text1、Text2中分别输入AbC和Efg,结果是______ 。A.abcEFGB.abcefgC.ABCefgD.ABCEFG

  • 查看答案
  • 在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后

    [单选题]在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序:Private Sub Command1_Click()a=InputBox(“请输入日期(1~31)”)t=”旅游景点:” _& IIf ( a > 0 And a <= 10,”长城”,””) _& IIf ( a >10 And a <= 20,”故宫”,””) _& IIf ( a > 20 And a <= 31,”颐和园”,””)T

  • 查看答案
  • 在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并

    [单选题]在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:Dim SaveAll As StringPrivate Sub Form_ Load () Show Text1.Text=" " Text1.SetFocusEnd SubPrivate Sub Command1_ Click() Text1. Text=LCase(SaveAll)+SaveAllEnd SubPrivate Sub Form

  • 查看答案
  • 在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后

    [单选题]在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序:Private Sub Command1_Click()a=InputBox("请输入日期 (1~31)")t="旅游景点:"& IIf(a>0 And a<=10, "长城","") &IIf(a>10 And a<=20, "故宫","") & IIf(a>20 And a<=31, "颐和园","")Tex

  • 查看答案
  • 在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后

    [单选题]在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序:Private Sub Command1_Click()a=InputBox("请输入日期(1~31)")t="旅游景点:" &IIf(a>0 And a<=10,"长城","") & _IIf(a>10 And a<=20,"故宫","") & IIf(a>20 And a<=31,"颐和园","")Text1.Text=tE.nd Sub程序运

  • 查看答案
  • 在窗体上绘制一个命令按钮和一个文本框,名称分别为Command1和Text1,然

    [单选题]在窗体上绘制一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序: Private Sub Command1_Click() a=InputBox("请输入日期(1~31)") t="旅游景点:"_ &IIf(a>0 And a<=10,"长城:,"")_ &IIf(a>10 And a<=20,"故宫","")_ &IIf(a>20And a<=31,"颐和园:,"") Text1.Text=t End Sub

  • 查看答案
  • 在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把

    [单选题]在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程:Private Sub Command1_Click()a = InputBox("Enter an integer")b = InputBox("Enter an integer")Text1.Text = b + aEnd Sub程序运行后,单击命令按钮,如果在输入对话框中分别输入8和10,则文本框中显示的内容是( )。A.108B.18C.810

  • 查看答案
  • 在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把

    [单选题]在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() a=InputBox("Enter an integer") b=InputBox("Enter an integer") Text1.Text=b+a End Sub 程序运行后,单击命令按钮,如果在输入对话框中分别输入8和10,则文本框中显示的内容是______。A.108B.18C.810D

  • 查看答案
  • 在窗体中添加一个命令按钮(名称为Command1)和一个文本框(名为text1)

    [单选题]在窗体中添加一个命令按钮(名称为Command1)和一个文本框(名为text1),然后编写如下事件过程: Private Sub Command_Click() Dim x As Integer, y As Integer,z As Integer x=5: y=7: z=0 Me!Text1="" Call p1(x, y, z) Me!Textl=z End Sub Sub p1 (a As Integer, b As Integer, Byval c As Integer) c=a+b

  • 查看答案