¡Los expertos de VB vienen para resolver los problemas de Datacombo y TextBox!

Esto es parte del código para el diseño de un curso que hice antes. Es similar a la función que desea lograr, que es seleccionar un tipo de dispositivo, otro combo de datos consulta automáticamente el nombre del dispositivo del tipo correspondiente y luego selecciona el dispositivo. escriba para consultar automáticamente el modelo del dispositivo...

Este control es un DataCombo, correspondiente a un control Adodc. Compruébalo tú mismo, vb es muy simple.

"Evento de activación de tipo de dispositivo seleccionado"

Sub-DataCombo_Sort_Change() privado

Adodc1.Recordset.Bookmark = DataCombo_Sort.SelectedItem

Adodc2 .ConnectionString = ConnStr

Adodc2.RecordSource = "seleccione * de NombreEquipo donde SortCode='" Adodc1.Recordset.Fields(" SortCode") "'"

Adodc2.Refresh< / p>

Con DataCombo_Name

.Text = ""

Establecer .RowSource = Adodc2

.ListField = " EquipmentName"

.Refresh

Finalizar con

Llamar a DataCombo_Name_Change

End Sub

'Seleccione el nombre del dispositivo para activar el evento

Sub privado DataCombo_Name_Change()

Si DataCombo_Name.Text = """Entonces

DataCombo_Mode.Text = ""

Establecer DataCombo_Mode.RowSource = Nada<

DataCombo_Mode.Refresh

Salir Sub

Finalizar si

Adodc2.Recordset.Bookmark = DataCombo_Name.SelectedItem

Adodc3 .Recordset.Bookmark = DataCombo_Name.SelectedItem