单项选择题

下列程序段的执行结果为
m=1
n=1
Select Case m
Case 1
Select Case n
Case 0
print "A"
Case 1
Print "B"
End Select
Case 2
Print "C"
End Select

A.A
B.B
C.C
D.0
<上一题 目录 下一题>
热门 试题

单项选择题
有如下程序。 Private Sub Command1_Click() Dim k As Integer,m As Integer Dim op As Integer k=4:m=1 Op=PPC(k,m):Print op; Op=PPC(k,m):Print op End Sub Private Function PPC(a As Integer,b As Integer) Static m As Integer,i As Integer m=0:i=2 i=i+m+1 m=i+a+b PPC=m End Function 程序运行后,输出的结果为
A.4 6
B.6 6
C.8 8
D.10 12
单项选择题
在窗体上画一个通用对话框,其名称为CommonDialogl,然后画一个命令按钮,并编写如下事件过程。 Private Sub Command1_Click() CommonDialog1.Flags=vbOFNHideReadOnly CommonDialog1.Filter= All Files(*.*)|*.*|Text Files(*.txt)|*.txt CommonDialog1.FilterIndex=1 CommonDialog1.ShowOpen MsgBox CommonDialog1.FileName End Sub 程序运行后,单击命令按钮,将显示一个“打开”对话框,此时在“文件类型”框中显示的是
A.All Files(*.*)
B.Text Files(*.txt)
C.*.txt
D.All Files(*.*)|Text Files(*.*)
相关试题
  • 可以在常量的后面加上类型说明符以显示常量...
  • 关于Visual Basic“方法”的概念错误的是
  • 在Visual Basic中,要将一个窗体从内存中...
  • 设有下面的循环。 i=1 Do i=i+3 P...
  • 下列选项中,不属于模块间耦合的是