首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a$=InputBox("请输入一个二进制数") n=Len(a$) For i=l To n Dec=De
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a$=InputBox("请输入一个二进制数") n=Len(a$) For i=l To n Dec=De
admin
2017-04-25
23
问题
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
a$=InputBox("请输入一个二进制数")
n=Len(a$)
For i=l To n
Dec=Dec*2+______(a$,i,1)
Next i
Print Dec
End Sub
程序功能为:单击命令按钮,将产生一个输入对话框,此时如果在对话框中输入一个二进制数,并单击“确定"按钮,则把该二进制数转换为等值的十进制数。这个程序不完整,应在横线处填入的内容是
选项
A、Left
B、Right
C、Val
D、Mid
答案
D
解析
Midl[字符串,起始位置[,个数])函数用于从已有字符串中取出从指定位置开始的含指定个数字符的字符串。本题中要将二进制数转换为十进制数,应该取出二进制数的每一位然后乘以位权。
转载请注明原文地址:https://kaotiyun.com/show/AGGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在程序运行期间可以将图形装入窗体、图片框或图像框的函数是
在窗体上画一个名称为Commaudl的命令按钮和两个名称分别为Text1、Text2的文本框,然后编写如下事件过程;PrivateSubCommand1_Click()n=Text1.TextSelectCasen
下列程序执行后,变量x的值为()。Dima,b,c,dAsSingleDimxAsSinglea=10b=30c=400Ifb>aThend=a:a=b:b=dEnd
每一个窗体或者控件都有一个名字,为提高程序的可读性,可以用前缀的方式来表示对象的类型,如Form的前缀为frm,则Image的前缀为【】,Picture的前缀为【】。
测试的目的是暴露错误,评价程序的可靠性;而【】的目的是发现错误的位置并改正错误。
下列程序段的运行结果是:PrivateSubCommand1_Click()DimnASIntegerI=21:n=3dowhileI>nI=I-nLoopPrintIEn
窗体上有名称分别为Textl、Text2的2个文本框,要求文本框Textl中输入的数据小于500,文本框Text2中输入的数据小于1000,否则重新输入。为了实现上述功能,在下划线处应填入的内容是()。PrivateSubTex
关系数据库中有3种基本操作,将具有共同属性的两个关系中的元组连接到一起,构成新表的操作称为______。
在窗体上画一个名称为Labell的标签,然后编写如下事件过程:PrivateSubForm_Click()Dimarr(10,10)AsIntegerDimiAsInteger,jAsInteger
随机试题
表达由许多部件及零件组成一台完整机器的图样称为总装配图。
可出现第二心音固定分裂的疾病是()
女性,45岁,黄疸、食欲不振、体重减轻已3个月,皮肤黄染,肝大,胆囊可触及。外院血检:STB180μmol/L,ALP(碱性磷酸酶)45U(金氏单位),ALT(SGPT)26U。该病人在门诊首选检查为
铁路运输企业逾期()日仍未将货物、包裹、行李交付收货人或者旅客的,托运人、收货人或者旅客有权按货物、包裹、行李灭失向铁路运输企业要求赔偿。
古代向导与现代导游的区别在于()。
我国境内的几处晚期猿人按时间顺序由远及近排列正确的是()。
Onhearingthenewsthatherfatherdiedofacaraccident,she______tears.
IrecentlyreadtheOxford【C1】______oftheTolstoy’sWarandPeace,translatedbyLouiseandAylmerMaude.【C2】______myshame,
WhenRodLavergotbehind,hewould______.
SmallSchoolsRisingA)Thisyear’slistofthetop100highschoolsshowsthattoday,thosewithfewerstudentsareflourishing.
最新回复
(
0
)