在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Dim SW As Boolean Function func(X As Integer)As Integer If X＜20 Then Y=X Else Y=20+X End If func=Y End FunctiOn Phvate Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) SW=False End Sub Phvate

题目

在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Dim SW As Boolean Function func(X As Integer)As Integer If X＜20 Then Y=X Else Y=20+X End If func=Y End FunctiOn Phvate Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) SW=False End Sub Phvate Sub Form_MouseUp(BuRon As Integer,Shin As Integer，X As Single,Y As Single) SW=Tree End Sub Pdvate Sub Commandl-Click() Dim intNum As Integer intNum=InputBox("") If SW Then Print func(intNum) End If End Sub 程序运行后，单击命令按钮，将显示一个输入对话框，如果在输入对话框中输入25，则程序的执行结果为______。

A． 输出0

B．输出25

C．输出45

D．无任何输出

相似考题

1.在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：程序运行后，单击命令按钮，其输出结果为__________。

2.在窗体上画一个命令按钮，名称为Commandl，然后编写如下程序：Privme Sub Commandl_Click()Dim intNum As IntegerintNum＝InputBox(“请输入：”)MsgBox f(intNum)End SubFunction f(X As Integer) As Integerf＝IIf (X<10,X,X+5)End Function运行程序，单击命令按钮，在输入对话框中输入5，则程序的输出结果为______。

3.在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：程序运行后，单击命令按钮，消息框输出的是系统当前日期和当前时间。

4.在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Private Sub Command1_Click() Static X As Integer Static Y As Integer Cls Y = 1 Y = Y + 5 X = 5 + X Print X， Y End Sub 程序运行时，三次单击命令按钮Commandl后，窗体上显示的结果为A．15 16B．15 6C．15 15D．5 6

更多“在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:Dim SW As BooleanFunction func(X A ”相关问题

  • 第1题：

    在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程：

    运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是__________。


    正确答案：
    hardware【解析】本题考查消息框的知识。使用MsgBox函数来弹出消息框，此函数的使用格式为：MsgBox(prompt[，buttons][，title][，helpfile，context])其中第一个参数是显示在对话框中的消息，第二个参数是按钮的数目及形式，第三个参数是对话框标题栏显示的字符串，后面的是帮助文件以及帮助上下文编号。第一个参数必需有，其余参数可省略，但是若中间若干个参数省略时不能省略逗号分隔符。本题中第三个参数是变量b，即hardware。

  • 第2题：

    在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： PrivateSubCommandl_CnCk() aS="VisualBasic"， Print String(3,a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是( )。

    A．VVV

    B．Vis

    C．sic

    D．11


    正确答案：A

  • 第3题：

    在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程：

    程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。

    A)机床

    B)车床

    C)钻床

    D)轴承


    正确答案：C
    本题考查VBA中数组的知识。数组变量由变量名和数组下标构成，我们通常使用Dim语句来定义数组，其中下标下限缺省为0。本题中的af2)就是数组的第三个元素即“钻床”。

  • 第4题：

    在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程：程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。

    A. 机床

    B. 车床

    C. 钻床

    D. 轴承


    正确答案：C
    本题考查VBA中数组的知识。数组变量由变量名和数组下标构成，我们通常使用Dim语句来定义数组，其中下标下限缺省为0。本题中的a(2)就是数组的第三个元素即“钻床”。

  • 第5题：

    3在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： PrivateSubCommand1_Click() Static X As Integer Static Y As Integer Cls Y=1 Y=Y+5 X=5+X PrintX,Y EndSub 程序运行时，3次单击命令按钮Commandl后，窗体上显示的结果为( )。

    A．15 16

    B．156

    C．15 15

    D．56


    正确答案：B

  • 第6题：

    在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程： Private Sub Commandl_Click（） Dim（） a=Array（”机床”，”车床”，”钻床”，”轴承”）Printa（2）EndSub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。

    A.机床

    B.车床

    C.钻床

    D.轴承


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

相关内容