我试图显示我的SC_User表的解密Us_User值,我不知道如何将数据表转换为字符串以使用DecryptDES函数。组合功能:
Public Sub ToCombo(ByVal Combo As ComboBox)
Dim encript As New SC_Encript
Dim ds As New DataSet
Dim query As String = ""
query = "Select Us_User From SC_User Order By (Us_User)ASC"
ds = DataAccess.DSQuery(query, "SC_User")
Combo.DisplayMember = "Us_User"
Combo.ValueMember = "Us_User"
'Combo.DataSource = encript.decryptDES(ds.Tables("SC_User") Obviously this line doesn't work , but shows the idea
End Sub
任何帮助?