vb 字符串比较
--------------------编程问答-------------------- ByVal lpReturnedString As String=>
ByRef lpReturnedString As String
Dim pwd As String
=>
Dim pwd As String * 255
xx = Trim(Replace(pwd, Chr(0), ""))
If xx = Text1.Text Then
... --------------------编程问答-------------------- 长度都不一样，当然不一样 --------------------编程问答-------------------- 函数声明没有错，pwd 变量也可以不声明成变长字符串，但必须在使用前实例化（赋值）。
另外，从 API 返回的字符串是包含一个 vbCr 作为结束符的。也就是长度会加 1：
'-----------------------------------------------------------------------
Private Sub Form_Load()
pwd = Space(257)
GetPrivateProfileString "count", "kl", "", pwd, 256, "C:\text\text.ini"
pwd = Trim(pwd)
pwd = Left(pwd, Len(pwd) - 1)
End Sub
'-----------------------------------------------------------------------
--------------------编程问答-------------------- 楼上正解！请参考！
补充：VB , 基础类
