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
2015-10-23
20
问题
设有如下程序:
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://jikaoti.com/ti/IiJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面程序运行后,输出结果是()。PrivateSubmysub(b()AsInteger,OptionalByValnAsInteger=2)ForI=1to4b(I)=n*INextIEndSu
在数据管理技术的发展过程中,经历了人工管理阶段,文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是()。
单击命令按钮时,下列程序代码的执行结果为()。PrivateSubProcl(nAsInteger,ByValmASInteger)n=nMod10m=m\10EndSubPriva
执行以下程序段后,变量c$的值为()。S$="VisualBasicProgramming"b$="Quick"c$=b$&UCase(Mid$(a$,7,6))&Right$(a$,12)
要使一个图片框控件能自动地附着在窗体的一条边上,应设置它的()属性。
设在窗体上有两个命令按钮,其中一个命令按钮的名称为cmda,则另一命令按钮的名称可能是()。
如果不指明函数过程参数的类型,则该参数的数据类型为【】。
在设计程序时,应采纳的原则之一是
下列不能打开菜单编辑器的操作是()。
随机试题
简述“姓”“氏”的最初区别及演变过程。
手术后并发尿路感染的基本原因是
药品零售企业不得经营的药品包括()。
对于某些缺少特定能力或者资源的公司来说,( )可以作为合作战略的最基本手段。
会场布置情况的检查一般不采用()
Hegaveusanodandmurmureda"Yes"after______seemedlikehours.
静物画《向日葵》、肖像《邮递员罗林》、风景画《洛.克罗田野》,是法国后印象主义画家__________的作品。
设f(x,y)是连续函数,则二次积分可写成()
下面关于微处理器的叙述中,不正确的是______。
关系模型的完整性规则是对关系的某种约束条件,包括实体完整性、【】和自定义完整性。
最新回复
(
0
)