想请问hamming code用VB6来实现该怎麽下手呢?? 题目是传送端先将A及B XOR後 传给接收端 再用汉明码改正单一位元， 其中还要用随机的方式产生错误位元..(用VB模拟传送跟接收) 我现在只做到前面就卡关了.. 想问 <第一个问题>.. 若A是10~20bits，B是7~21bits，......那这样可以XOR吗? <第二个问题>.. 我做的B一值没办法由10进位转成二进位後只有7个bit 例如说：64-> 01000000 但是应该是要"1000000" 这样吧，到底是哪里错了呢? 下面是部分程式.. Private Sub cmdDenary2_Click() On Error Resume Next ' 如长度为 0。 If Len(txtDenary2.Text) = 0 Then Exit Sub End If If Val(txtDenary2.Text) < 64 Then MsgBox "本系统只接受64(7bit~21bit)以上值的转换。", vbOKOnly, Caption Call Clear(Me) Exit Sub End If If Val(txtDenary2.Text) > 2097151 Then MsgBox "只接受2097151(7bit~21bit)以下值转换", vbOKOnly,Caption Call Clear(Me) Exit Sub End If ' 侦测是为数字。 If IsNumeric(txtDenary2.Text) = False Then Exit Sub End If ' 利用下列函数开始计算。 txtBinary2.Text = DecimalToBinary(txtDenary2.Text) ' 十进位数值转换二位数数值； 上面的程式是从VB入门网的各个击破改了一点点的.. 在这( http://www.vbguide.com.tw/webback2.asp ) 全文搜寻 binary 後里面有个 "主题：如何对 Decimal, Binary, Octal, Hex, Ascii, Unicode 数值相互转换？" 是个很友善的程式 <第三个问题>... 就是汉明码了..想请问有没有直接的范例可供参考， 或是建议可以从哪里下手呢? QQ 谢谢 我有找到对岸的一些资料，不过是java的 在这( http://www.linuxsir.org/bbs/archive/index.php/t-267503.html ) 不好意思问题很多..这篇文章应该赚不少P币吧..^^||| --

※ 发信站: 批踢踢实业坊(ptt.cc) ◆ From: 61.223.227.50