0 Then Print Mid(num,P+11 Else Print "END"" />
设有如下程序: Private Sub Form_Click() num=InputBox("请输入一个实数"):P=InStr(num,".") If P>0 Then Print Mid(num,P+11 Else Print "END"
首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
0 Then Print Mid(num,P+11 Else Print "END"">设有如下程序: Private Sub Form_Click() num=InputBox("请输入一个实数"):P=InStr(num,".") If P>0 Then Print Mid(num,P+11 Else Print "END"
设有如下程序: Private Sub Form_Click() num=InputBox("请输入一个实数"):P=InStr(num,".") If P>0 Then Print Mid(num,P+11 Else Print "END"
admin
2015-05-29
54
问题
设有如下程序:
Private Sub Form_Click()
num=InputBox("请输入一个实数"):P=InStr(num,".")
If P>0 Then
Print Mid(num,P+11
Else
Print "END"
运行程序,单击窗体,根据提示输入一个数值。如果输入的不是实数,则程序输出“END”;
否则
选项
A、用字符方式输出该实数
B、输出该实数的整数部分
C、输出该实数的小数部分
D、去掉实数中的小数点,保留所有数码输出
答案
C
解析
字符串匹配函数Instr用于查找第二个参数在第一个参数中第一次出现的位置,若未找到返回0;Mid(字符串,起始位置[,个数])函数用于从已有字符串中取出从指定位置开始的含指定个数字符的字符串,若不指定个数将返回字符串中从参数“起始位置”到字符串尾端的所有字符。本题实际就是先找到小数点的位置,然后输出小数点后面的部分,即小数部分。
转载请注明原文地址:https://kaotiyun.com/show/XxQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Forn=1To20IfnMod3<>0Thenm=
以下叙述中错误的是
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:PrivateSubForm_Load()ShowText1.Text=""Text2.Text="’’Text1.S
最简单的交换排序方法是
在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、Label3的标签,然后编写如下代码:PrivatexAsIntegerPrivateSubCommand1_Click()St
在窗体上画一个命令按钮,名称为Commad1,然后编写如下事件过程:PrivateSubCommand1Click()a$="softwareandbardware"b$=Right(a$,8)
如果一个变量未经定义就直接使用,则该变量的类型为
下列不能打开菜单编辑器的操作是()。
下列叙述中正确的是()。
下列叙述中正确的是()。
随机试题
对于流通企业而言,一个重要课题是提高企业的经营管理水平和技术装备水平,由粗放式经营管理向________经营管理转变。
将一个应用程序生成的图形嵌入到另一个文档中,当在该应用程序中修改该图形后,文档中嵌入的内容_______。
患者男,46岁。回吸性血涕3个月。查体:锁骨上可触及肿大淋巴结。穿刺细胞学示“转移性鳞癌”。该鼻咽癌患者属于局部晚期,推荐在放疗期间的同步化疗药物为
只观察牙龈情况的指数是
某公司2000年6月以出让方式取得一宗位于某市某区某路×号的国有土地使用权,面积为18600m2,用途为工业,已办理土地登记手续。2004年5月,该公司拟以其所使用的国有出让土地作抵押,向某银行申请贷款。为验证该公司土地状况的真实性,降低银行贷款风险,现该
已知苹果的GI=38,则苹果属于()。
《农村土地承包法》规定,林地的承包期为()。
党的十七大指出,实现未来经济发展目标,关键要在()方面取得重大发展。
AMajorComposerLudwigvonBeethoven,amajorcomposerofthenineteenthcentury,overcamemanypersonalproblemstoachiev
Globalizationisaphenomenonandarevolution.Itissweepingtheworldwithincreasingspeedandchangingthegloballandscape
最新回复
(
0
)