每个文本框输入只允许为数字，范围为0~255，超过255提示，按小数点会自动跳到下一个文本框。还有批量添加输入的IP段到ACCESS和批量删除应该怎么写？显示控件是msflexgird
小弟刚学VB，只会写到这里，请大神们帮帮忙哈。
Private Sub Text1_Change()
If Len(Text1.Text) = 3 Then Text2.SetFocus
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 8 Then Exit Sub
If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0
End Sub

[此贴子已经被作者于2016-7-11 13:04编辑过]