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
20
问题
设有如下程序:
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
(1)在考生文件夹下有一个工程文件sjt3.vbp,在Form1的窗体中有一个文本框、一个计时器和两个命令按钮。程序的功能是在运行时,单击“开始计数”按钮,就开始计数(如图所示),每隔1秒,文本框中的数加1;单击“停止计数”按钮,则停止计数。要求:修改适当
(1)在名称为Form1,标题为“列表框练习”的窗体上添加一个名称为List1的列表框,表项内容依次输入XXX、ddd、mmm和sag,且表项内容以宋体14号字显示,如图1所示。最后设置相应属性,使程序运行后列表框中的表项按字母升序方式排列,如图2所示。
已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下:OptionBase1PrivateSubCommand1_Click() DimsumAsInt
(1)在考生文件夹下有一个工程文件sjt3.vbp,程序的功能是,在运行时,如果选中一个或两个复选框和一个单选按钮,则对文本框中的文本内容做相应的设置,如图所示。窗体上的控件已经给出,但没有给出主要程序内容,请编写适当的事件过程,完成上述功能。
文本框Text1的KeyDown事件过程如下:PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger) ...EndSub其中参数KeyCode的值表示的是发生此事件时(
随机试题
弱电系统的信息电缆与电源线不能同管敷设;若在同一电缆桥架内敷设,应采用()隔开。
市场预测是一项有章可循的工作,请简述市场预测的程序。
欲速则不达所体现的心理原理是()。
男性,65岁。颈部淋巴结肿大4个月,间歇性发热,肝肋下4cm,颈部淋巴结活检诊为霍奇金病。如果该例恶性淋巴瘤累及颈、腹股沟淋巴结、肝和肺。伴有发热、盗汗、体重减轻。临床分期应是
患者,女42岁,查体见胸部触诊语音震颤增强,最可能的是
具有推动和调控各脏腑,经络、形体和官窍生理活动功能的气是
WhichofthefollowingisNOTmentionedbytheauthorasaconsequenceofnewtechnologicaldevelopments?Whatistheauthor’s
民法在性质上属于()。
从“订单"表中删除签订日期为2004年1月10日之前(含)的订单记录,正确的SQL语句是
Manychildrenwhocan’tordon’t______areoftenbullied.
最新回复
(
0
)