单项选择题
有如下事件过程: Private Sub Commaild1_Click( ) Dim i As Integer For i =1 To 2 DC Next i End Sub Sub DC( ) Dim x As Integer,m As String Static y,n x=x + 1 y=y + 1 m=m&"*":n=n &"#" Print x,y,m,n End Sub 程序运行后,输出的结果是( )。
A. 1 1 * # 1 1 * #
B. 1 1 * # 1 2 * #
C.1 1 * # 1 1 * ##
D. 1 1 * # 1 2 * ##
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上面1个名称为Command1的命令按钮,然后编写如下事件过程Option Base 1Private Sub Command1_Click()Dim a (5,5) As IntegerFor i=1 to 5For j = 1 to 5A ( i ,j)=(i+j)85 10Next jNext iS=0For i=1 to 5S=s+a(i,i)Next iPrint sEnd sub 程序运行后,单击命令按钮,输出结果是【 】
A.15
B.13
C.11
D.9
点击查看答案&解析
单项选择题
有如下事件过程,当同时按下转换键Shift和功能键F5时其最后输出的信息是( )。Const ShiftKey=1Const CtrlKey=2Const Key_F5=&H74Const Key_F6=&H75Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)If KeyCode=Key_F5 And Shift=ShiftKey ThenPrint Press Shift+F5 ElseIf KeyCode=Key_F6 And Shift=CtrlKey ThenPrint Press Ctrl+F6 End IfEnd Sub
A. 无任何信息
B. Press Shift+F5
C. Press Ctrl+F6
D. 程序出错
点击查看答案&解析
相关试题
如果存在如下过程:Private Function FMa...
要使标签的背景样式为不透明,应将BackStyl...
下述语句段在运行时的显示结果是【 】。Ci...
在E盘当前目录文件夹下建立一个名为“Stude...
执行下面的程序段,x的值为【 】。 Priva...