1.先接收输入的值
2.判断输入的值
2.1判断是否接收参数，防止后续报错。使用StrPtr函数判断是否输入，对于null字符串(vbNullString)，StrPtr的返回值为0，而对于空字符串，函数的返回值为非零。（inputbox点击了取消或是直接关闭了窗口就是null）
2.2已接收（大概分三种情况，空字符串，不是数字，是数字但不是正整数）
2.2.1空字符串长度len为0
2.2.2使用IsNumric函数，检测变量是否为数字，是数字和数字字符串则返回 TRUE，否则返回 FALSE
2.2.3为负数或者不是整数，使用int函数和Excel的RoundUp函数，int函数取整（int(3.2)=3），RoundUp向上取零个小数位（RoundUp（3.2,0）=4），如果两个值不相等就是小数
Sub test()
dim examRoomCol
'输入需要的数字
examRoomCol = InputBox("请输考场号所在列？例：14")
If StrPtr(examRoomCol) = 0 Then
MsgBox "点击了取消或是直接关闭了窗口。"
If Len(examRoomCol) = 0 Then
MsgBox "未输入任何值。"
ElseIf IsNumeric(examRoomCol) = False Then
MsgBox "输入不为数字！请输入正整数！"
ElseIf examRoomCol <= 0 Or Application.RoundUp(examRoomCol, 0) <> Int(examRoomCol) Then
MsgBox "输入为小数或负数！请输入正整数！"
'主代码区
Sub test()'输入需要的数字examRoomCol = InputBox("请输考场号所在列？例：14")If StrPtr(examRoomCol) = 0 Then MsgBox "点击了取消或是直接关闭了窗口。"Else If Len(examRoomCol) = 0 Then MsgBox "输入了空白值。" ElseIf IsNumeric(examRoomCol) = False Then MsgBox "输入...
发现这节的内容相比正则表达式简单不少，我还是比较喜欢简单的内容，哈哈。不过，所谓“会者不难，难者不会”，难易只是相对而言的，这就是为什么我们要冒着酷暑不断学习的原因——学会难者，难者就会变得容易。'1 数据类型综述
'在VBA中的数据类型有整数、文本、对象等类型。这些不同的类型有着特定的作用，在进行运算时也会占用
'不同大小的内存，所以我们在编写程序时为了提高运行效率，一般都要定义数据...
12.1 限制文本框的输入
用户在使用文本框输入数据时，往往希望可以限制输入数据的类型，例如，只允许输入数字，但是文本框的现有属性无法直接实现这样的要求。此时可以在文本框的KeyPress事件过程和Change事件过程中编写代码来判断输入的字符类型。只允许输入数字字符和一个"-"号、一个"."号，示例代码如下。
Private Sub txtDemo_KeyPress(ByVal KeyA...
function convertToUpperCase() {
var inputBox = document.getElementById("inputBox");
inputBox.value = inputBox.value.toUpperCase().replace(/[^A-Z0-9]/g, "");
这个代码会将输入框中的所有字符转换为大写，并且过滤掉所有非英文字母和数字的字符。
lao_nao:
