A.aaa
B.AAA
C.AA
D.aa
[单选题]在窗体上面有一个文本框,其名称为Text1,然后编写如下事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String str=Chr(KeyAscii) KeyAscii=Asc(UCase(str)) TextText=String(2,KeyAscii) End Sub 程序运行后,如果在键盘上输入字母“a”,则在文本框Text1中显示的内容为( )。A.aaaB.AAAC.AAD.aa
[单选题]在窗体上画一个文本框,其名称为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 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
[单选题]在窗体上有一个文本框,其名称为Text1,编写下列事件过程:Private Sub Text1_KeyPress(KeyAscii As Integer)D.im str As Stringstr=Chr(KeyAscii)KeyAscii=Asc(UCase(str))Text1.Text=Stririg(2,KeyAscii)E.nd Sub程序运行后,如果在键盘上输入字母“a”,则在文本框Text3中显示的内容为( )。A.aaaB.AAAC.AAD.aa
[单选题]在窗体上画一个名称为Text1的文本框,然后编写如下事件过程: Private Sub Text1_ KeyPress (KeyAscii As Integer) Dim ch As String ch = Chr (KeyAscii) KeyAscii = Asc (UCase(ch)) TextText = String(1, KeyAscii) End Sub程序运行后,使文本框拥有焦点,然后按键盘上的B键,则在文本框中显示的内容是 ______。A.bB.bbC.BBD.B
[单选题]在窗体上一个文本框,其名称为Text1,然后编写如下事件过程:PrivateSubText2_KeyPress(KeyAsciiAsInteger)D.imstrAsString,nAsIntegerstr=Ucase(Chr(KeyAscii))n=Len(str)Text1=String(n,str)E.ndSub程序运行后,如果在TEXT2中通过键盘上输入单字母"k",则在文本框Text1中显示的内容为( )A.kB.KC.KKD.Kk
[单选题]在窗体上画1个文本框,其名称为Text1,然后编写如下过程:Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)Print Chr(KeyCode)E.nd SubPrivate Sub Text1_Key Up(KeyCode As Integer,Shift As Integer)Print Chr(KeyCode+2)E.nd Sub程序运行后,把焦点移到文本框中,此时如果敲击“A”A.B.C.D.
[单选题]在窗体上画一个名称为Text1的文本框,然后编写如下的事件过程: Private Sub Text1_KeyPress(Keyascii As Integer) ... End Sub 若焦点位于文本框中,则能够触发此事件的操作是( )。A.左键单击文本框B.左键双击文本框C.右键单击文本框D.按下键盘上的某个键
[单选题]在窗体上面一个名称为TxtA的文本框,然后编写如下的事件过程: Private Sub TxtA_KeyPress(KeyAscii as Integer) … End Sub 若焦点位于文本框中,则能够触发KeyPress事件的操作是______。A.单击鼠标B.双击文本框C.鼠标滑过文本框D.按下键盘上的某个键
[单选题](17)在窗体上有一个文本框,其名称为Text1,编写下列事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer ) Dim str As String Str=Chr(KeyAscii) KeyAscii=Asc(UCase(str)) Text1.Test=String(2,KeyAscii) End Sub 程序运行后,如果在键盘上输入字母“a”则在文本框Text3中显示的内容为 A.aaa B.AAA C.AA D.aa