单项选择题

对窗体编写如下代码,当程序运行后,按回车键,输出结果为 ______。
Option Base 1
Private Sub Form KeyPress(KeyAscii As Integer)
a = Array(237,126,87,48,498)
m1 = all)
m2= 1
If KeyAscii = 13 Then
For i = 2 To 5
If a(i)>m1 Then
m1 = a(j)
m2= i
End If
Next i
End If
Print m1
Print m2
End Sub

A.48
4
B.237
1
C.498
5
D.498
4
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Text1的文本框,并编写如下程序: Private Sub Form_Load( ) Show Text1. Text = Text1. SetFocus End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y _ As Single) Print 程序设计 End Sub Private Sub Text1_Ke!tDown(KeyCode As Integer,Shift As Integer) Print Visual Basic ; End Sub 程序运行后,如果按A键,然后单击窗体,则在窗体上显示的内容是 ______。
A.Visual Basic
B.程序设计
C.A程序设计
D.Visual Basic程序设计
单项选择题
下列对话框有关属性中,用于设置初始的文件目录并返回用户选择的目录的属性是 ______。
A.InitDir
B.DialogTitle
C.Filter
D.FileName
相关试题
  • 在窗体上画一个命令按钮,然后编写如下代码...
  • 在窗体上画一个名称为Command1 的命令按...
  • 在窗体上画一个命令按钮,名称为Command1...