自定义函数 出现命名在空间无效
Imports System

Public Function Key(ByVal strCipherText As String) As String
.....
End Function

第一行说命名在空间无效
我放在代码最上面的

[解决办法]
应该是objCommand.CommandText = "UPDATE aaa SET abc= " + Key(abc)才对

[解决办法]
其实应该用parameter，不过偷懒的话
objCommand.CommandText = string.format( "UPDATE aaa SET abc= '{0} ' ",Key(abc))