首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一命令按钮和一文本框,其名称分别为Commandl和Textl,然后编写如下程序: Function Fun(x As Integer, Y As Integer)As Integer Fun=IIf(x
在窗体上画一命令按钮和一文本框,其名称分别为Commandl和Textl,然后编写如下程序: Function Fun(x As Integer, Y As Integer)As Integer Fun=IIf(x
admin
2018-10-15
41
问题
在窗体上画一命令按钮和一文本框,其名称分别为Commandl和Textl,然后编写如下程序:
Function Fun(x As Integer,
Y As Integer)As Integer
Fun=IIf(x
End Function
Private Sub Form Load()
Command1.Default=True
End Sub
Private Sub Commandl_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
解析
命令按钮的Defa,ult属性用于设置窗体的缺省命令按钮,程序运行时,按下
键将执行该命令按钮的单击事件过程。IIf函数可用来执行简单的条件判断操作,它是“If…then…Else”结构的简写版本。格式为:Result=IIf(<条件>,
,
)。当<条件>为真时,IIf函数返回
,而当<条件>为假时,返回
。本题在函数Fun中判断x是否比y小,如果小则返回x作为返回值,否则返回y作为返回值,即返回两个参数中的最小值。
转载请注明原文地址:https://kaotiyun.com/show/SFFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下通用过程:PublicFunctionFun(xStrAsString)AsString DimtStrAsString,strLAsInteger tStr="" strL=Len(xStr) i=
(1)在考生文件夹中有一个工程文件sjt3.vbp。运行程序时,先向文本框Text1中输人一个不超过10的正整数,然后选择“N的阶乘”或“(N+2)的阶乘”单选钮,即可进行计算,计算结果在文本框Text2中显示,如图所示。在给出的窗体文件中已经添加了全部控
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件是sjt5.frm(如图所示)。该程序的功能是:单击“读数”按钮,读入考生文件夹下in5.txt文件中的一个整数,并放入Text1中;单击“计算”按钮,则计算小于该数的最大素数,并显示在Text2
有如下程序代码:PrivateSubForm_Click()Dima(3,3)AsIntegerForI=1To3Forj=1To3Ifj>1And
为了改变单选按钮的选取状态,可以改变该控件一个属性的值,这个属性是
以下可以判断是否在文本框(名称为Text1)内按下了回车键的事件过程是
假定有如下的程序段:DimintVarAsIntegerintvar=TruePrintintVar则输出结果是
窗体上有1个Timer1计时器,1个Shape1形状控件,还有下面程序代码:DimflagAsBooleanPrivateSubForm_Load()flag=TrueTimer1.En
以下语句或子句中,符合VisualBasic语法要求的是
数据字典(DD)所定义的对象都包含于
随机试题
黏土砂的流动性好,易制成高紧实度的铸型。()
骨架型缓释、控释制剂不包括
擅自公布重要地理信息数据的可以处()的罚款。
构成时间序列的基本因素包括()。
A.条件(1)充分,但条件(2)不充分。B.条件(2)充分,但条件(1)不充分。C.条件(1)和(2)单独都不充分,但条件(1)和条件(2)联合起来充分。D.条件(1)充分,条件(2)也充分。E.条件(1)和(2)单独都不充分,条件(1)和条件(2
标志着整个中国民族资产阶级领导的旧民主主义革命终结的是()
下列关于模板的表述中,错误的是
使用VC6打开考生文件夹下的源程序文件modi2.cpp。阅读下列函数说明和代码,完成空出部分程序。函数convert(char*strOct)的功能是将八进制转换为十进制。提示:要每一位转换,然后把转换后得到的数累加起来即可。注意:不能修改其他部分的
TheAncientOlympicGames古代奥林匹克运动会Accordingtohistoricalrecords,thefirst(1)OlympicGamescanbetracedbackto776BC.
Wanthappier,better-adjustedkids?Paylessattentiontothem,so【C1】______afamilycoachDavidCode.Hesaysfamiliescentered
最新回复
(
0
)