0 Then Print Mid(num,P+1" />
设有如下程序: Private Sub Form_Click() Dam=InputBox(”请输入一个实数”):P=InStr(num,".") Ifp>0 Then Print Mid(num,P+1
首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
0 Then Print Mid(num,P+1">设有如下程序: Private Sub Form_Click() Dam=InputBox(”请输入一个实数”):P=InStr(num,".") Ifp>0 Then Print Mid(num,P+1
设有如下程序: Private Sub Form_Click() Dam=InputBox(”请输入一个实数”):P=InStr(num,".") Ifp>0 Then Print Mid(num,P+1
admin
2018-10-15
25
问题
设有如下程序:
Private Sub Form_Click()
Dam=InputBox(”请输入一个实数”):P=InStr(num,".")
Ifp>0 Then
Print Mid(num,P+1)
Else
Print”END”
End If
End Sub
运行程序单击窗体,根据提示输入一个数值。如果不是输入实数,则输出“END”;否则
选项
A、用字符方式输出该实数
B、输出该实数的整数部分
C、输出该实数的小数部分
D、去掉实数中小数点,保留所有数码输出
答案
C
解析
字符串匹配函数Instr用于查找第二个参数在第一个参数中第一次出现的位置,若未找到返回0;Mid(字符串,起始位置[,个数])函数用于从己有字符串中取出从指定位置开始的含指定个数字符的字符串,若不指定个数将返回字符串中从参数“起始位置”到字符串尾端的所有字符。本题实际就是先找到小数点的位置,然后输出小数点后面的部分,即小数部分。
转载请注明原文地址:https://jikaoti.com/ti/MJm0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮,然后编写如下程序:Subinc(aAsInteger)StaticxAsIntegerx=x+aPrintx;EndSubPrivateSubCommand1_Clic
文件d:\city.txt的内容如下:BeiJingTianJinShangHaiChongQing编写如下事件过程:PrivateSubForm_Click()DimInDOpen"d:\city.txt"For
已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下:OptionBase1PrivateSubCommand1_Click() DimsumAsInt
标准模块中用Private声明的过程属于私有过程,只能被它所在的模块中的其他过程调用,不能被工程中其他模块调用,用Public声明的全局变量属于公用变量,可以被工程中的任何模块引用。标准模块的文件扩展名是.bas。可以产生30~50(含30和50)之间
文本框Text1的KeyDown事件过程如下:PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger) ...EndSub其中参数KeyCode的值表示的是发生此事件时(
随机试题
测量套管接箍与套管短节法兰之间的距离时尺子要垂直,测量误差为()。
在什么条件下可以使用合作策略?
高血钾时心电图的特点是
子宫颈活体组织检查,钳取宫颈组织部位不正确的是
患者向药师咨询的主要内容不包括的是
男,20岁,颈上部囊性肿物数年,可活动,无明显症状。镜检见囊肿内含物呈浓稠黏液样,囊肿内衬复层扁平上皮,部分区域似复层柱状上皮,纤维囊壁内见大量淋巴样组织并形成淋巴滤泡。最可能的病理诊断是
患者,男,24岁。喘咳反复发作5年,每至春天春暖花开时哮喘发作,每伴少量黄稠痰,舌红苔黄,脉弦滑。常以麻黄、杏仁、石膏配
某妇女,33岁。孕3产1,主诉大便时阴道脱出一物,妇查:用力时阴道壁膨出,宫颈外口距阴道口约2cm,宫体及附件正常
A/口腔黏膜充血水肿呈红绒状B/口腔黏膜可见大小不等的溃疡C/口腔黏膜出现奶凝块状物D/口腔黏膜出现黄白色小水疱E/咽及软腭黏膜出现黄白色小水疱疱疹性口腔黏膜特征
按照《招标投标法》的规定,招标人可以根据招标项目本身的要求,在()中要求潜在投标人提供有关资质证明文件和业绩情况。
最新回复
(
0
)