单项选择题
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写 如下事件过程: Private Sub Command1_Click() n = Val(Text1.Text) 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 i End Sub 该事件过程的功能是
A.输出n以内的奇数
B.输出n以内的偶数
C.输出n以内的素数
D.输出n以内能被j整除的数
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
数据管理技术发展过程经过人工管理、文件系统和数据库系统三个阶段,其中数据独立性最高的阶段是______。
点击查看答案&解析
单项选择题
在窗体上绘制一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1 Click() Dim i As Integer, x As Integer For i=1 To 6 If i=1 Then x=i If i<= 4 Then x=x+1 Else x=x+2 End If Next i Print x End Sub 程序运行后,单击命令按钮,其输出结果为
A.9
B.6
C.12
D.15
点击查看答案&解析
相关试题
设在工程中有一个标准模块,其中定义了如下...
为了改变计时器控件的时间间隔,应该修改该...
阅读程序:Sub p(b () As Integer)...
在窗体上画一个名称为“Command1”、标题...
阅读程序:Option Base 1Private Sub ...