0 Then Print Mid(num,p+1) Else " />
设有如下程序: Private Sub Form.Click() num=InputBox("请输入一个实数"):p=InStr(num,"") Ifp>0 Then Print Mid(num,p+1) Else
首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
0 Then Print Mid(num,p+1) Else ">设有如下程序: Private Sub Form.Click() num=InputBox("请输入一个实数"):p=InStr(num,"") Ifp>0 Then Print Mid(num,p+1) Else
设有如下程序: Private Sub Form.Click() num=InputBox("请输入一个实数"):p=InStr(num,"") Ifp>0 Then Print Mid(num,p+1) Else
admin
2019-06-11
71
问题
设有如下程序:
Private Sub Form.Click()
num=InputBox("请输入一个实数"):p=InStr(num,"")
Ifp>0 Then
Print Mid(num,p+1)
Else
Print"END"
End If
End Sub
运行程序,单击窗体,根据提示输入一个数值。如果输入的不是实数,则程序输出“END”;否则
选项
A、用字符方式输出该实数
B、输出该实数的整数部分
C、输出该实数的小数部分
D、去掉实数中的小数点,保留所有数码输出
答案
C
解析
字符串匹配函数Instr用于查找第二个参数在第一个参数中第一次出现的位置,若未找到返回O;Mid(字符串,起始位置[,个数])函数用于从已有字符串中取出从指定位置开始的含指定个数字符的字符串,若不指定个数将返回字符串中从参数“起始位置”到字符串尾端的所有字符。本题实际就是先找到小数点的位置,然后输出小数点后面的部分,即小数部分。
转载请注明原文地址:https://kaotiyun.com/show/ZDUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如下关于变体类型变量的叙述中,错误的是()。
定义无符号整数类为UInt,下面可以作为类UInt实例化值的是()。
以下叙述中正确的是()。
假定有以下程序段:Fori=1To3Forj=5To1Step一1Printi*jNextjNexti则语句Printi*j的执行次数是()。
下面程序运行时,若输入395,则输出结果是()。PrivateSubCommand1_Click()Dimx%x=InputBox("请输入一个3位整数")PrintxMod10,x\100,(x
若在窗体模块的声明部分声明了如下自定义类型和数组:PrivmeTyperecCodeAsIntegerCaptionAsStringEndTypeDimarr(5)Astee则下
下面有关标准模块的叙述中,错误的是()。
下列关于文件的叙述中错误的是()。
软件测试的目的是
随机试题
不属于目前在我国推行的补偿贸易的方式的是()
保险是一种风险转移机制。通过保险个人或企业可以将生活中一些不确定因素转移给其他人。
设z=f(u),u=xy+,f是可微函数,求
磁共振成像实际上是对人体内的什么进行成像
水电站巾动力渠道有非自动调节渠道和自动调节渠道两种,下面说法正确的是()。
两刑警在追击某犯罪嫌疑人的过程中,租了一辆出租车。出租车不幸被犯罪嫌疑人炸毁,司机被炸伤,犯罪嫌疑人被刑警击毙。该司机正确的救济途径是下列哪一项?()
炮制技术被认为是中医药的核心技术,也是中医独有的传统技能,掌握它就等于掌握中医药市场。国外企业通常通过在我国开办饮片加工厂、聘请国内炮制专家“偷学”炮制技术,目前这样的外资企业达到几十家。这是因为,一些地方政府对国家在特殊领域的规定并不了解,无从管起;还有
香港廉政公署之所以在反贪工作中所向披靡、闻名遐迩,就是因为它有一系列制度保证,其中最重要的就是“四大独立”________机构独立、人事独立、财政独立、办案独立。而其中的办案独立,正有赖于《廉政公署条例》赋予它的独立调查权。而对内地的监察反腐工作而言,这样
有如下程序:#include<iostream>usingnamespacestd;intmain(){charstr[100],*p;cout<<’’Pleaseinputastring:
Commutershavea40percentgreaterriskofendingupdivorced,accordingtoauniversitystudy.【C1】______youarereading
最新回复
(
0
)