进制及数制转换 知识点题库
下列说法正确的是（ ）
⑴将字符的ASCII码值加20（十进制）；
⑵以字节为单位进行加密处理；
⑶将1个字节的8位二进制数左移一位，最低位用左移出的最高位填充；
⑷将处理后的8位二进制数分割成前4位与后4位两个二进制数；
⑸分别将上述两个4位二进制数转换为十六进制数；
⑹所得两个十六进制数码交换顺序后连接，即为该字节的密文。
用UltraEdit-32软件观察“i-hangzhou”这几个字符的内码，如图所示，则字符H加密后的密文是（ ）
以下说法正确的是（ ）
-
（1） 结合运行界面，当前窗体标题文字“进制转换”是From1对象的属性。
-
（2） 请根据题意将下列程序补充完整。
Private Sub Command1_Click()
Dim i As Integer, n As Integer, dec As Integer
Dim ch As String, s As String
dec=0
For i=1 To Len(s)
ch=Mid(s, i, 1)
If then
n=Asc(ch)-Asc("A")+10
Else
n=Val(Mid(s, i, 1))
End If
dec=dec+n * 16 ^ (Len(s)-i)
Next i
Text2.Text=str(dec)
End Sub
-
（3） 若在文本框Text1中输入“31”,则文本框Text2输出的值是。
第一步：x被除16取余数r1，r1是所求的十六进制数的一个数(第一次就是个位数)；
第二步：r1转换成十六进制数的一个基数并转换成字符，追加到十六进制数s的左边；
第三步：求出x被除16的商x1；
第四步：对x1重复第一、二、三步，直至商为0；
第五步：最后的s即为所求的十六进制数；
下列Visual Basic程序的功能是将一个十进制正整数x转换成十六进制数。界面如图所示，在文本框Text1中输入一个十进制数，单击“十进制转十六进制”按钮(Command1)后，在文本框Text2中输出转换的结果。
相应的Visual Basic程序如下:
Private Sub Command1_Click()
Dim s As String, r As Integer
dec=val(Text1.Text) ‘dec得到一个十进制整数,例如:255
base=16 ‘base表示16
s=“” ‘s变量存放要转换到的十六进制整数
Do While dec <> 0
r=(1)
If r >=10 Then ‘如果base>10,r可能>10
s=Chr(65+(r-10))+s ‘Chr(65)=“A”,16进制数A对应10;
Else
s=Str(r)+s ‘余数r<10时,十进制数和十六进制基数相同
End If ‘Chr(65+( r-10))或str(r)在s左边,实现了反次序输出
dec=(2)
Loop
Text2.Text=s
End Sub
在(1)处应填入 ， 在(2)处应填入。
A.base Mod dec B.dec/base
C.dec Mod base D.dec\base
以下分析正确的是（ ）
下列说法正确的是（ ）
