Spanish Llamada a Procedimiento almacenado

Sub Carga_Choferes_Procedimiento_Almaceando
    Try
        Dim ci_chofer As Long
        Dim nombre_chofer As String
        Dim cs As Object = mysql.CreateCallStatement("{call Listar_Choferes()}", Array( nombre_chofer,ci_chofer))
        Dim rs As JdbcResultSet = mysql.ExecCall(cs)
        Log( rs)

    Catch
        MsgboxAsync("Se produjo el error : "& LastException.Message,"Error.Chofer_Procedimiento")
    End Try
        
End Sub

  Dim cs As Object = mysql.CreateCallStatement("{call Listar_Choferes()}", Array( nombre_chofer,ci_chofer))

    Try
        Dim cs As Object = mysql.CreateCallStatement("exec Listar_Choferes",Null)
        Dim rs As JdbcResultSet = mysql.ExecCall(cs)
        Log( rs)
        Do While rs.NextRow
            combo_chofer.Add(rs.GetString("NombreAp")) 'Llenamos el Spinner
        Loop
    Catch
        MsgboxAsync("Se produjo el error : "& LastException.Message,"Error.Chofer_Procedimiento")
    End Try

Sub DisableStrictMode
    Dim jo As JavaObject
    jo.InitializeStatic("android.os.Build.VERSION")
    If jo.GetField("SDK_INT") > 9 Then
        Dim policy As JavaObject
        policy = policy.InitializeNewInstance("android.os.StrictMode.ThreadPolicy.Builder", Null)
        policy = policy.RunMethodJO("permitAll", Null).RunMethodJO("build", Null)
        Dim sm As JavaObject
        sm.InitializeStatic("android.os.StrictMode").RunMethod("setThreadPolicy", Array(policy))
    End If
End Sub