首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下程序: Function Fun(x As Integer, y As Integer) As Integer Fun = IIf(x < y, x, y)
在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下程序: Function Fun(x As Integer, y As Integer) As Integer Fun = IIf(x < y, x, y)
admin
2018-05-08
34
问题
在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下程序:
Function Fun(x As Integer, y As Integer) As Integer
Fun = IIf(x < y, x, y)
End Function
Private Sub Form_Load()
Command1.Default = True
End Sub
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a = 20
b = 12
Text1.Text = Str(Fun(a, b))
End Sub
程序运行后,按回车键,文本框中显示的内容为
选项
A、12
B、20
C、24
D、40
答案
A
解析
Form_Load()过程中,Command1获得焦点。当按回车键时,触发Command1_Click()事件。该事件中给定a和b的值,并调用函数Fun。函数Fun返回整型数据。IIf(x < y, x, y)表示的意思是x < y成立时,返回x,否则返回y。函数调用时传过来的参数是x=20,y=12。因此IIf(x < y, x, y)返回的值是12。选A)。
转载请注明原文地址:https://kaotiyun.com/show/WqGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面程序运行后,语句”Printi”执行的次数是()。PrivateSubForm_Click()DimiAsInteger,jAsIntegeri=0Doi=i+1Forj=10To1Step-3
窗体上命令按钮的事件过程如下:PrivateSubCommandl_Click()A=“34”:B=“26”:C=“98”PrintB+C+AEndSub运行程序后,单击命令按钮,输出结果是()。
在窗体上画两个文本框(Name属性分别为Textl和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下事件过程:PrivateSubCommandl_Click()x=0doWhilex<50x=(x+2)
假定在窗体上添加了一个通用对话框控件,其名称为CDl,并有如下程序段:CDl.ShowOpen:CDl.DefaultExt=”doc”在打开文件的对话框中选择了”c:\filel.txt”文件,则FileTitle属性的值是
以下关于图片框控件的说法中,错误的是
在窗体上画一文本框,其名称为Textl,为了在程序运行后隐藏该文本框,应使用的语句为
以下关于控件数组的叙述中,错误的是
在设计阶段,假定在图片框:Picturel中装入了一个图形,为了删除该图片框控件,应采用的正确操作是
下列叙述中,不属于设计准则的是()。
在满足实体完整性约束的条件下( )。
随机试题
下列哪项是目前HLA-DP抗原的常用检测方法
阿霉素对下列脏器影响最大的是下列哪项
A.氯化钠B.阿拉伯胶C.醋酸纤维素酞酸酯D.甘油E.滑石粉可作薄膜包衣材料的是
计提减值准备和计提折旧充分体现了谨慎性的要求。
按照波特的价值链理论,企业的下列各项活动中,属于支持活动的有()。
公安工作要处理社会矛盾中最具有对抗性、隐蔽性和腐蚀性的问题,坚持严格自律,才能使公安机关加强战斗力和保持纯洁性。( )
Totheaveragepersonknowledgeitselfisofimportancebecauseofitsbearinguponwhatheneedstodoandtomake.Ithelpshi
无抛补利率平价
图像框有—个属性,可以自动调整图像框的大小,以适应图像的尺寸,这个属性是______。
A、$190.B、$313.C、$330.D、$430.C①选项都是金额数,预测本题与某物的价格有关。②对话中男士介绍了他们所开设的三种课程,分别是为期两天的入门课程,为期四天的初学者课程和为期五到六天的初级体验型课程,学费分别为190美元、330
最新回复
(
0
)