如何去掉其中的空格？

Question

Type SubjectInfo                 
   name As String 
   sex As Integer
   age  As Integer   
End Type
Global SB As SubjectInfo

Answer 1

可以在使用的时候去掉尾部空格
MyName=Rtrim&(SB.name)

Answer 2

myname=Left(sb.name, InStr(1, sb.name, vbNullChar))

Answer 3

Type SubjectInfo                 
   name As String * 8  
   sex As Integer
   age  As Integer   
End Type
将name As String * 8 改为name As String
再用SB.name=Trim(SB.name)