Chọn những ký tự có điều kiện trong combobox/ textbox

[Hoàng Trọng Nghĩa]

Tôi có một combobox nguồn combobox là 3 ký tự : G - D - T
Làm cách nào để chỉ gõ vào được 1 trong 3 ký tự này mà không thể gõ vào ký tự khác được. Nhưng có thể xóa và thay thế 3 ký tự này với nhau được? Đồng thời chỉ gõ được 1 ký tự thôi.
Xin các Thầy, các Anh Chị hướng dẫn, giúp đỡ.
Cám ơn rất nhiều!

 

[leduongfhs]

Private Sub tbDG_Change()
If Me.tbDG = "" Then Exit Sub
If Left(Me.tbDG) = "G" Then Me.tbTT = 1
If Me.tbDG <> "G" Then Me.tbTT = 0
End Sub

Em có code này muốn lầy ký tự đầu trong tbDG là chữ "G" thì tbTT sẽ là 1, còn ko thì trả về 0
nhờ ae giúp đỡ