如何知道一个字符串中是否包括半角字符或全角字符？

Question

程序中如何得到一个半角字符对应的全角字符？或反过来？
比如“？”（全角）和“?”（半角）这样的？

Answer 1

+1
所谓全角，就是占用两个字节，半角就是占用一个字节Len返回的是字符串的字长度（一个字=2个字节）
LenB返回的是字符串的字节长度如果两者不相等，那么字符串中肯定含有全角字符。

Answer 2

Option ExplicitPrivate Sub Command1_Click()
    Text2.Text = StrConv(Text1.Text, vbWide)    '将Text1中的半角，转换为全角，填入Text2中
    Me.Caption = "Text2.Text的长度是：" & LenB(Text2.Text)
End SubPrivate Sub Form_Load()
    Text1.Text = ","    '半角
    Text2.Text = ""
End Sub

Answer 3

VB6中有一个函数：StrConv是一个功能很强大的字符串处理函数，建议你留意它一下。