单项选择题

设有如下事件过程：Private Sub Command1_Click()　　For i＝1 To 5　　　　j＝i　　　　Do　　　　　　Print "*"　　　　　　j＝j－1　　　　Loop Until j＝0　　Next iEnd Sub运行程序，输出"*"的个数是(　　)。

A．5
B．15
C．20
D．25
<上一题 目录 下一题>
热门 试题

单项选择题
编写如下程序：Private Sub Command1_Click() Dim i As Integer， j As Integer n＝InputBox( 输入一个大于1的正整数 ) For i＝2 To n For j＝2 To Sqr(i) If i Mod j＝0 Then Exit For Next j If j>Sqr(i)Then Print i Next iEnd Sub该程序的功能是( )。
A．判断n是否为素数
B．输出n以内所有的奇数
C．输出n以内所有的偶数
D．输出n以内所有的素数
单项选择题
窗体上有一个名称为CD1的通用对话框，一个名称为Command1的命令按钮，相应的事件过程如下：Private Sub Command1_Click() CD1.Filter＝ All File|*.*|Text File|*.txt|Word|*.Doc CD1.FilterIndex＝2 CD1.FileName＝ E： Test.ppt CD1.InitDir＝ E： CD1.ShowOpenEnd Sub关于上述程序，以下叙述中正确的是( )。
A．初始过滤器为"*.*"
B．指定的初始目录为"E："
C．以上程序代码实现打开文件的操作
D．由于指定文件类型是.ppt，所以导致打开文件的操作失败
相关试题