首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一命令按钮和一文本框,其名称分别为Commandl和Textl,然后编写如下程序: Function Fun(x As Integer, Private Sub Commandl_Click() y As Inte
在窗体上画一命令按钮和一文本框,其名称分别为Commandl和Textl,然后编写如下程序: Function Fun(x As Integer, Private Sub Commandl_Click() y As Inte
admin
2017-06-21
42
问题
在窗体上画一命令按钮和一文本框,其名称分别为Commandl和Textl,然后编写如下程序:
Function Fun(x As Integer, Private Sub Commandl_Click()
y As Integer)As Integer Dim a As Integer,b As Integer
Fun=IIf(x<y,x,y) a=20:b=12
End Function Text1.Text=Str(Fun(a,b))
Private Sub Form Load() End Sub
Command1.Default=True
End Sub
程序运行后,按回车键,文本框中显示的内容为
选项
A、12
B、20
C、24
D、40
答案
A
解析
命令按钮的Default属性用于设置窗体的缺省命令按钮,程序运行时,按下<Enter>键将执行该命令按钮的单击事件过程。IIf函数可用来执行简单的条件判断操作,它是“If…then…Else”结构的简写版本。格式为:Result=IIf(<条件>,<True部分>,<False部分>)。当<条件>为真时,IIf函数返回<True部分>,而当<条件>为假时,返回<False部分>。本题在函数Fun中判断x是否比y小,如果小则返回x作为返回值,否则返回y作为返回值,即返回两个参数中的最小值。
转载请注明原文地址:https://kaotiyun.com/show/6XGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮,然后编写如下事件过程: PrivateSubCommandl_Click() s=1 Do s=(s+1)*(s+2) Number=Number+1 LoopUnt
为了使一个窗体从屏幕上消失但仍在内存中,所使用的方法或语句为()。
窗体的MouseDown事件过程Form_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)有4个参数,关于这些参数,正确的描述是()。
在窗体上有一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后,Command1为禁用(灰色),此时如果在文本框中输入字符,则命令按钮Command1变为可用。请填空。PrivateSubForm_Load()Comman
面向对象的模型中,最基本的概念是对象和【】。
下面关于完全二叉树的叙述中,错误的是______。
执行下面的程序段后,S的值为【】。s=5Fori=2.6To9Step0.6S=s+1Nexti
在软件工程中,白盒测试法可用于测试程序的内部结构。此方法将程序看做是______。
数据库设计分为以下6个设计阶段:需求分析阶段、【】、逻辑设计阶段、物理设计阶段、实施阶段、运行和维护阶段。
下面不属于软件测试实施步骤的是
随机试题
A.unveiledB.comfortableC.comparisonD.totallyE.qualityF.designedG.competitionH.entirelyI.averageJ.
尿激酶可用于治疗
子宫内膜癌Ⅱ期患者,首选的治疗措施应是
疾病预防控制机构的级别分为()
下列不属于仪容礼仪的是()。
欧阳修《醉翁亭记》原文环滁皆山也。其西南诸峰,林壑尤美,望之蔚然而深秀者,琅琊也。山行六七里,渐闻水声潺潺,而泻出于两峰之间者,酿泉也。峰回路转,有亭翼然临于泉上者,醉翁亭也。作亭者谁?山之僧曰智仙也。名之者谁?太守自谓也。太守与
教师聘任是一种法律行为,它确定双方法律上的关系。()
假设空气质量可按良好、轻度污染和重度污染三类划分。一环境监测单位在某段时间对63个城市的空气质量进行了监测,结果表明:空气质量良好城市数是重度污染城市数的3倍还多3个,轻度污染城市数是重度污染城市数的2倍。那么空气质量良好的城市个数是()。
InatotalofsixstatesinthemiddleofAmerica,15,000assembly-lineworkersare【1】Japanesecarstogether.Theseautoworkers
GetWhatYouPayFor?NotAlways[A]ThemostexpensiveelectioncampaigninAmericanhistoryisover.ExecutivesacrossAmer
最新回复
(
0
)