首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下: Private Type x a As Integer:b As Integer End Type Private Sub Command1_Click()
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下: Private Type x a As Integer:b As Integer End Type Private Sub Command1_Click()
admin
2016-09-19
98
问题
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下:
Private Type x
a As Integer:b As Integer
End Type
Private Sub Command1_Click()
Dim y As x
y.a=InputBox("")
If y.a\2=y.a/2Then
y.b=y.a*y.a
Else
y.b:Fix(y.a/2)
End If
Text1.Text=y.b
End Sub
对以上程序,下列叙述中错误的是
选项
A、x是用户定义的类型
B、InputBox函数弹出的对话框中没有提示信息
C、若输入的是偶数,y.b的值为该偶数的平方
D、Fix(y.a/2)把y.a/2的小数部分四舍五入,转换为整数返回
答案
D
解析
本题考查的考点是有关自定义类型和Fix函数的。用户可以通过Type语句自定义类型,并可用自定义的类型声明变最。注意Fix函数是向下取整,Round函数是四舍五入。
转载请注明原文地址:https://kaotiyun.com/show/pKLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画1个名称为Commandl的命令按钮和2个名称分别为Text1、Text2的文本框,如图所示,然后编写如下程序:FunctionFun(xAsInteger,ByValyAsInteger)AsInteger
假设用复制、粘贴的方法建立了一个命令按钮数组Commandl,以下对该数组的说法错误的是()。
已知数组Dima(1To10)AsInteger,则下面正确调用GetValue函数的是()。PrivateFunctionGetValue(a()AsInteger)AsIntegerFori=1T
有下列程序,运行后的结果为()。X=2.4:Y=3:Z=5Print“A(“;X+Y*Z;”)”
设窗体上有一个名为CDl的通用对话框、一个名为Text1的文本框和一个名称为Commandl的命令按钮。程序执行时,单击Commandl按钮,则显示“打开”文件对话框,操作者从中选择一个文本文件,并单击对话框上的“打开”按钮后,则可打开该文本文件,并读入一
下面的程序执行时,可以从键盘输入一个正整数,然后把该数的每位数字按逆序输出。例如:输入7685,则输出5867;输入1000,则输出0001。请填空。PrivateSubCommandl_Click()
随机试题
简述企业文化的内容。
Itwasaveryhappyfamily.Thelifewasfairlywell-off.Father,Leopold,wasamusicmasterinAustria.Motherwaswarm-hearte
选择性降低浦氏纤维自律,缩短APD的药物
在住院患者的护理中,护士的管理协调者角色,主要体现在护士对临床护理工作需要
旅客携带伴侣犬、猫出境,物主在离境前持家庭所在地( )以上检疫部门出具的动物健康证书及狂犬病疫苗接种证书到离境口岸检验检疫机构报检。
传统的风险测量技术不能回答有多大的可能会产生损失,但可以度量不同市场中的总风险,将各个不同市场中的风险加总。()
自从1939年以来,人们做的大量科学研究表明烟草对人体健康危害极大。急需立法来禁止各种烟草产品的广告宣传。因为这种广告总是劝人们吸更多的烟,因而在很大程度上广告应对那些健康状况恶化或由肺癌致死的人们负责。
为统一指挥渡江作战,中共中央决定由()组成总前委。
物流成本管理的前提是编制物流成本预算。()
故国神游,___________,早生华发。人生如梦,___________。(苏轼《念奴娇.赤壁怀古》)
最新回复
(
0
)