多谢了！！！请问一下代码中是什么意思

Question

dim sReturn as string
sReturn = string$(255,0)   ‘$是什么，整句是什么意思我能看到
msgbox sReturn    显示为  aaa
但是从监视器窗口看到 sReturn 为  “aaa              ...”
所以以下语句永不成立：
if sReturn = "aaa" then ...如果想要以上语句成立，请问我该怎么办？谢谢！！！
 

Answer 1

赋给sretrun 255个 空值。  "                        " 没有a的，就是空的

Answer 2

设置sreturn的缓冲区为255的unicode字符。
你可以用下面的函数来去掉str 0
Private Function Trim0(sName As String) As String' Keep left portion of string sName up to first 0. Useful with Win API null terminated strings.Dim x As Integer
x = InStr(sName, Chr$(0))
If x > 0 Then Trim0 = Left$(sName, x - 1) Else Trim0 = sNameEnd Function

Answer 3

sReturn= Replace(sReturn, Chr(0), "")

Answer 4

这个函数我条是通过了，绝对没问题
Private Function Trim0(sName As String) As String
Dim x As Integer, TempStr As String
Dim ln As Integer
ln = Len(sName)
For x = 1 To ln
  TempStr = Left(sName, 1)
  If TempStr <> " " Then
    Trim0 = Trim0 & TempStr
  End If
  ln = ln - 1
  sName = Right(sName, ln)
Next x
End Function

Answer 5

请问要在字符串“aaa”后面补上10个0，变成字符串
“aaa0000000000"
该怎么办？

Answer 6

sReturn = string$(3,"a")
sReturn = sReturn & string$(10,"0")