打印最后缺少一个字符？求解！多谢
str2 = lbl5.Text
Dim temp As String = str2


Dim j As Integer = 0
Dim k As Integer = 0
Dim i As Integer
Dim l As Integer = 0
MsgBox(str2.Length)
a = System.Text.Encoding.Default.GetByteCount(str2) / 72 ‘ 以72字节分行

a = Fix(a) + 1
b = 0
c = 0

Dim x(a - 1) As Integer

For l = 0 To a - 1 Step 1
x(l) = k
b += x(l)

j = 0
k = 0

For i = b + 1 To temp.Length - 1 Step 1 ’问题可能出在这行，如果写成temp.length报错

If Regex.IsMatch(temp.Substring(i, 1), "[\u4e00-\u9fa5]+") Then

j += 2
Else
j += 1
End If
If j <= 72 Then
k += 1
End If

Next
MsgBox(x(l))

prngraph.DrawString(Mid(temp, b + 1, k), prnfont1, prnbrush, lbl5.Left, lbl5.Top + c) '打印作业内容
c += 18
Next


lbl5.text为一字符串

现在情况是如果打印，前面都正常，只有最后一行的最后一个字，无法打印！求解！

多谢啊！

[解决办法]
嗯
[解决办法]