字符长度的问题

Question

我想生成文件在记事本里，可怎么也对不齐Dim strA as String
Dim strB as String
Dim strC as StringstrA = space(20 - len("ABCDE")) + "ABCDE"
strB = space(20 - len("中华人民共和国")) + "中华人民共和国"
strC = space(20 - len("ABCD(E)")) + "ABCD(E)"可到记事本里根本无法让它们的结尾对齐在第20个字符的地方我的新手望大家帮忙

Answer 1

不用len,改用这个函数试试
lenb(strconv(字符串,**fromunicode))好像是这样的,忘了

Answer 2

Private Sub Form_Load()
Dim strA As String
Dim strB As String
Dim strC As StringstrA = Space(20 + Len("中华人民共和国") - Len("ABCDE")) + "ABCDE"
strB = Space(20 - Len("中华人民共和国")) + "中华人民共和国"
strC = Space(20 - Len("中华人民共和国") + Len("ABCD(E)")) + "ABCD(E)"
Text1.Text = Text1.Text & strA & vbCrLf
Text1.Text = Text1.Text & strB & vbCrLf
Text1.Text = Text1.Text & strC & vbCrLf
End Sub

Answer 3

Up的程序，并没有让所有的字符串结尾对齐在第20个字符的位置
Private Sub Form_Load()
Dim strA As String
Dim strB As String
Dim strC As StringstrA = Space(20 - Len("ABCDE")) + "ABCDE"
strB = Space(20 - 2 * Len("中华人民共和国")) + "中华人民共和国"
strC = Space(20 - Len("ABCD(E)")) + "ABCD(E)"
Text1.Text = Text1.Text & strA & vbCrLf
Text1.Text = Text1.Text & strB & vbCrLf
Text1.Text = Text1.Text & strC & vbCrLf
End Sub

Answer 4

楼上的意思中文占两个字符？
如果字符串里有英文有中文呢？
如何区分字符串里的中英文strA = "A中B国"

Answer 5

VB使用Unicode字符集
所有字符（不管中文和英文）都占一个Unicode字符——两个字节

Answer 6

Private Sub Form_Load()
Dim strA As String
Dim strB As String
Dim strC As StringstrA = Space(20 + Len("中华人民共和国") - Len("ABCDE")) + "ABCDE"
strB = Space(20 - Len("中华人民共和国")) + "中华人民共和国"
strC = Space(20 - Len("中华人民共和国") + Len("ABCD(E)")) + "ABCD(E)"
Text1.Text = Text1.Text & strA & vbCrLf
Text1.Text = Text1.Text & strB & vbCrLf
Text1.Text = Text1.Text & strC & vbCrLf
End Sub这个在我的机器上确实通过了,把text的多行设置为true.长度要大于最长的那行.请在试试.