Question

vb中提取单个汉字的语句怎么实现

vb中提取单个汉字的语句怎么实现,急用，谢谢

Answer 1

Private Sub Form_Load()
Me.AutoRedraw = True
Dim Str1, str2 As String
Str1 = "我们的家园"
Me.Print "原始字串：" & Str1
Me.Print "字串长度： " & Len(Str1)
str2 = Left(Str1, 1)
Me.Print "Left(Str1, 1)提取的汉字：" & str2
str2 = Mid(Str1, 3, 1)
Me.Print "Mid(Str1, 3, 1)提取的汉字：" & str2
End Sub

Answer 2

mid函数，注意在调用得时候汉字仍然按照一个长度计算 比如 截取str=“12321汉字232”中汉字两个字mid(str,6,2)即为 汉字这两个字，当然取 汉 把长度定为1就可以了mid(str,6,1)

Answer 3

提取？
是截取一个字符串还是生成一个汉字？