function hasch(S)
For I = 1 To Len(S)
C = Asc(Mid(S, I, 1)) ' 取得第 I 个字符组的字符码
If C < 0 or C > 128 Then ' 中文
hasch=1'返回 有中文
exit for
End If
Next
hasch=0'没有中文
end function
'1 为有
'0 没有
For I = 1 To Len(S)
C = Asc(Mid(S, I, 1)) ' 取得第 I 个字符组的字符码
If C < 0 or C > 128 Then ' 中文
hasch=1'返回 有中文
exit for
End If
Next
hasch=0'没有中文
end function
'1 为有
'0 没有
解决方案 »
- 求个结尾允许为空的正则!
- 求助,关于JS获取客户端IP地址后如何将其储存在服务器端数据库的问题
- 刷分的
- 这段表格排序的代码火狐下不兼容,里面两段代码不知其何解,望知道的人能指点一二
- Easyui DataGrid分页问题
- javascript:history.back()问题
- 父窗口(框架)弹出子窗口(框架),子窗口如何向父子窗口传值
- 自动生成的td怎么加方法
- 怎样使下拉框中的<option>aaa</option>居中显示?其它几项很长,第一项aaa靠在左侧太难看了!能否让aaa居中?
- javascript 中关闭浏览器窗口的问题(在线等待...)
- 怎么样动态的在客户端生成table,而且要定位,也就是我要table在我想要的地方生成,或者在表格内部内生成等等
- 如何在javascript内测试window.opener?
我怎么看不懂。
有JS的吗