网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

在窗体上画1个文本框,其名称为Text1,然后编写如下过程:

Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)

Print Chr(KeyCode)

End Sub

Private Sub Text1_Key Up(KeyCode As Integer,Shift As Integer)

Print Chr(KeyCode+2)

End Sub

程序运行后,把焦点移到文本框中,此时如果敲击“A”

A.

B.

C.

D.


参考答案

更多 “ 在窗体上画1个文本框,其名称为Text1,然后编写如下过程:Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Text1_Key Up(KeyCode As Integer,Shift As Integer)Print Chr(KeyCode+2)End Sub程序运行后,把焦点移到文本框中,此时如果敲击“A”A.B.C.D. ” 相关考题
考题 在窗体上画1个文本框,其名称为Text1,然后编写如下过程:Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Text1_KeyUp(KeyCode As Integer,Shift As Integer)Print Chr(KeyCode+2)End Sub程序运行后,把焦点移到文本框中,此时如果敲击“A”键,则输出结果为。A.AAB.ABC.ACD.AD

考题 ( 29 )在窗体上画 1 个文本框,其名称为 Text1 ,然后编写下列过程:Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Text1_KeyUp(KeyCode As Integer,Shift As Integer)Print Chr(KeyCode+2)End Sub程序运行后,把焦点移到文本框中,此时如果敲击 A 键,则输出结果为( )。A ) AAB ) ABC ) ACD ) AD

考题 在窗体上画1个文本框,其名称为Text1,然后编写如下过程: Pfivme Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Text1_KeyUp(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+2) End Sub 程序运行后,把焦点移到文本框中,此时如果敲击“A”键,则输出结果为______。A.A AB.A BC.A CD.A D

考题 设有如下通用过程:在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如 下事件过程:End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是( )。A. 30B. 25C. 20D. 15

考题 在窗体上画一个文本框,其名称为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的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:程序运行后,单击命令按钮,在文本框中显示的值是A.2B.3C.4D.5

考题 在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下事件过程:Private Sub Form_ Lead()ShowText1.Text = " "Text2.Text = " "Text2.SetFocusEnd SubPrivate Sub Text2_ KeyDown (KeyCode As Integer, Shift As Integer)Text1.Text = Text1.Text + Chr (KeyCode - 4)End Sub程序运行后,如果在Text2文本框中输入efghi,则Text1文本框中的内容是______。

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

考题 在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl),然后编写如下事件过程:程序运行后,在文本框中输入3,然后单击命令按钮,则Y的值变为__________。