单项选择题
在窗体上画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”键,则输出结果为( )。
点击查看答案
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim a(5)As String Fori=1 To 5 a(i)=Chr(Asc( A )+(11)) Nexti For Each b In a Print b Next End Sub 程序运行后,单击命令按钮,输出结果是( )。
A.ABCDE
B.1 2 3 4 5
C.abcde
D.出错信息
点击查看答案
单项选择题
先在窗体上添加一个命令按钮,然后编写如下程序: Function fun(ByValnum As Long)As Long Dim k As Long k=1 num=Abs(nam) Do While num k=k*(num Mod 10) num=num 10 Loop Fun=k End Function PrivateSubCommandl_Click() Dim n As Long Dim r As Long n=InrputBox(“请输入一个数”) n=CLng(n) r=-fun(n) Printr End Sub 在程序运行后,单击命令按钮,在对话框中输入“100”,输出结果是( )。
A.0
B.100
C.200
D.300
点击查看答案
相关试题
下列事件过程的功能是:通过Foma_Load事件...
For Each x In Arr
Arr=Anay(CE,DH,AE,BB,FG)
组合框有3种不同的类型,这3种类型是下拉...
下列程序是用来计算1+2+3+…+10的...