Código:
Public vcom As Integer
Public vbitss As Long
Public vbitsd As Integer
Public vparidad As String
Public vbitsp As Long
Dim vsettings As Variant
vsettings = vbitss & "," & vbitsd & "," & vparidad & "," & vbitsp
Com.InputMode = comInputModeText
Com.CommPort = vcom
Com.Settings = vsettings
If Com.PortOpen <> True Then
Com.PortOpen = True
End If
que es lo que hago mal que me da error en:
vsettings = vbitss & "," & vbitsd & "," & vparidad & "," & vbitsp
no llegan las variables llenas... estan vacias.
salu2