[单选题]

在窗体上画一个文本框(Textl),然后编写如下事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(Ucase(char)) Print String(4,KeyAscii) End Sub 程序运行后,在文本框Text1中输入A,则程序在窗体上的输出结果为

A.a

B.A

C.aaaa

D.AAAA

参考答案与解析:

相关试题

在窗体上画一个文本框,然后编写如下事件过程:Private Sub Text1_

[单选题]在窗体上画一个文本框,然后编写如下事件过程:Private Sub Text1_ KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char)) Text1. Text= String(6,KeyAscii)End Sub程序运行后,如果在键盘上输入字母“a”,则文本框中显示的内容为______。A.aB.AC.aaaaaaaD.AAAAAAA

  • 查看答案
  • 在窗体上画一个文本框,然后编写如下事件过程:Private Sub Form_C

    [单选题]在窗体上画一个文本框,然后编写如下事件过程: Private Sub Form_Click() x=InputBox("请输入一个整数") Print x+Text1.Text End Sub 程序运行时,在文本框中输入456,然后单击窗体,在输入对话框中输入123,单击“确定”按钮后,在窗体上显示的内容为______。A. 123B.456C.479D.123456

  • 查看答案
  • 在窗体上画一个文本框,然后编写如下事件过程:Private Sub Text1_

    [单选题]在窗体上画一个文本框,然后编写如下事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(UCase(char)) Text1.Text=String(6,KeyAscii) End Sub 程序运行后,如果在键盘上输入字母“a”,则文本框中显示的内容为 ______。A.aB.AC.aaaaaaaD.AAAAAAA

  • 查看答案
  • 在窗体上画一个文本框,然后编写如下事件过程:Private Sub Text1_

    [单选题]在窗体上画一个文本框,然后编写如下事件过程: Private Sub Text1_KeyPress(Key Ascii As Integer) Dim char As String char=Chr(Key Ascii) KeyAscii=Asc(UCase(char)) Text1.Text=Sting(6,KeyAscii) End Sub 程序运行后,如果在键盘上输入字母“a”,则文本框中显示的内容为______。A.aB.AC.aaaaaaaD.AAAAAAA

  • 查看答案
  • 在窗体中有一个文本框Textl,编写事件代码如下:Private Sub For

    [单选题]在窗体中有一个文本框Textl,编写事件代码如下:Private Sub Form. Cl ick() ’X=val(Inputbox(“输入X的值”))Y=1If X<>0 Then Y:2Textl.Value=YE.nd Sub打开窗体运行后,在输入框中输入整数12,文本框Textl中输出的结果是A.1B.2C.3D.4

  • 查看答案
  • 在窗体上画一个名称为 TxtA 的文本框,然后编写如下的事件过程:Private

    [单选题]在窗体上画一个名称为 TxtA 的文本框,然后编写如下的事件过程:Private Sub TxtA_KeyPress(KeyAscii As Integer)……E.nd Sub假定焦点已经位一地文本框中,则能够触发 KeyPress 事件的操作是( )。 A.单击鼠标B.双击文本框C.鼠标滑过文本框D.按下键盘上的某个键

  • 查看答案
  • 在窗体上画一个名称为TxtA的文本框,然后编写如下的事件过程: Private

    [单选题]在窗体上画一个名称为TxtA的文本框,然后编写如下的事件过程: Private Sub TxtA_KeyPress(keyaseii as integer) …… End Sub 若焦点位于文本框中,则能够触发KeyPress事件的操作是A.单击鼠标B.双击文本框C.鼠标滑过文稿本框D.按下键盘上的某个键

  • 查看答案
  • 在窗体上画一个文本框,其名称为Text1,然后编写如下事件过程: Private

    [单选题]在窗体上画一个文本框,其名称为Text1,然后编写如下事件过程:Private Sub Text1_KeyPress(KeyAscii As Integer)D.im str As StringStr=Chr(KeyAscii)KeyAscii=Asc(UCase (str))Textl.Text=String(2, KeyAscii)E.nd Sub程序运行后,如果在键盘上输入字母"b",则在文本框Text1中显示的内容是A.bbbB.BBBC.BBD.bb

  • 查看答案
  • 在窗体上画一个文本框,其名称为Text1,然后编写如下事件过程:Private

    [单选题]在窗体上画一个文本框,其名称为Text1,然后编写如下事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) Dim sb As String Str=Chr(KcyAscii) KeyAscii=Asc(UCase(str)) Text1.Text=String(2,KeyAscii) End Sub 程序运行后,如果在键盘上输入字母“b”,则在文本框Text1中显示的内容是A.bbbB.BBBC.BBD.bb

  • 查看答案
  • 在窗体上画一个名称为TxtA的文本框,然后编写如下的事件过程:Private S

    [单选题]在窗体上画一个名称为TxtA的文本框,然后编写如下的事件过程: Private Sub TxtA_KeyPress(KeyAscii As Integer) …… End Sub 假定焦点已经位于文本框中,则能够触发KeyPress事件的操作是______。A.单击鼠标B.双击文本框C.鼠标滑过文本框D.按下键盘上的某个键

  • 查看答案
  • 在窗体上画一个文本框(Textl),然后编写如下事件过程:Private Sub