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-07-22
70
问题
设有如下程序:
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/sCHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1),然后编写如下事件过程:PrivateSubCommand1_Click()x=0DoWhilex<50x=(x+2)*(x+3):n=n+1L
要计算x的平方根并放入变量y,正确的语句是
有如下程序:PrivateSubCommand1_Click()DimiAsInteger,jAsInteger,sumAsIntegern=1Doj=1
窗体上有1个名称为Command1的命令按钮,事件过程如下:PrivateSubCommand1_Click(Dimarr_x(5,5)AsIntegerFori=1To3Fori=2To4
某人设计了如下程序用于计算并输出71(7的阶乘)PrivateSubCommandl_Click()t=0Fork=7To2Step-1t=t*kNextPritet
工程中有Form1、Form2两个窗体(Form1中有文本框Text1;Form2中有Text1文本框和Command1命令按钮)。Form1是启动窗体。在这些模块中编写下面的程序代码:Form1中的代码如下:Form
执行语句DimX,YAsInteger后,
能够将组合框Combo1中最后一个数据项删除的语句为( )。
随机试题
关于质押式回购,以下说法错误的是()。
奥氏体加铁素体的双相组织抗晶问腐蚀的能力要比单相奥氏体来得强。()
对血红蛋白与氧结合特点的描述错误的是
滴虫性阴道炎选用的阴道冲洗液为
甲氧氯普胺属于
关于混凝土连续梁合拢的说法,错误的是()。
A公司有500名职工,从2016年起实行累积带薪缺勤制度,该制度规定,每个职工每年可享受6个工作日带薪年休假,未使用的休假只能向后结转一个日历年度,超过1年未使用的权利作废,不能在职工离职时获得现金支付。2016年12月31日,每个职工当年平均未使用年休假
下面合法的一个IP地址是()。
A、IBM.B、Asupermarket.C、ABCCompany.D、Abookstore.CWhodoesthewomanworkfor?
Weallknowthatemotionsoriginateinthebrain.Butweusuallytalkaboutouremotionscomingfromourhearts.Ifsomeoneyou
最新回复
(
0
)