主题：是否可以判断输入的是中文还是英文?

参考

Dim str As String = "中华人民abc共和国"
Dim len As Integer = Encoding.default.getbytes(str).length
msgbox(len)