niusouti.com

在窗体上添加一个按钮(cmd) ，编写如下程序：Private sub crud_click( )Dim s, iFori = 1 to 10s=s+iNextMsgbox sEnd sub程序运行后，单击按钮，在消息框中显示的信息为 【 】 。

题目

在窗体上添加一个按钮(cmd) ，编写如下程序：

Private sub crud_click( )

Dim s, i

Fori = 1 to 10

s=s+i

Next

Msgbox s

End sub

程序运行后，单击按钮，在消息框中显示的信息为 【 】 。

相似考题

1.在窗体上添加一个命令按钮，然后编写如下事件过程： Phvate Sub Commanl_Click() Dima(10)As Integer Dimp(3)As InteSer k=5 Fori=1 To 10 a(i)=i Nexti Fori=1 To 3 p(i)=a(i*i) Nexti Fori=1 To 3 k=k+p(i)*2 Nexti Printk End Sub 该程A．35B．33C．31D．29

2.在窗体上添加一个命令按钮(其Name属性为Command1),然后编写如下代码： Option Base 1 Private Sub Command1_Click() Dim a s = 0 a = Array(4, 3, 2, 1) j = 1 For i = 4 To 1 Step -1 s = s + a(i)* j j = j * 10 Next i Print s End Sub 运行上面的程序、单击命令按钮，其输出结果是A．4321B．1234C．34D．12

3.在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Private Sub Command1_Click() Dim i As Integer，j As Integer Dim a(10， 10)As Integer For i=1 To 3 For i=1 To 3 a(i，j)=(i-1) *3+j Print a(i，j)； Next i Print Next i End Sub 程序运行后，单击命令按钮，窗体上显示的是A．1 2 3 246 3 69B．2 3 4 3 4 5 4 5 6C．1 4 7 2 5 8 3 6 9D．1 2 3 4 5 6 7 8 9

4.在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码；PrivateSubCommand1_Click()s="ABBACDDCAB"Fori=6To2Step-2x=Mid(s,i,i)y=LeR(s,i)z=Right(s,i)z=x&y&zNextiMsgBoxzEndSub窗体打开运行后，单击命令按钮，则消息框的输出结果是______。A．AABAABB．ABBABAC．BABBAD．BBABBA

更多“在窗体上添加一个按钮(cmd) ,编写如下程序: Private sub crud_click( ) Dim s, i Fori = 1 to 10 ”相关问题

  • 第1题：

    在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_ Click() Dim arr (10) For i = 1 To 10 arr (i) = i ^ 2 Next i Print arr(i - 2) End Sub程序运行后，单击命令按钮，在窗体上输出的是______。

    A．49

    B．64

    C．81

    D．100


    正确答案：C

  • 第2题：

    在窗体上添加一个命令按钮，然后编写如下事件过程： Private Sub Commandl_Click（ ） Dima（ ） a=Array（1，3，5，7）s=0Fori=1 t0 3S=S*10+a（i）NextiPrint SEndSub程序运行后，输出结果为（ ）。

    A.135

    B.357

    C.531

    D.753


    正确答案：B
    暂无解析，请参考用户分享笔记

  • 第3题：

    在窗体上添加一个命令按钮Command1，然后编写如下程序： Private Sub Command1_Click（) Dim i As Integer, j As Integer Dim a（10, 10) As Integer For i = 1 To 3 For j = 1 To 3 a（i, j) = （i - 1) * 3 + j Print a（i, j); Next j Print Next i End Sub 程序运行后，单击命令按钮，窗体上显示的内容是（）。

    A．1 2 3 2 4 6 3 6 9

    B．2 3 4 3 4 5 4 5 6

    C．1 4 7 2 5 8 3 6 9

    D．1 2 3 4 5 6 7 8 9


    C

  • 第4题：

    在窗体上添加一个命令按钮，名为Command1，然后为该命令按钮编写如下事件过程，该过程执行结果为______。Option Base 1Private Sub Cemmand1_Click() Dim a As Variant a = Array(1, 2, 3, 4) j = 1 for i = 4 To 1 Step - 1 s = s+ a(i)* j j= j* 10 Next i Print sEnd Sub

    A．4321

    B．1234

    C．34

    D．12


    正确答案：B
    解析：本题的难点是数组在循环中的计算。计算过程为“4+3×10+2×100+1×1000=1234”如果改成“for i=1 T0 4”后，其结果为A。

  • 第5题：

    （ 34 ）在窗体中添加一个名称为 Command1 的命令按钮，然后编写如下事件代码：

    Private Sub Command1_Click( )

    s="ABBACDDCBA"

    For I=6 To 2 Step -2

    x=Mid(s,I,I)

    y=Left(s,I)

    z=Right(s,I)

    z=x & y & z

    Next I

    MsgBox z

    End Sub

    窗体打开运行后，单击命令按钮，则消息框的输出结果是

    A ） AABAAB

    B ） ABBABA

    C ） BABBA

    D ） BBABBA


    正确答案：D

相关内容