首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下程序: Private Sub Form_Click() Dim B As String Dim m As Integer, Dec As Integer B = InputBox("请输入一个二进制数") m = L
有如下程序: Private Sub Form_Click() Dim B As String Dim m As Integer, Dec As Integer B = InputBox("请输入一个二进制数") m = L
admin
2015-09-23
29
问题
有如下程序:
Private Sub Form_Click()
Dim B As String
Dim m As Integer, Dec As Integer
B = InputBox("请输入一个二进制数")
m = Len(B)
For i = 1 To m
Dec = Dec * 2 + Val( _____ )
Next i
Print Dec
End Sub
以上程序的功能是,从键盘上输入一个二进制数,把它转换为等值的十进制数并输出。程序不完整,在 _____ 处应填入的内容是
选项
A、Left(B, i)
B、Mid(B, i, 1)
C、Right(B, i)
D、Str(B)
答案
B
解析
Val是将字符串转化为数值。A项是截取左边的i个字符,利用Val,得到数值的左边前i位数字;B项是截取第i个字符,利用Val,得到数值的第i位数字;C项是截取右边的i个字符,利用Val,得到数值的右边前i位数字;D项是整个字符串,利用Val,转换为数字。根据题意应该选择B项,利用For循环,将输入二进制数的从首位到末位,转换为十进制数。
转载请注明原文地址:https://jikaoti.com/ti/S6J0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在执行KeyPress事件过程时,KeyASCII是所按键的【】值。对于有上档字符和下档字符的键,当执行KeyDown事件过程时,KeyCode是【】字符的ASCII值。
若某二叉树的前序遍历访问顺序是abdgcefh,中序遍历访问顺序是dgbaechf,则其后序遍历的结点访问顺序是______。
下列数据模型中,具有坚实理论基础的是______。
算法解析的目的是______。
要使文本框Text1不可用且文字居中,可以用以下语句______。
VisualBasic中窗体文件的扩展名是______。
编写如下事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)If(ButtonAnd3)=3ThenPrint"AAAA
一个工作人员可以使用多台计算机,而一台计算机可被多个人使用,则实体工作人员与实体计算机之间的联系是()。
下列关于队列的叙述中正确的是
如果A为整数,且|A|>=100,则打印"OK",否则打印"Error",表示这个条件的单行格式If语句是()。
随机试题
评估对象为一批库存的钢材,库存量为3000吨,评估单位提供的账册显示,其中1200吨是去年购入的,价格为每吨6000元;1000吨是今年年初购入的,价格为每吨5700元;还有800吨是本月购入的,价格为每吨5600元,则该批钢材的评估价值为
将会计凭证分为原始凭证和记账凭证的分类标准是
患儿,10岁,水肿、少尿4日,今日头晕,眼花,恶心,呕吐2次、抽搐1次。体检:体温37.6℃,血压165/120mmHg,眼睑、双下肢水肿。尿常规:蛋白(++)、红细胞15~20个/HP。血尿素氮5.8mmol/L。诊断考虑为
患者,女性,28岁,前臂行石膏绷带包扎后2小时,自觉手指剧痛。护士观察所见:手指发凉、发绀,不能自主活动,首先考虑
(2008年案例分析第66—70题)2002年6月6日,甲与乙签订了一份开发用于特种设备的变频装置的技术合同,双方约定乙在合同生效后的3个月内将该变频装置的图纸一份及样品一套送交甲,专利权归甲所有,甲支付乙开发费用100万元。2002年8月,甲取得该变频装
海云公司与金辰公司签订了一份装饰工程合同。合同约定:金辰公司包工包料,负责完成海云公司办公大楼的装饰工程。事后双方另行达成了补充协议,约定因该合同的履行发生纠纷,由某仲裁委员会裁决。在装饰工程竣工后,质检单位鉴定复合地板及瓷砖系不合格产品,海云公司要求金辰
公路工程三阶段设计是指()。
水流从四周沿径向进入转轮,然后近似以轴向流出转轮的水轮机是()。
待摊费用账户如有余额,其余额一般在借方。()
韩愈说:“以一身立教,而为师于百千万年间,其身亡而其教存。”由此可见,教师应做到()。
最新回复
(
0
)