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
2019-06-20
46
问题
设有如下程序:
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/7uUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有数据定义语句:DimX,YAsInteger以上语句表明
下列叙述中正确的是
有下面程序代码:PrivateSubCommand1_Click()a=3s=0Fork=1To5s=s+aModka=a+kNextkPrintsEndSub程序运行后,单击命令按钮Command1,输出结果是
编写如下程序:PrivateSubCommand1_Click()DimscoreAsIntegerscore=86Ifscore>85Thenr=1ElseIfscore>60Thenr=2Elser=0EndIf
窗体的MouseUp事件过程如下:PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)……EndSub关于以上定义,以下叙述中错误
以下关于VB对象属性的叙述中,错误的是
下面有关标准模块的叙述中,错误的是
工程中有Form1、Form2两个窗体(Form1中有文本框Text1;Form2中有Text1文本框和Command1命令按钮)。Form1是启动窗体。在这些模块中编写下面的程序代码:Form1中的代码如下:PrivateSubText1_DblC
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:PrivateSubCommand1_Click()Open"c:\f1.txt"For
下面程序运行后,语句“Printi”执行的次数是()。PrivateSubForm_Click()DimiAsInteger,jAsIntegeri=0Doi=i+1Forj=10To1Step-3i=i+jPri
随机试题
Ourtwoseniorprogrammers________eachothereversincetheywereatcollege.
面对资源约束趋紧、环境污染严重、生态系统退化的严峻形势,必须树立()的生态文明理念,保护自然生态系统,维护人与自然之间形成的生命共同体。
职业接触限值为最高容许浓度的有害物质采样,采样时间一般不超过
轻型阿弗他溃疡临床表现错误的是
女性,30岁,发热伴牙龈出血三周。查体:贫血貌,脾肋下3cm,胸骨压痛(+),血红蛋白70g/L,白细胞14.0×109/L,血小板35×109/L,骨髓增生明显活跃,原始细胞占0.62,为进一步诊断,应首选哪项检查
根据《建设工程施工合同(示范文本)》,由于设计变更需给予承包人增加合同价款时,变更价款的支付时间为()之日。
某进口设备到岸价为人民币5600万元,关税税率为21%,增值税率为17%。该批设备无消费税,则该设备应缴纳的增值税为______万元。
核DNA被32P标记的精子与未被标记的卵细胞受精后,在不含放射性标记的培养基中连续分裂2次。下列分析正确的是()
教师就是教书的。()
设函数y=1/(2x+3),则y(n)(0)=______.
最新回复
(
0
)