首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮和一个文本框,其名称分别为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-07-11
43
问题
在窗体上画一个命令按钮和一个文本框,其名称分别为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/boFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有下面的程序段:x=InputBox("字符串","输入","请输入")Printx如果执行上面程序段时没有从键盘输入任何内容就直接按了回车键,则输出内容是
在编辑VB应用程序时,如果不小心关闭了属性窗口,则可以单击主窗口标准工具栏上的一个按钮直接打开属性窗口,这个按钮的图标是
设在窗体上有一个名称为Checkl的复选框数组,并有以下事件过程:PrivateSubCheckl_Click(IndexAsInteger)EndSub则下面叙述中错误的是
在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下事件过程:PrivateSubCommand1_Click0Dimarr(10)Fori=6To10art(i)=i-5Nex
以下数组定义语句中,错误的是
设有如下程序:OptionBase1Dima(3,4)AsInteger,b(4,3)AsIntegerPrivateSubCommand1_Click()’循环1Fori=1To3Forj=1To4b
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:OptionBase1PrivateSubCommand1Click()d=0:C=10:x=Array(10,12,21,32,24)Fori=1To5
下列循环中,可以正常结束的是( )。
若实体A和B是一对多的联系,实体B和C是一对一的联系,则实体A和C的联系是
随机试题
我们党的立党之本、执政之基、力量之源是()
简述补缺经营战略的战略思想。
常见动物中,其发生呕吐的难易程度不同,正确的难易顺序为()。
某建设项目投资构成中,设备购置费1000万元,工器具及生产家具购置费200万元,建筑工程费800万元,安装工程费500万元,工程建设其他费用400万元,基本预备费150万元,价差预备费350万元,建设期贷款2000万元,应计利息120万元,流动资金400万
下列各项中,无论是否重要,都必须在财务报表附注中披露的有()。
教师工作对象千差万别,这就要求教师要不断学习,不断反思,这说明教师是教学活动的()。
2007年6月与2006年同期相比,网民数增加了:年底与年中相比网民规模增长最快的年份是:
根据成就动机理论,学生最可能选择的任务成功概率为()。
以分期收款方式销售货物的,按照()日期确认收入的实现。
Severaltrialeffortsinthe1980sprovedthatitwasfinancially______torestoreoldbuildings.
最新回复
(
0
)