首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为Commandl的命令按钮,事件过程如下: Private Sub Commandl_Click() m=-3.6 If Sgn(m)Then n=Int(m) Else n=Abs(m)
窗体上有1个名称为Commandl的命令按钮,事件过程如下: Private Sub Commandl_Click() m=-3.6 If Sgn(m)Then n=Int(m) Else n=Abs(m)
admin
2019-08-22
64
问题
窗体上有1个名称为Commandl的命令按钮,事件过程如下:
Private Sub Commandl_Click()
m=-3.6
If Sgn(m)Then
n=Int(m)
Else
n=Abs(m)
End If
Print n
End Sub
运行程序,并单击命令按钮,窗体上显示的内容为( )。
选项
A、-4
B、-3
C、3
D、3.6
答案
A
解析
Sgn函数返回参数的符号,参数为负数时返回-1,为0时,返回0,为正数时返回1。所以Sgn(-3.6)返回-1。Visual Basic中把任何非0值都认为是真,以0表示假,因此if语句中将执行n=Int(m)语句。Int函数返回不大于参数的最大整数,Int(-3.6)要返回小于-3.6的整数即是-4,因此n=-4。
转载请注明原文地址:https://kaotiyun.com/show/DoTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在名称为Form1的窗体上添加一个标签(名称为Label1,标题为空白,BorderStyle属性为1,Visible属性为False)、一个文本框(名称为Text1,Text属性初始内容为空)和一个命令按钮(名称为Command1,标题为“显示”)
下面不是键盘事件的是()。
有下面事件过程:PrivateSubCommandlClick()a=5b=8Fork=1To30c=b-aa=bb=cNextkPrintc
窗体上有1个名称为List1的列表框,1个名称为Text1的文本框。编写如下程序代码:PrivateSubForm_Load()List1.Addhem"花卉"List1.Addhem"绿植"List1.Addh
(1)在考生文件夹下有工程文件sjt3.vbp,其窗体上有1个标题为“计算”的命令按钮,1个标题为“无理数e的近似值”的标签。请再画1个初始内容为空的文本框’textl,如下左图所示。程序功能为:单击“计算”命令按钮,则计算无理数e的近似值,并将结果显示在
下列程序执行后,变量a的值为()。Dima,b,C,dAsSinglea=10:b=20:C=40Ifb>aThend=a:a=b:b=dEndIfIfc>aThen
在考生目录下有一个工程文件vbsii5.vbp,用来计算勾股定理整数组合的个数。勾股定理中3个数的关系是:a2+b2=c2。例如,3、4、5就是一个满足条件的整数组合(注意:a,b,c分别为4,3,5与分别为3,4,5被视为同一个组合,不应该重复计算)。编
(1)在考生文件夹下有一个工程文件sjt3.vbp,已给出了所有控件和部分程序。程序运行时,请按以下顺序操作:1)单击“读入数据”按钮,可把考生目录下的文件in3.dat中的100个整数读到数组a中;2)从名称为List1的列表框中选中
双精度浮点数的类型说明符为
随机试题
关于药物流产,错误的是
医德实践的具体内容不包括()
与气机调节关系最密切的脏是
使用政府投资的建设项目,保证金的额度为工程价款结算总额的()。
投标人相互串通投标或者与招标人串通投标的,投标人以向招标人或者评标委员会成员行贿的手段谋取中标的,其应当承担的法律责任不包括( )。
安全疏散基本参数是对建筑安全疏散设计的重要依据。下列不属于安全疏散基本参数的是()。
如要在Word文档中创建表格,应使用的菜单命令为()。
Fromchildhoodtooldage,wealluselanguageasameansofbroadeningourknowledgeofourselvesandtheworldaboutus.When
Theyworklonghoursbutdonotearnenoughtoensurea(n)______livingforthemselvesandtheirfamilies.
Drought,tsunami,violentcrime,financialmeltdown—theworldisfullofrisks.Thepoorareoftenmost【C1】______totheireffect
最新回复
(
0
)