SAP Connection R/3 using a SSO in Visual Basic

Hello,  I have been trying to get an R/3 connection to SAP using VB.

I log into SAP by getting a SSO ticket and running SAPGUI with the ticket.

Is there a way to use R/3 and the SSO ticket to log in using VIsual Basic?

Set R3 = CreateObject("SAP.Functions")

R3.Connection.Client = "000"
R3.Connection.User = "123456789"
R3.Connection.Language = "EN"
R3.Connection.System = "0"

If R3.Connection.logon(0, True) <> True Then
    MsgBox "No connection to R/3 System"
    Exit Sub                                    
End If

I have a string from the .SAP file each time it is downloaded, I assume it is the single use password..

[User]

Name=123456789+

at="MYSAPSSO2=thisIsAReallyLongStringOfCharectersEndingWIthA="

Language=EN

Thanks.