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
55
问题
设有如下程序:
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://kaotiyun.com/show/KLFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮,然后编写如下程序:Subinc(aAsInteger)StaticxAsIntegerx=x+aPrintx;EndSubPrivateSubCommand1_Clic
文件d:\city.txt的内容如下:BeiJingTianJinShangHaiChongQing编写如下事件过程:PrivateSubForm_Click()DimInDOpen"d:\city.txt"For
(1)在名称为Form1,标题为“列表框练习”的窗体上添加一个名称为List1的列表框,表项内容依次输入XXX、ddd、mmm和sag,且表项内容以宋体14号字显示,如图1所示。最后设置相应属性,使程序运行后列表框中的表项按字母升序方式排列,如图2所示。
已知在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的值表示的是发生此事件时(
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下:PrivateTypex aAsInteger bAsIntegerEndTypePrivateSubCommand1_Cli
随机试题
商业折扣和现金折扣均使得企业的营业收入减少。()
归档文件按年度分类就是根据文件形成的年度进行分类。
A.Lasegue征(+)B.McMurray征(+)C.Thomas征(+)D.Gaenslen征(+)E.Phalen征(+)半月板损伤时的体征是
不在城市总体规划成果要求以内的有()。
关于投资偏差和进度偏差的说法,正确的是()。
下列表述中不是申不害所主张的是()
设循环队列的存储空间为Q(1:35),初始状态为front=rear=35。现经过一系列入队与退队运算后,front=15,rear=15,则循环队列中的元素个数为
下列程序的输出结果是______。main(){inti,x[3][3]=(1,2,3,4,5,6,7,8,9};for(i=0;i<3;i++)printf("%d,",x[i][2-i]);}
ItisnoteasytotalkabouttheroleofthemassmediainthisoverwhelminglysignificantphaseinEuropeanhistory.Historyan
A、Kidsarenotallowedtoeatsnowinwinter.B、Drinkingalcoholisnotagoodwaytokeepwarm.C、Adultslikeeatingsnowjust
最新回复
(
0
)