What did i do?

[Pbcrazy]

ok i just cant seem to get this right. i have another sub that im trying to get it to work on in the client side.

Code:

Private Sub Form_Load()
Dim Host As String
Dim Port As String
Dim filename As String
filename = App.Path & "Settings.ini"

Host = GetVar(filename, "[General]", Host)
Port = GetVar(filename, "[General]", Port)


frmMain.sockMain.RemoteHost = Host
frmMain.sockMain.RemotePort = Port
frmMain.sockMain.Connect
End Sub

i keeps saying runtime error 13 type mismatch and highlights this bit of code

Code:

frmMain.sockMain.RemotePort = Port

please tell me what i did wrong