• 2022-06-06
    在窗体上画一个名称为Command1的命令按钮,编写如下事件过程:Private Sub Command1_Click() n=0 For i=0 To 10 X=2 * i-1 If X Mod 3=0 Then n=n+1 Next i Print nEnd Sub运行程序,单击命令按钮,则窗体上显示的是( )。
    A: 1
    B: 3
    C: 5
    D: 7
  • B

    内容

    • 0

      在窗体上添加一个命令按钮Command1,然后编写如下事件过程:Private Sub Command1_Click() For n = 1 To 20 If n Mod 3 [] 0 Then m = m + n \ 3 Next n Form1.Print nEnd Sub程序运行后,如果单击命令按钮,则窗体上显示的内容是( )。 A: 15 B: 18 C: 21 D: 24

    • 1

      在窗体上添加一个命令按钮Command1,然后编写如下事件过程:Private Sub Command1_Click() For n = 1 To 20 If n Mod 3 <> 0 Then m = m + n 3 Next n Form1.Print nEnd Sub程序运行后,如果单击命令按钮,则窗体上显示的内容是( )。 A: 15 B: 18 C: 21 D: 24

    • 2

      在窗体上画一个命令按钮<其名称为Command1),然后编写如下事件过程: Private Sub Command1 Click() For i=1 T04 If i=1 Thenx=i If i<=4 Then x=x+1 Print x Next i End Sub 程序运行后,单击命令按钮;其输出结果为 ______。 A: A) 1 2 3 4 B: B) 2 3 4 5 C: C) 2 3 4 4 D: D) 3 4 5 6

    • 3

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

    • 4

      中国大学MOOC: 在窗体上添加一个命令按钮Command1,并编写下列事件过程:Private Sub Command1_Click() x = 0 n = 0 Do Until x > 10 x = (x + 1) ^ 2 n = n + 1 LoopEnd Sub程序运行时,单击Command1按钮,则n和x的值分别是( )。