首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下: Private Type x a As Integer b As Integer End Type Private Sub Command1_Cli
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下: Private Type x a As Integer b As Integer End Type Private Sub Command1_Cli
admin
2018-09-19
53
问题
窗体上有一个名称为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 / 2 Then
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
解析
x是用户定义的一种变量类型,可以使用它来声明变量。InputBox(" ")函数的提示信息为" ",即为空,因此弹出的对话框中没有提示信息。在程序中通过比较输入的数被2整除和被2除的值是否相等来判定它是否为偶数,如果是那么y.b的值就是y.a的值的平方。Fix函数是取整函数,它会删除小数部分,直接取表达式的整数部分,不四舍五入,因此D选项错。
转载请注明原文地址:https://kaotiyun.com/show/Q6Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下程序的功能是随机产生10个两位的整数:OptionBase1PrivateSubCommand1_Click() Dima(10)AsInteger DimiAsInteger Randomize Fori=1
设有如下事件过程:PrivateSubCommand1_Click() Dima a=Array(3,5,6,3,2,6,5,3,5,4,3,9,4,5,6,3,5) x=0 n=UBound(a)
在窗体上建立三个菜单(名称分别为Read、Calc和Save,标题分别为“读人数据”、“计算并输出”和“存盘”),然后添加一个文本框(名称为Text1,可显示多行,ScrollBars属性设置为2)(如图所示)。程序运行后,如果执行“读人数据”命令,则读入
在面向对象方法中,不属于"对象"基本特点的是( )。
在关系数据库中,用来表示实体间联系的是
运动会中一个运动项目可以有多名运动员参加,一个运动员可以参加多个项目。则实体项目和运动员之间的联系是
若实体A和B是一对多的联系,实体B和C是一对一的联系,则实体A和C的联系是
在关系数据库中,用来表示实体间联系的是
在下列模式中,能够给出数据库物理存储结构与物理存取方法的是( )。
随机试题
企业事业单位可以自主选择一家商业银行的营业场所开立一个办理日常转账结算和现金收付的基本账户,不得开立两个以上的基本账户。()
Asanyonewhohastriedtoloseweightknows,realisticgoal-settinggenerallyproducesthebestresults.That’spartiallybecau
A.识别增强子B.识别启动子C.N端被甲基化修饰D.C端含有若干7肽重复序列E.参与DNA复制真核RNA聚合酶Ⅱ的最大亚基
下列对早产儿的护理措施,不正确的一项是()。
预制构件应进行结构性能检验。结构性能检验不合格的预制构件不得用于混凝土结构。()
逾期支付标的物的,遇价格上涨按( )执行。
国际工程合同价款计算中,关于预付款下列说法中正确的有()。【2013年真题】
灌浆深度较深,压力较大的是()。
某服装厂加工一批校服。按原工作效率生产出200套后,由于学校要求提前1天交货,服装厂需把原工作效率提高30%,才能按要求时间完成任务。如果开始生产就把原工作效率提高20%,也可以比原定时间提前1天交货。这批校服共有多少套?
Itwasamomentmostbusinessexecutiveswouldpausetosavor:latelastyear,GermansportinggoodspioneerAdidaslearnedthat
最新回复
(
0
)