回复:6如表“营运证号”能否固定只能输入六位回车进入下一输入框。 可以用len判断是否超过6位数,超过就提示,正确就将焦点(光标)移到下一行同一列。 If(Len([营运证号]) <> 6,MsgBox("警告!此单元格只能输入六位数字,请仔细核对再重新输入",2) And SetCellText(gridname,row,col,""),Move(row + 1,col))
-=-=-=- 以下内容由 Andyguobao 在 2006年10月09日 02:47pm 时添加 -=-=-=- 如果输入错了,应该先提示,再清除数据:SetCellText(gridname,row,col,""),再将光标定位到本单元格:Move(row,col)
|