题目

奇偶校验是一种校验数据传输正确性的方法。其中奇校验方法：统计二进制数据的数位中“1”的个数，若个数为奇数，则校验位值为0，否则校验位值为1。小李编写了一个计算奇校验位值得VB程序，功能如下：在文本框Text1中输入1～255十进制待校验数，单击“计算”按钮Command1后，在文本框Text2中显示该数对应的二进制值，并在标签Label3中显示该数的校验位值。程序运行界面如图所示。 （1） 在设计程序界面时，要清空文本框中的显示内容，应修改该文本框中的属性。 （2） 实现上述功能的VB程序如下，请在划线处填入合适代码。 Private Sub Command1_Click()  Dim a As Integer, s As String  Dim n As Integer, t As Integer, v As Integer  n = Val(Text1.Text)  t = 0  s = ""  Do While n > 0 a = n Mod 2 n = n \ 2 t=① s = "Str(a)" + s  Loop  v = t Mod 2  Text2.Text = s  Label3.Caption = "校验位值：" +② End Sub （3） 运行该程序，在文本框Text1中输入22，单击“计算”按钮，则显示的校验位值是。 答案： 【1】Text 【1】t+a【2】str(1-v) 【1】0

查看本题答案和解析