VB中Combo的一種輸入檢查制約方法的實現

北京 吳昊江

---- Combo方式的輸入域，可在程序中事先設定好一組數據，由用戶以下拉方式來選擇輸入項目，這種工作方式可方便用戶的使用是顯而易見的，使用者無需記住輸入的數據，只要拉下數據列表表框，從中選出自己所需的數據便可，特別是對于那些不熟練的用戶來說，這種輸入方式還兼有使用向導的功能。但是此方法對于那些熟練的用戶，對于所選擇的數據列表數據量非常大時，就顯的不是那么方便有效了，繁瑣的選擇數據可能還會給用戶帶來不少煩惱，降低使用效率。若我們能提供用戶選擇方式的同時，還可讓用戶自己能輸入數據，并限定輸入的數據必須在 Combo的列表數據中，當輸入的數據不在Combo的列表數據中時給用戶以提示信息，讓其重新輸入，這樣就可滿足不同用戶的需求，提高Combo的使用效率。本文在此給出一種實現的方法，供大家參考。

---- 在Combo域輸入中有一個名叫Validate的事件，它是用來檢查用戶輸入的數據是否是有效的數據，我們可在此事件中來檢查用戶的輸入。對于用戶輸入的數據是否落在數據列表集合中，Combo中有這樣一個屬性來表示，MathWithList。知道了這些條件，此問題的解決就變的非常容易了。用戶可用下面提供的這段程序來判斷Combo域輸入的數據是否是數據列表中的數據，若是將提示OK，否則提示ERR，Combo的BoundText屬性表示用戶輸入的數據，在此用MSGBOX一同提示給用戶查看。

---- 此程序在VB6.0上實現。

Private Sub DataCombo1_Validate(Cancel As Boolean)
    If DataCombo1.MatchedWithList Then
        MsgBox "OK"
        MsgBox DataCombo1.BoundText
    Else
        MsgBox "ERR"
        MsgBox DataCombo1.BoundText
    End If
End Sub

原文轉自：http://www.anti-gravitydesign.com