如何去除定义为String * 256 后面的空白

Question

    Dim strTest As String * 200
    strTest = "dd"
    
    MsgBox "-" & Trim(strTest) & "-"用Trim就把空格去掉了.

Answer 1

Private Sub Command1_Click()
    Dim str1 As String * 255
    str1 = "aaddf"
    a = InStr(str1, Chr(32)) - 1
    str2 = Left(str1, a)
    Debug.Print Len(str2)
End Sub

Answer 2

用RTRIM也是可以的啊，不知你的无作用是什么意思。

Answer 3

好办。定义一个中间变量做变换即可。
Dim str As String * 256
str="ddkkkdd"
Dim s As String
s=Trim(str)s即为"ddkkkdd"!