Dim Temp As String * 50
定义改为
Dim Temp As String
不行吗?
试试下面的程序。 Dim strTest1 As String * 50
Dim strTest2 As String
strTest1 = "1111"
strTest2 = "1111"
Debug.Print "[" & strTest1 & "]"
Debug.Print "[" & Trim(strTest1) & "]"
Debug.Print "[" & strTest2 & "]"
定义改为
Dim Temp As String
不行吗?
试试下面的程序。 Dim strTest1 As String * 50
Dim strTest2 As String
strTest1 = "1111"
strTest2 = "1111"
Debug.Print "[" & strTest1 & "]"
Debug.Print "[" & Trim(strTest1) & "]"
Debug.Print "[" & strTest2 & "]"
X = GetPrivateProfileString(lpAppName, lpKeyName, lpDefault, Temp, Len(Temp), lpFileName)返回的是实际取得的字符的个数