把窗体的KeyPreview属性设置为True,然后编写如下过程: Private SubForm_KeyDown(KeyCode As Integer,Shift As Integer) PrintChr (KeyCode) End Sub Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer) PrintChr(KeyCode+2) End Sub 程序运行后,如果按“A”键,则输出结果为 ______。A.A AB.A BC.A CD.A D

把窗体的KeyPreview属性设置为True,然后编写如下过程: Private SubForm_KeyDown(KeyCode As Integer,Shift As Integer) PrintChr (KeyCode) End Sub Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer) PrintChr(KeyCode+2) End Sub 程序运行后,如果按“A”键,则输出结果为 ______。

A.A A

B.A B

C.A C

D.A 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

把窗体的KeyPreView属性设置为True,并编写如下两个事件过程:Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)Print KeyCodeEnd SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print KeyAsciiEnd Sub程序运行后,如果按下B键,则在窗体上输出的数值是 【12】 和 【13】 。

在窗体上画一个命令按钮Command1和两个文本框,名称分别为Text 1和 Text 2 Text 2。编写如下两个事件过程: Dim str As String, strl As String Private Sub form_load() TextText = " " TextText = " " TextEnabled = False TextEnabled = False End Sub Private Sub Form. KeyPress(KeyAscii As Integer) str= strChr(KeyAscii) End Sub Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) str1 = strlChr(KeyCode) End Sub Private Sub Command1_Click() TextText =str TextText = str1 str= " " str1= " " End Sub 当在设计阶段把窗体KeyPreview属性设置为True时,程序运行过程中,在键盘上输入小写字母abc,然后单击命令按钮,则文本框Text1中显示的内容为 ______ 。A.abcB.不显示任何信息C.ABCD.出错

在窗体上画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

把窗体的KeyPreview属性设置为Tree,然后编写如下事件过程 Private Sub Form_KeyPress(KeyAscii As Integer) Dim ch As String ch=Chr(KeyAscii) KeyAscii=Asc(UCase(ch)) Print Chr(KeyAscii+2) End Sub 程序运行后,按键盘上的“A”键,则在窗体上显示的内容是______。A. AB.BC.CD.D

把窗体的KeyPreview属性设置为True,然后编写如下事件过程Private Sub Form_KeyPress(KeyAscii As Integer)Dim ch As Stringch = Chr(KeyAscii)KeyAscii = Asc(UCase(ch))Print Chr(KeyAscii + 2)End Sub程序运行后,按键盘上的“A”键,则在窗体上显示的内容是( )。A.AB.BC.CD.D

在窗体上画一个命令按钮和一个文本框,并将窗体的KeyPreview属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Form_Load() Show Text1.Text=" " Text1.SetFocus End Sub Private Sub Command1_Click() Text1.Text = Ucase(SaveAll) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii) End Sub 程序运行后,在键盘上输入abcdefg,单击命令按钮,则文本框中显示的内容为A.abcdefgB.不显示任何信息C.ABCDEFGD.出错

把窗体的KeyPreview属性设置为True,并编写如下两个事件过程:Private Sub Form_KeyDown(KcyCode As Integer,Shift As Integer)Print Key Code;End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print Key AsciiEnd Sub程序运行后,如果按下A键,则在窗体上输出的数值为【 】和【 】。

为了在运行时能显示窗体左上角的控制菜单框,必须 ______。A.把窗体的Visible属性设置为TrueB.把窗体的Visible属性设置为FalseC.把窗体的Conbolbox属性设置为FalseD.把窗体的Contolbox属性设置为True

把窗体的KeyPreview属性设置为True,然后编写如下事件过程: Prirate Sub Form_KeyPress(KeyAscii As Integer) Dim ch As String ch=Chr(KeyAscii) KeyAscii=Asc(UCase(ch)) Print Chr(KeyAscii+2) End Sub 程序运行后,按键盘上的A键,则在窗体上显示的内容是A.AB.BC.CD.D

在窗体上画一个命令按钮和一个文本框,并把窗体的KeyPreview属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Command1_Click() Text1.Text=UCase(SaveAll) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAseii) End Sub 程序运行后,在键盘上输入“abcdefg”,单击命令按钮,则文本框中显示的内容为 ______ 。A.abcdefgB.不显示任何信息C.ABCDEFGD.出错

设有如下过程: Private Sub Form. KeyDpwn(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form. KeyUp(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+2) End Sub 若把窗体的KeyPreview属性设置为True,程序运行后,如果按“A”键,则输出结果为( )。A. A AB. A BC. A CD. A D

为了在运行时能显示窗体左上角的控制菜单框(系统菜单),必须______ 。A.把窗体的ControlBox属性设置为FalseB.把窗体的ControlBox属性设置为TrueC.把窗体的MaxButton属性设置为FalseD.把窗体的MaxButton属性设置为True

在名称为Forml的窗体上绘制一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程:Private SUb Form_CnCk()Open"d:\tes\smtext1.txt"For Input AS 1Do While Not EOF(1)Line Iput 1,aspect$whole$=whole$+aspect$+Chf$(13)+Chr$(10)Loop

在窗体上画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.

为了在运行时能显示窗体左上角控制框(系统菜单),必须 ______。A.把窗体的ConlrolBox属性设置为False,其他属,陛任意B.把窗体的ConlrolBox属性设置为True,并且把BorderStyle属性设置为1-3C.把窗体的ControlBox属性设置为False,同时把BorderStyle属性设置为非0值D.把窗体的ConlrolBox属性设置为True,同时把BorderStyle属性设置为0值

把窗体的KeyPreview属性设置为True,然后编写如下过程: Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyUp(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+2) End Sub 程序运行后,如果按“A”键,则输出结果为 ______。A.A AB.A BC.A CD.A D

为了在运行时能显示窗体左上角的控制框(系统菜单),必须 ______。A.把窗体的ControlBox属性设置为False,其他属性任意B.把窗体的ControlBox属性设置为True,并且把BorderStyle属性设置为1~3C.把窗体的ControlBox属性设置为False,同时把BoroderStyle属性设置为非0值D.把窗体的ControlBox属性设置为True,同时把BorderStyle属性设置为0值

为了在运行时能显示宙体左上角的控制框(系统菜单),必须______ 。A.把窗体的ControlBox属性设置为False,其他属性任意B.把窗体的ControlBox属性设置为True,并且把BoderStyle. 属性设置为1-5C.把窗体的ControlBox属性设置为False,同时把BoderStyle属性调协为非0值D.把窗体的ControlBox属性设置为True,同时把BoderStyle属性设置为0值

为了在运行时能显示窗体左上角的控制框(系统菜单),必须______。A.把窗体的Conlro1Box属性设置为False,其他属性任意B.把窗体的Como1Box属性设置为True,并且把Bader Style属性设置为1~3C.把窗体的Comdex属性设置为False,同时把Border Style属性设置为非0值D.把窗体的Cznmo1Box属性设置为True,同时把Border Style属性设置为0值

把窗体的Key Preview属性设置为True,然后编写如下过程: Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyUp(KeyVode As Integer, ShiftAs Integer) Print Chr(KeyCode+2) End Sub 程序运行后,如果按“A”键,则输出结果______。A.AB.AC.AD.A A B C D

在窗体上画一个命令按钮和两个文本框,其名称分别为Command1、Text1和Text2,在属性窗口中把窗体的KeyPreview属性设置为True,然后编写如下程序: Diln S1 As String,S2 As String Private Sub Form. Load( ) Text1.Text="" Text2.Text="" Text1.Enabled=False Text2.Enabled=False End Sub Private Sub Form. KeyDown(KeyCode As Integer,Shift As Integer) S2=S2&Chr(KeyCode) End Sub Pri vate Sub Form. KeyPress(KeyAscii As Integer) S1=S1&Chr(KeyAscii) End Sub Private Sub Command1 Click( ) Text1.Text=S1 Text2.Text=S2 S1="" S2="" End Sub 程序运行后,先后按“a”、“b”、“c”键,然后单击命令按钮,在文本框Text1和Text2中显示的内容分别为( )。A.abc和ABCB.空白C.ABC和abcD.出错

把窗体的KeyPreview属性设置为True,然后编写如下事件过程(KeyAscii As Integer)Dim ch As Stringch = Chr(KeyAscii)KeyAscii = Asc(UCase(ch))Print Chr(KeyAscii + 2)程序运行后,按键盘上的“A”键,则在窗体上显示的内容是( )。A.AB.BC.CD.D

将窗体的KeyPreview属性设置为True,然后编写如下过程: Private Sub Form. KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_KeyUp(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+2) End Sub 程序运行后,如果按“A”键,则输出的结果为A.A AB.A BC.A CD.A D

在窗体上画一个名为Command1的命令按钮和一个名为Text1的文本框,并把窗体的 KeyPreview 属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Form_ Load () Show Text1.Text = " " TextSetFocus End Sub Private Sub Command1 Click() TextText= LCase(SaveAll) End Sub Private Sub Form_ KeyPress (KeyAscii As Integer) SaveAll = SaveAll + Chr(KeyAscii) End Sub程序运行后,在键盘上输入ABCDEFG,单击命令按钮,则文本框中显示的内容为 ______。A.abodefgB.不显示任何信息C.ABCDEFGD.出错

为了在运行时能显示窗体左上角的控制框(系统菜单),必须()。A、把窗体的Control Box属性设置为False,其他属性任意B、把窗体的Control Box属性设置为True,并且把Border Style属性设置为数值1到5之一C、把窗体的Control Box属性设置为False,同时把Boder style属性设置为非0值D、把窗体的Control Box属性设置为True,同时把Boder Style属性设置为0值