首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a$=InputBox("请输入一个二进制数") n=Len(a$) For i=1 To n Dec=Dec * 2+
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a$=InputBox("请输入一个二进制数") n=Len(a$) For i=1 To n Dec=Dec * 2+
admin
2020-07-22
30
问题
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
a$=InputBox("请输入一个二进制数")
n=Len(a$)
For i=1 To n
Dec=Dec * 2+ (a$, i, 1)
Next i
Print Dec
End Sub
程序功能为:单击命令按钮,将产生一个输入对话框,此时如果在对话框中输入一个二进制数,并单击"确定"按钮,则把该二进制数转换为等值的十进制数。这个程序不完整,应在" "处填入的内容是( )。
选项
A、Left
B、Right
C、Val
D、Mid
答案
D
解析
将二进制数转换为十进制数需要将二进制数的每一位取出来进行运算,从一个数值字符串中截取一位数字字符要使用Mid函数,因此在程序空缺处该填入Mid。
转载请注明原文地址:https://jikaoti.com/ti/ZLS0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
A、选择B、投影C、自然连接D、并A由关系R到关系S为一元运算,排除C和D。关系S是关系R的一部分,是通过选择之后的结果,因此选A。
为了实现对象的自动拖放,应该设置该对象的一个属性。下面设置中正确的是
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行后,单击“读入数据”按钮,可将考生文件夹下in3.txt文件中的所有英文单词读入,并在Text1文本框中显示;单击“插入列表框”按钮,则按顺序将每个单词作为一项添加到List1列表框中(如图所示)
对于含有多个窗体的工程而言,以下叙述中正确的是
在窗体上有一个文本框Textl,Text属性值为空,然后编写如下事件过程:PrivateSubTextlKeyPress(KeyAsciiAsInteger)DimstrAsString,nAsInteger
程序运行时,要清除图片框Picture1中的图像,应使用语句()。
要清除已经在图片框Picturel中打印的字符串而不清除图片框中的图像,应使用语句()。
表达式Str(Len("123"))+Str(77.7)的值是()。
在考生文件夹下有一个数据库文件“samp3.accdb”,其中存在已经设计好的表对象“tEmployee”和查询对象“qEmployee”,同时还设计出以“qEmployee”为数据源的报表对象“rEmployee”。请在此基础上按照以下要求补充报表设计。
随机试题
大肠埃希菌为正常菌群成员,但当侵犯________组织时可引起化脓性感染。引起肠内感染的大肠埃希菌主要有________、________、________、________。
Whenthepeopleinthatareafellupondarkdays,boththegovernmentandthepeoplefromallwalksoflifeshowedtheirconcern
下列不属于应当征收消费税的产品是()。
我国证券分析师行业自律组织是()。
基金管理公司目前应按照不低于基金管理费收入的10%计提风险准备金。
2017年1月5日,某国有企业厂长要求本单位出纳员李某,将收到的下脚料销售款8000元另行存放不入账。李某没有按照厂长的要求执行,而是按规定作为零星收入入账,致使厂长很不高兴。他要求会计部门负责人王某召开会议予以整顿。会上,王某说,《会计法》规定了单位负责
从国外引进出版的某图书中,存在丑化我国某少数民族生活习俗的语句,这是出了()差错。
工业机器人是最典型的机电一体化装备,技术附加值高,应用范围广,是先进制造业的支撑技术和信息化社会的新兴产业。下列不属于工业机器人发展的关键技术是:
窗体上有名称为Command1的命令按钮和名称为Text1的文本框PrivateSubCommand1_Click()PrivateSubText1_GotFocus()Text1.Text="程序设计"Text1.Text="等级考试
APPLEANDCELERYSALAD100mlmayonnaise50gchoppedfreshcilantroleaves50mlfreshlemonjuice8celerystalks6crispredapp
最新回复
(
0
)