Hola:
Al programar con VB 6 bajo Winwdows 7 de 64 bits, he hecho esto.
![](https://social.msdn.microsoft.com/Forums/getfile/637880)
Quiero seleccionar el puerto serie que me detecta automáticamente el comboBox. Algo no tengo bien qu em e da error y al pulsar depurar me indica este error.
El error dice:
No coincide los tipos.
Al programar con VB 6 bajo Winwdows 7 de 64 bits, he hecho esto.
Quiero seleccionar el puerto serie que me detecta automáticamente el comboBox. Algo no tengo bien qu em e da error y al pulsar depurar me indica este error.
Código (vb,11) [Seleccionar]
Private Sub Command_Led_8_OFF_Click()
MSComm1.Output = "Led_8_OFF"
End Sub
Private Sub Command_Led_8_ON_Click()
MSComm1.Output = "Led_8_ON"
End Sub
Private Sub Form_Load()
Form1.ComboBoxCOM.Clear
MSComm1.CommPort = ComboBoxCOM
MSComm1.PortOpen = True ' Habilitar el puerto serie.
Timer1.Interval = 1 ' Correr el timer a 1 mls.
Set WMIObjectSet = GetObject("winmgmts:\\.\root\CIMV2").ExecQuery("SELECT * FROM Win32_PnPEntity") 'Win32_SerialPort")
For Each wmiobject In WMIObjectSet
If InStr(wmiobject.Name, "COM") Then '
Form1.ComboBoxCOM.AddItem wmiobject.Name
End If
Next
Set WMIObjectSet = Nothing
End Sub
El error dice:
No coincide los tipos.