限制输入英文

如果要在本页输入的时候就立刻控制，那么把文本框代码替换成下面的，注意修改文本框名字哦： 如果在数据写入时检测，那在写入页面，先写出如下代码： 假设你的数据提交方式为post,表单中文本框名为：strtxt <% strtxt=request.form("strtxt") if IsNumeric(strtxt)=False then response.write "" end if %> IsNumeric就是专门用来判断数据是否为数字的，你可以灵活运用，

第一步监听输入事件，第二步获取输入框的value验证。。

$(document).ready(function(){ // 限制自定义周期只可以输入英文字母    $('#inputAreaId).keypress(function(event) {      var keyCode = event.which;       if (keyCode >= 65 && keyCode <=90)       return true;       else        return false;      }).focus(function() {       this.style.imeMode='disabled';      });   $('#inputAreaId'). mouseout(function(){          var input = $('#inputAreaId'). val();          if(input.length<50)            alert("输入的字母小于50.");      }); });希望能能帮到你！

VB.NET 可以用正则表达式呀.Imports System.Text.RegularExpressions'只能输入数字Public Shared Function IsHalfAlpNum(ByVal inField As String) As Boolean Dim ex As Regex = New Regex("[^0-9]") Return Not ex.IsMatch(inField)End Function'只能输入数字和小数点Dim ex As Regex = New Regex("[^0-9|^.]")'只能输入字母Dim ex As Regex = New Regex("[^A-Za-z]")

(asp)If ASC（文本框内容） > 47 ASC（文本框内容） < 58 Then response.write"........." Else KeyAscii = 0End If(VB)Public Sub JustNum(KeyAscii%) '本函数把所有非数字或小数点的按键忽略掉 If KeyAscii > 47 And KeyAscii < 58 Or KeyAscii = 8 Or KeyAscii = Asc(".") Then Exit Sub Else KeyAscii = 0 End IfEnd Sub