[单选题]

在窗体中添加一个命令按钮,名称为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,结果是

A.abcEFG

B.abcefg

C.ABCefg

D.ABCEFG

参考答案与解析:

相关试题

在窗体中添加一个命令按钮,名称为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

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

    [单选题]在窗体中添加了一个文本框和一个命令按钮(名称分别为Text1和Command1),并编写了相应的事件过程。运行此窗体后,在文本框中输入一个字符,则命令按钮上的标题变为“Access模拟”。以下能实现上述操作的事件过程是( )。A.Private Sub Command1_Click() Caption="Access模拟" End SubB.Private Sub Text1_Click() Command1.Caption="Access模拟" End SubC.Private Sub

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

    [单选题]在窗体上画一个命令按钮Command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程:D.im Str1 As String,str2 As StringPrivate Sub form_load()Text1.Text=""Text2.Text=""Text1.Enabled=FalseText2.Enabled=FalseE.nd SubPrivate Sub Form_KeyPress(KeyAscii As Integer)str1=str1 & C

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

    [单选题]在窗体上画一个命令按钮command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程:D.im Str1 As String, str2 As StringPrivate Sub form_load()Text1.Text=""Text2.Text=""Text1.Enabled=FalseText2.Enabled=FalseE.nd SubPrivate Sub Form.str1=str1& Chr(KeyAscii)E.nd SubPrivate S

  • 查看答案
  • 在窗体上画—个命令按钮和—个文本框,名称分别为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=t End Sub 程序

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

    [单选题]在窗体中添加一个命令按钮,名称为Command1;添加一个文本框,名称为Text1,然后编写如下程序: Private Sub Commandl Click() Dim a(5), b(5) For j = 1 To 4 a(j) = 3 ( j b(j) = a(j) ( 3 Next j Text1.Text = b(j/2) End Sub 程序运行后,单击命令按钮,在文本框中显示A.25B.18C.36D.35

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

    [单选题]在窗体中添加一个名称为Command1的命令按钮和一个名称为text1的文本框,然后编写如下程序; ( ) Private Sub Commandl_Click() Dim x,y,z As Integer x=5:y=7:z=O Text1.Text="" Call Pl(x,y,z) TextText=Str(z) End Sub Sub P1(ByVal a As Integer, ByVal b As Integer, c As Integer) c=a+b End SubA.0B.

  • 查看答案
  • 在窗体中添加一个命令按钮(名称为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

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

    [单选题]在窗体上画一个命令按钮和两个文本框,其名称分别为Command1、Text1和Text2,然后编写如下程序: Dim S1 As String,S2 As String Private Sub Form_Load() Text1.Text="" Text2.Text="" End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) S2=S2 & Chr(Keycode) End Sub Priva

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

    [单选题]在窗体上画一个命令按钮和两个文本框,其名称分别为Command1、Text1和Text2,在属性窗V1中把窗体的KeyPreview属性设置为True,然后编写如下程序:D.im S1 As String,S2 As StringPrivate Sub Form_Load()Text1.Text=””Text2.Text=””TeXt1.Enabled=FalseText2.Enabled=FalseE.nd SubPrivate Sub Form_KeyDown(KeyCode As Inte

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