在计算机系统中，数值一般用补码来表示和存储，补码由符号位和数值位两部分 组成，符号位用0表示正数，用1表示负数．例如，整数n（-128≤n≤127）用8位二进制补码的表示方法为：
| 符号位（1位） | 数值位（7位） |
| 第1位（最高位） | 第2～8位 |
例：12的8位二进制表示00001100，最高位即符号位“0”表示正数．
②负数：除符号位外，所有位取反，然后+1．
例：-5的8位二进制补码表示方法如下，5对应7位二进制数为0000101 （原码），所有位取反后为1111010（反码），再加1后为1111011（补码），再设置符号位为1，因此-5 用8位二进制补码表示为11111011．
小明设计了一个VB程序，点击“补码”按钮Command1，将文本框Text1中输入的整数 n（-128≤n≤127）转换成相应的补码，并在文本框Text2中输出，程序结果如图所示，请将横线处的代码补充完整．
Private Sub Command1_Click （ ）
Dim n As Integer,a As Integer,i As Integer
Dim m（1To 8）As Integer
Text2．Text=““
n=Val（Text1．Text）
If n＞=0The
‘计算二进制原码
For i=8To 2Step-l
m（i）=n Mod 2
n=n\2
Next i
‘设置符号位
m（1）=0
Else
n=-n
‘计算二进制反码
For i=8To 2Step-l
m（i）=①
If（n Mod 2=1，0，1）
If（n Mod 2=1，0，1）
n=n\2
Next i
‘加1计算
i=8
Do While m（i）=1
②
m（i）=0
m（i）=0
i=i-1
Loop
m（i）=1
‘设置符号位
m（1）=1
End If
’输出结果
For i=l To 8
Text2．Text=Text2．Text & m（i）
Next i
End Sub
（1）-27用8位二进制补码表示为
11100101
11100101
（2）请在横线处填入合适的代码．
【答案】If（n Mod 2=1，0，1）；m（i）=0；11100101
【解答】
【点评】
声明：本试题解析著作权属菁优网所有，未经书面同意，不得复制发布。
发布：2024/4/20 14:35:0组卷：19引用：4难度：0.1
相似题
-
1．运行列表框对象语句：List1．AddItem=“同学们好！“，会显示：同学们好！；
（判断对错）发布：2025/1/2 11:30:1组卷：6引用：6难度：0.9 -
2．小张设计了一个“加减运算练习”VB程序．界面如下图所示．单击“出题”Command1按钮显示两个运算数和运算符号，并计数．在文本框Text1中输入计算结果后单击“判断”按钮Command2，如果计算结果正确，则得分加10分，直至完成10题测试．VB程序如下，但加下横线处代码有错，请改正．
Dim n,s As Integer'n为试题计数器，s为得分
Dim a,b As Integer'a,b 为两个运算数
Dim c As String'c为运算符：“+“表示加法，“-“表示减法
Private Sub Form_Load（ ）n=0：
s=0
End Sub
Private Sub Command1_Click（ ）‘出题按钮
Randomize
n=n+1
If n＜11Then
Label1．Caption=“No：“+Str（n）
a=Int（Rnd*100）'a,b为运算数，且要求a不小于b
b=Int（Rnd*100）
If a＞bThen t=a：a=b：b=t'（1）
If Rnd＞0.5Then c=“+“Else b=“-“'（2）
Label5．Caption=Str（a）+c+Str（b）+“=“
Text1．Text=““
Else
Command1．Caption=“完成测试“
End If
End Sub
Private Sub Command2_Click（ ）‘判断按钮
If c=“+“Then
If a+b=Val（Text1．Text） Then s=s+10
Else
If a+b=Val（Text1．Text）Then s=s+10'（3）
End If
Label3．Caption=“得分：“+Str（s）
End Sub.发布：2025/1/2 9:30:2组卷：6引用：2难度：0.9 -
3．某智能农场启用了根据土壤湿度自动控制喷淋装置进行浇水的信息系统，每隔一段时间，系统自动检测土壤湿度，当土壤湿度低于某个阈值时将自动浇水。小李为统计出某段时间内（不超过100个时间单位）系统自动控制浇水的次数和该时间段内前后两次启动自动浇水系统的最大时间间隔单位，小李进行了数据分析，他认为如果某单位时间的土壤湿度比前一单位时间的土壤湿度高并且本单位时间内没有下雨，则认为启用了浇水系统。由此他编写了一个VB程序实现该功能：在文本框Text1中输入某段时间内的湿度值，在文本框Text2中输入该段时间内对应的天气情况，单击命令按钮Command1，在文本框Text3中显示系统自动浇水次数，Text4中显示前后两次自动浇水系统启用的最大时间间隔单位。
（1）在Private Sub Command1_Click（ ）中，Command1、Click分别表示（单选，填字母：A.对象名、属性名/B.对象名、事件名/C.类名、方法名）。
（2）实现上述功能的VB程序如下，请在画线处填入合适的代码。
（3）程序中加框处代码有错，请改正。
发布：2025/1/2 11:0:1组卷：0引用：1难度：0.3
