Torna al Thread
Public Sub cmdConnect_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles cmdConnect.Click
' assume this is a non Financial Advisor account. If it is the managedAccounts()
' event will be fired.
m_dlgConnect.ShowDialog()
' Qui c'è il problema
If m_dlgConnect.ok Then
With m_dlgConnect
Call Tws1.connect(.hostIP, .port, .clientId)
Dim msg As String
msg = "Connected to TWS server version " & Tws1.serverVersion() & _
" at " & Tws1.TwsConnectionTime()
txtServerResponses.Text = msg
End With
End If
End Sub