首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Commandl的命令按钮,并编写如下程序: Function Fun(X) y=0 If X
在窗体上画一个名称为Commandl的命令按钮,并编写如下程序: Function Fun(X) y=0 If X
admin
2013-11-29
31
问题
在窗体上画一个名称为Commandl的命令按钮,并编写如下程序:
Function Fun(X)
y=0
If X<10 Then
Y=x
Else
Y=Y十10 End If
Fun=v
End Function
Private Sub CommandI_Click()
n=InputBox(“请输入一个数”)
n=Val(n)
P=Fun(n)
Print P
End Sub
运行程序,单击命令按钮,将显示输入对话框,如果在对话框中输入100,并单击“确定”按钮,则输出结果为( )。
选项
A、10
B、100
C、110
D、出错信息
答案
A
解析
程序中输入100,则调用过程为Fun(100),过程Fun中判断参数是否小于10,小于10则将此值赋给y,如果不小于10,则变量y值加10,由于100不小于10,所以y值加10,等于lO,并将此值做为函数值返回。因此输出结果为10。
转载请注明原文地址:https://kaotiyun.com/show/HXQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名为Commandl的命令按钮,然后编写如下代码:optionBase1PdvateSubCommandl_Click()Dimaa=Array(1,2,3,4)J=1Fori=3To1Step-1s=s+a(
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明:PrivateTypePersonnameAsString*8mjotAsString+
在窗体上画一个名称为Commandl的命令按钮,再画两个名称分别为Labell、Lubd2的标签,然后编写如下程序代码:PrivateXAsIntegerPrivateSubCommandl_Click()X=5:Y=3Callproc
执行下列语句s~Input=InputBox(”请输入字符串”,”字符串对话框”,”字符串”)将显示输入对话框。此时如果直接单击“确定”按钮,则变量strInput的内容是
在考生文件夹下有一个工程文件sj5.vbp,窗体上有两个文本框,名称分别为Textl和Text2,分别用来表示两个计数器;还有两个计时器Timerl和Timer2。Timerl用于变换Textl的计数;Timer2用于控制Text2的计数。运行时,单击“开
(1)在名称为Forml的窗体中画一个名称为Textl的文本框,其标题为“0”;再添加一个名称为Timerl的计时器。请设置适当的控件属性,并编写适当的事件过程.使得在运行时,每隔1秒钟文本框中的数字加1,当达到10时,在窗口上打印“10”,然后重新从O开
(1)在名称为Forml的窗体上画一个名称为Textl的文本框,其高、宽分别为600、1800。请在属性框中设置适当的属性满足以下要求:Text1的字体为“隶书”,字号为“三号”;窗体的标题为“字体大小”,不显示最大化按钮和最小化按钮,如图4
(1)在Forml的窗体上绘制一个图片框,其名称为Picturel。编写适当的事件过程,使程序运行后,若单击窗体,则从图片框的(300,600)位置处开始显示“VisualBasic’’。程序运行情况如图36—1所示。注意:程序中不得使用任何变
随机试题
患者,女性,50岁,3年前在个体诊所做牙髓治疗,就诊2次,但方法不详,近3个月该牙隐痛不适、咀嚼无力,近1周症状加重,前来就诊如该患牙需要拔除,医师应重点了解的是
在进行牙周病情况调查中,以下不属于信息偏倚的是
关于假释的适用,下列哪些选项是正确的?()
下列不属于保护规划需收集的基础资料的是()
下列各项不属于饭店劳动合同必备条款的是()。
扣缴义务人应当自税收法律、行政法规规定的扣缴义务发生之日起()日内按照规定,设置账簿。
B公司是一家制造类企业,产品的变动成本率为60%,一直采用赊销方式销售产品,信用条件为N/60。如果继续采用N/60的信用条件,预计2011年赊销收入净额为1000万元,坏账损失为20万元,收账费用为12万元。为扩大产品的销售量,B公司拟将信用条件变更为
我国制定教育目的的理论基础是【】
在Word的编辑状态中,连续进行了两次“插入”操作,当单击一次“撤销”按钮后()。
TheSpringFestivaliscomingshortly.YouintendtoinviteyourforeignfriendtocometoChinaandspendthetraditionalChine
最新回复
(
0
)