单项选择题

下面程序运行时，若输入395，则输出结果是( )
Private Sub Command1_Click()
Dim x%
x=InputBox("请输入一个3位整数")
Print x Mod 10,x/100,(X Mod 100)/10
End Sub

A．3 9 5
B．5 3 9
C．5 9 3
D．3 5 9

<上一题目录下一题>

热门试题

单项选择题

设窗体上有一个通用对话框控件CD1，希望在执行下面程序时，打开如下图所示的文件对话框： Private Sub Command1_Click() CD1.DialogTitle= 打开文件 CD1.InitDir= C: CD1.Filter= 所有文件|*.*|Word文档|*.doc|文本文件|*.txt CD1.FileName= CD1.Action=1 If CD1.FileName= Then Print 未打开文件 Else Print 要打开文件＆CD1.FileName End If End Sub 但实际显示的对话框中列出了C: 下的所有文件和文件夹，“文件类型”一栏中显示的是“所有文件”。下面的修改方案中正确的是( )

A．把CD1.Action=1改为CD1.Action=2
B．把“CD1.FiIter=”后面字符串中的“所有文件”改为“文本文件”
C．在语句CD1.Action=1的前面添加：CD1.FilterIndex=3
D．把CD1.FileName=" "改为CD1.FileName="文本文件\

单项选择题

若在窗体模块的声明部分声明了如下自定义类型和数组： Private Type rec Code As Integer Caption As String End Type Dim arr(5)AS rec 则下面的输出语句中正确的是( )

A．Print arr.Code(2),arr.Caption(2)
B．Print arr.Code,arr.Caption
C．Print art(2).Code,arr(2).Caption
D．Print Code(2).Caption(2)

相关试题