[求助]加密，解密。写到哪里? - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Dim r As Row = Tables("密码管理").Current

If e.Sender.Value IsNot Nothing Then

Dim val1 As String = EncryptText(e.Sender.Value,"y","c") '加密

e.Sender.Value = val1

r("转帐密码") =val1

End If

我现在把加密写在：窗口txtbox,Validating事件里面在。（绑定了：密码，列）

但是，我操作时，比较已经加密了。我鼠标点进去这个已加密的TXT，留下，它又进行了加密。再解密，就不对了。

我感觉写的位置不对。

解决，我是一个按钮里面写解密代码，到没发现什么问题。

主题：[求助]加密，解密。写到哪里?