在窗体上画一个名称为Commandl的命令按钮，并编写如下程序： Function Fun(x) y=0 If x＜10 Then y=x Else

admin2019-04-29 67

问题在窗体上画一个名称为Commandl的命令按钮，并编写如下程序：
Function Fun(x)
      y=0
      If x＜10 Then
            y=x
      Else
            y=y+10
      End If
      Fun=y
End Function
Private Sub Command l_Click()
      n=InputBox(”请输入一个数”)：n=Val(n)
      P=Fun(n)：Print P
End Sub
运行程序，单击命令按钮，将显示输入对话框，如果在对话框中输入100，并单击“确定”按钮，则输出结果为

选项 A、10
B、100
C、1 10
D、出错信息

答案A

解析本题是一个简单的函数调用，在函数中会判断参数x的值，根据x的值不同执行If语句的不同分支。由于实际参数为100不满足x＜10，因此函数返回值为10。

转载请注明原文地址:https://kaotiyun.com/show/yLUp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

在窗体上画一个名称为Commandl的命令按钮，并编写如下程序： Function Fun(x) y=0 If x＜10 Then y=x Else

二级VB

NCRE全国计算机二级

为了实现鼠标自动拖放，必须把()属性设置为1；而为了执行手动拖放，必须把该属性设置为0。

请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Form1的窗体上画两个标签(名称分别为lblName和lblAge，标题分别为“姓名”和“年龄”)、两个文本框(名称分别为txtName和txtAge，Text属性

在考生文件夹下有一个工程文件sjt5．vbp，相应的窗体文件为sjt5．frm，此外还有一个名为datain．txt的文本文件，其内容如下：32437658281298573142536475869713243546576879805937

请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Form1的窗体上画一个文本框，名称为Text1，内容为“VB程序设计”；再画两个命令按钮，其名称分别为Command1和Command2，标题分别为“扩大”和“缩小

将E-R图转换到关系模式时，实体与联系都可以表示成()。

在窗体上画1个命令按钮，名称为Commandl，然后编写如下程序：DimFlagAsBooleanPrivateSubCommandl—Click()DimintNumAsIntegerintNum=I

下列说法中错误的是()。

在侦查阶段出现《刑事诉讼法》第15条中规定的不追究刑事责任的情形时，应当()

A、自然因素B、社会因素C、生活方式因素D、生物学因素E、医疗卫生服务因素工人是否定期体检属于

钢铁厂向银行贷款，当地公立医院()提供担保。

被收养人的条件是()。

某班期末考试语文平均成绩为75分，标准差为8分，小明得92分，则小明的标准分数是()。(2014年)

打开数据库abc的正确命令是

Whatdoesthemanwanttodo?

Lastnight,itwasstilllightoutwhenIreturnedhomefromwork.Mynewneighborandhissonwereintheir【C1】______place,out