如何在vb数据库中对字段输入内容进行条件限制.txt

VB技巧问答10000例 VB技巧问答10000例

你可以在Text的Change事件中进行检验。如： 
    Private Sub Text1_Change() 
     If Val(Text1.Text) > 20 Or Val(Text1.Text) < 10 Then 
     Text1.ForeColor = vbRed 
     Text1.Font.Italic = True 
     End If 
    End Sub 
<END>