新建From1（窗体），新建Command1（按钮CommandButton），代码：

运行结果：64个字节

另外一个VB6的代码是模块modSHA256.bas，代码：

调用方法：

新建From1（窗体），新建Command1（按钮CommandButton），代码：

Private Sub Command1_Click()
    Debug.Print SHA256("MaNongKu.com")
End Sub

运行结果是小写的SHA2356码，值同上方一样。