题目

奇偶校验是一种校验数据传输正确性的方法。其中奇校验方法:统计二进制数据的数位中“1”的个数,若个数为奇数,则校验位值为0,否则校验位值为1。小李编写了一个计算奇校验位值的VB程序,功能如下:在文本框Tex1中输入十进制下1~255间的待校验数,单击“计算”按钮Commana1 后,在文本框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中输入2,单击“计算”按钮,则显示的校验位值是。 答案: 【1】text 【1】t+a【2】Str(1-v) 【1】0
信息技术 试题推荐
最近更新