首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下: Private Type x a As Integer b As Integer End Type P
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下: Private Type x a As Integer b As Integer End Type P
admin
2015-08-13
43
问题
窗体上有一个名称为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/9qQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于菜单的叙述中,错误的是______。
下列程序段的显示结果为______。x=0Printx-1x=3
数据字典是各类数据描述的集合,它通常包括5个部分,即数据项、数据结构、数据流、【】和处理过程。
数据处理的最小单位是______。
计算π的近似值的一个公式是π/4=1-1/3+1/5_1/7+…+(-1)n-11/(2n-1)。某人编写下面的程序用此公式计算并输出π的近似值:PrivateSubCommand1_Click()PI=1Sign=113=20000For
(1)在名称为Forml的窗体上画两个文本框,名称分别为Textl和Text2,初始情况下都没有内容。请编写适当的事件过程,使程序运行时,在Textl中输入字符的同时,Text2也立即显示出Textl中的字符,如图51—1所示。程序中不得使用任何变量。
在考生目录下有一个工程文件sjt5.vbp,其窗体上有两个标签Ll和L2,标题分别为“口令”和“允许次数”;一个命令按钮C1,标题为“确定”;两个文本框名称分别为Textl和Text2。其中Textl用来输入口令(输入时,显示“*”),无初始内容;Text
设有以下循环结构;Do循环体LoopWhile<杂件>则以下叙述中错误的是______。
设A=2,B=-2,则表达式A/2+1>B+5orB*(-2)=6的值是______。
在先左后右的原则下,根据访问根结点的次序,二叉树的遍历可以分为三种:前序遍历、【】遍历和后序遍历。
随机试题
昔欲居南村,________。
该项目主要环境影响因素是()。马厩粪肥的处理应符合()的要求。
下列各项中,属于车辆购置税应税行为的有()。
行政管理又称为()。
()强调植物性神经系统在情绪发生中的作用。
罗马俱乐部的麦多斯提出影响人类发展的5个因素,并主张“零增长论”的报告是()。
下级单位有人来你们单位办事,只有你一个人在办公室,而你又不会处理,你怎么办?
材料一:某重点学校的高一学生把从网上搜集到的“万花谷”病毒的代码进行更改和加密,升级为“混客绝情炸弹”。短短40天时间里,全国有10万余台电脑遭受到攻击,引发了网民恐慌。当前,高科技犯罪率日益上升,诸如军事领域中的尖端技术威胁着人类的和平与发展,源于菲律宾
某企业生产的一批外贸供货产品因外商原因无法出口,该企业采用伪造出口退税单证和签订虚假买卖合同等方法,骗取出口退税50万元(其中包括该批产品已征的产品税、增值税等税款20万元)。对该企业行为的认定,下列说法正确的是()
Manypeopleliketotravel.Theproblemisgettingyourpettothe【C1】______.Inrecentyears,transportingpetsonflightshas
最新回复
(
0
)