0 Then Print Mid(num, p+1) Else " />
设有如下程序: Private Sub Form_Click() num=InputBox("请输入一个实数") p=InStr(num, ".") If p>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, ".") If p>0 Then Print Mid(num, p+1) Else
设有如下程序: Private Sub Form_Click() num=InputBox("请输入一个实数") p=InStr(num, ".") If p>0 Then Print Mid(num, p+1) Else
admin
2020-02-27
26
问题
设有如下程序:
Private Sub Form_Click()
num=InputBox("请输入一个实数")
p=InStr(num, ".")
If p>0 Then
Print Mid(num, p+1)
Else
Print "END"
End If
End Sub
运行程序,单击窗体,根据提示输入一个数值。如果输入的不是实数,则程序输出"END";否则( )。
选项
A、用字符方式输出该实数
B、输出该实数的整数部分
C、输出该实数的小数部分
D、去掉实数中的小数点,保留所有数码输出
答案
C
解析
InStr函数查找小数点在输入的实数中的位置,如果找不到将返回0。Mid函数一般有3个参数,从第2个参数指定的位置开始,在第1个参数字符串中截取第3个参数指定长度的字符,第3个参数可以省略,这时就一直截取到字符串尾部。因此程序的意思就是如果输入的是实数(p>0即说明找到了小数点,是实数)就输入该实数的小数部分,否则输出"END"。因此选项C正确。
转载请注明原文地址:https://kaotiyun.com/show/rPTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有下面程序代码:OptionBase1PrivateSubCommand1_Click()Dima(10)AsInteger,x,bx=InputBox("请输入一个多位整数")
对建立良好的程序设计风格,下面描述正确的是()。
下面有3个程序段可以正确判断,另一个不能正确判断的是
文件d:\city.txt的内容如下:BeiJingTianJinShangHaiChongQing编写如下事件过程:PrivateSubForm_Click()DimInDOpen"d:\city.txt"For
通常软件测试实施的步骤是
窗体上有一个名称为Timer1的计时器控件,一个名称为Shape1的形状控件,其Shape属性值为3(Circle)。编写程序如下:PrivateSubForm_Load() Shape1.Top=0 Timer1.Interval=100
在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下事件过程:PrivateSubCommand1_Click() Counter=0 Fori=1To4 Forj=6To1S
支持子程序调用的数据结构是()。
在数据管理技术发展的三个阶段中,数据共享最好的是()。
随机试题
下列何穴治疗急性病宜用三棱针点刺出血
患者,男,58岁。长期从事脑力劳动,反复心悸头晕1年,面色不华,倦怠无力,舌淡红,脉细弱。其证候是
A、0B、1C、2D、3A故选A。
收购要约约定的收购期限不得少于()日,并不得超过()日。
下列关于规范理财顾问服务业务操作程序的表述,正确的有()。
劳动争议调解的调解程序包括()。
改革开放以来,我国学者对货币需求模型进行了重新构造,认为社会公众的货币需求应包括()。
滞婚,是指某种条件限制使得原本可以结婚的人无法拿到结婚证的现象。根据上述定义,下列属于滞婚的是()。
例如:男:喂,请问张经理在吗?女:他正在开会,您半个小时以后再打,好吗?B
A、Inthevolcanoes.B、Onthefloorofthesea.C、Undertheriverbed.D、Atthefootofthemountains.A细竹推断题。文中指出数百万年前。钻石被强烈的火山
最新回复
(
0
)