首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为Command1的命令按钮,事件过程如下: Private Sub Command1_Click() m=-3.6 If Sgn(m)Then n=Int(m) Else n=Abs(m) End If
窗体上有1个名称为Command1的命令按钮,事件过程如下: Private Sub Command1_Click() m=-3.6 If Sgn(m)Then n=Int(m) Else n=Abs(m) End If
admin
2015-08-28
47
问题
窗体上有1个名称为Command1的命令按钮,事件过程如下:
Private Sub Command1_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://www.kaotiyun.com/show/YoLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。设有如下的类型声明:TypePersonnameAsString*8majorAsString*20EndTyp
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:optionBase1PrivateSubCommand1_Click()DimsAsVarianta=Array(1,2,3,4
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:PrivateSubCommand1_Click()DimiAsInteger,xAsIntegerFori=1To6
在窗体上画两个单选按钮,名称分别为Option1、Option2,标题分别为“宋体”和“黑体”;一个复选框,名称为Check1,标题为“粗体”;一个文本框,名称为Text1,Text属性为“改变文字字体”。要求程序运行时,“宋体”单选按钮和“粗体”复选框被
假定有如下的窗体事件过程:PrivateSubCommand1_Click()a$="MicrosoftVisualBasic"b$=Riqht(a$,5)c$=Mid(a$,1,9)
在窗体上画一个命令按钮,名称为Comraandl。单击该命令按钮时,执行如下事件过程:PrivateSubCommand1_Click()a$="softwareandhardware"b$=Right(a$
在窗体上画一个名称为C0mnmndl的命令按钮和3个名称分别为Label1、Label2、Label3的标签,然后编写如下代码:PrivatexAsIntegerPrivateSubCommand1_Click()St
已知代数式eXSin(30°)2x/(x+y)Lnx,则正确的VisualBasic表达式为()。
随机试题
佛家“四谛”说指的是_____谛、集谛、灭谛和道谛。
新生儿硬肿症主要的致病因素是
下列哪些选项的表述错误?()
产业结构演进论根据产业结构演进的特点,将经济发展划分为五个时期,其中高度化结构阶段以()为标志。
建设工程法律法规规章的效力顺序从高到低的顺序依次为()。
规格为750kg的空气锤,锻锤在工作中产生的打击力约为()千克力。
一个自然人只能投资设立一个一人有限责任公司,且该一人有限责任公司不能投资设立新的一人有限责任公司。()
25℃时,将浓度和体积分别为c1、V1的一元强碱ROH溶液与浓度和体积分别为c2、V2的一元弱酸HA溶液相混合,下列关于该混合溶液的叙述正确的是()。
AudienceAwarenessofWritingI.Introduction—audiencereferstoreadersofwrittenmaterials—thecontent,structureandthe
A、Totakecareoftheiragingparents.B、Tomaketheirhousesmorealive.C、Tomakethemgoodcompanions.D、Tofollowthetrend
最新回复
(
0
)