【简答题】有如下事件过程 Private Sub Command1_Click() Dim a a=Array( " a " , " b " , " c " , " d " , " e " , " f " , " g " ) Print a(2); a(3); a(6) End Sub 执行程序段的结果是 。
【单选题】在窗体上有一个命令按钮,然后编写如下事件过程 Private Sub Command1 _ cickc ( ) a=InputBox('enter the first integer') b=InputBox('enter the second integer') Print b + a End Sub 程序运行后,单击命令按钮,先后在两个输入框中分别输入“2”和“6”,则输出结果为
【简答题】有如下事件过程 Private Sub Command1_Click() S=P(1)+P(2)+P(3)+P(4) Print S End Sub Public Function P(n As Integer) Static sum For i =1 To n sum=sum+i Next I P=sum End Function 单击命令按钮后,程序执行的结果是 。
【单选题】设在窗体上有个文本框,然后编写如下的事件过程 Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Const Alt=4 Const Key_F2=&H71 altdown%=(Shift And Alt) > 0 f2down%=(KeyCode=Key_F2) If altdown% And f2down% Then ...