统计可多行输入的文本框输入的字符数问题～！

[jeanso]

怎么判断输入的是中文还是英文啊？（哪位仁兄有代码给小弟see see^_^）

[jeanso]

up~!

[yourwushi]

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i As Integer
For i = 1 To Me.TextBox1.Text.ToString.Length
If Asc(Mid(Me.TextBox1.Text.ToString, i, 1)) > 122 Or Asc(Mid(Me.TextBox1.Text.ToString, i, 1)) < 65 Then
Button1.Text = "不是英文" & Mid(Me.TextBox1.Text.ToString, i,1) Exit For
End If
Next
End Sub


通过ASCII码判断是否英文字母
中文判断自己想吧

[penning]

<textarea id=demo rows=5>输入文本框中字符串，中英混合，怎么求出多少汉字或者怎么求出混合字符串的长度，汉字为两个字符算

用javascript
</textarea>
<input type=button onclick=check(demo.value) value=统计>
<script>
function check(str){
var nC=str.match(/[\u4e00-\u9fa5]/g).length
var nE=str.match(/[\w]/g).length
alert("中文:"+nC+"\nEnglish:"+nE);
}
</script>

[adminyao]

STUDY!

[vzxq]

up

[yichuan1982]

怎么上面全部用的VB？

[yichuan1982]

顶

[yourwushi]

Regex.Replace(TextBox1.Text.ToString, "\r", "*")
多行的文本框,可用字符替换回车.