module1.bas

来自「在Jpeg中Huffman采用的是范式Huffman编码。经过查相关资料有两种不」· BAS 代码 · 共 9 行

Attribute VB_Name = "Module1"
Type hafman
 p As Single               '概率
 n As Integer              '标记的值  0或1
 pointer As Integer        '指向下一个的值
 str As String
 cha As String
End Type