题目内容

在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程:Private Sub Command1_Click()n = Val(Text1.Text)For i = 2 To nFor j = 2 To sqr(i)If i Mod j = 0 Then Exit ForNext jIf j > Sqr(i) Then Print INext IEnd Sub该事件过程的功能是（）。

A. 输出n以内的奇数
B. 输出n以内的偶数
C. 输出n以内的素数
D. 输出n以内能被j整除的数

查看答案

搜索结果不匹配？点我反馈

更多问题

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim i As Integer,n As IntegerFor I=0 To 50i=i+3n=n+1If i>10 Then Exit forNext IText1.Text=Str(n)End Sub程序运行后,单击命令按钮,在文本框中显示的值是（）。

A. 2
B. 3
C. 4
D. 5

在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Commond1_Click()Dim I, numRandmizeDoFor I =1 to 1000Num = int(Rnd * 100)Print Num;Select case NumCase 12Exit ForCase 58Exit DoCase 65,68,92EndEnd selectNext ILoopEnd sub上述事件过程执行后,下列描述中正确的是（）

A. Do循环执行的次数为1000次
B. 在For循环中产生的随机数小于等于100
C. 当所产生的随机数为12时结束所有循环
D. 当所产生的随机数为65,68,92时窗体关闭,程序结束

在窗体上画一个命令按钮和一个标签,名称分别为Command1和Label1,编写如下事件过程:Private Sub Command1_Click()Counter = 0For i = 1 To 4For j = 6 To 1 Step -2Counter = Counter + 2Next jNext iLabel1.Caption = Str(Counter)End Sub程序运行后,单击命令按钮,标签中显示的内容是（）。

A. 24
B. 20
C. 16
D. 12

执行下面程序段后,变量a的值为（）。For I=1 To 3For j=1 To IFor k=j To 3a=a+1Next kNext jNext I

A. 3
B. 9
C. 14
D. 21