如何格式化中英文混合的字符串..

Question

例:
  dim StrTest as string
  StrTest="我喜欢CSDN"我希望能 让他占20个英文自符长度输出,且一个中文字符相当于两个英文字符...是否可以这样:
  dim StrTest as string *20
  StrTest="我喜欢CSDN" 
  .....
这样的问题是 , 个中文字符相当于一个英文字符..(结果是不能按预期格式打印出来,不整齐.)还请不吝赐教!

Answer 1

Private Sub Command1_Click()
Dim StrTest As String
StrTest = "我喜欢CSDN"
Dim xx As Long
xx = GetStrLength(StrTest)StrTest = StrTest & Space(20 - xx)End Sub

Answer 2

能否加＋“”来调整打印对齐的呢？ －－－－StrTest="我喜欢CSDN"