Android Question With....End With

[Terradrones]

Hi All

I need help\hint again please.

What would be similar in B4A with the "With.....Code.....End With"? This is from VB.net:

[/
        With GPSObject.RTK_Base
            .StopBase()

            'If .IsRecordRAWDataAvailable And RecordRawDataInRTK Then .RecordRAWData = True Else .RecordRAWData = False
            .ElevetionMask = ElevationMask
            .Site_ID = SiteID
            .SetBaseComunication(GPS_Structure.RTK_CommunicatioTypeEnum.InternalUHF)

            With .InternalUHF
                .Disconnect()
                .TransmitterPower = UHFPowerMode
                '.RadioMode = UHFRadioMode
                .Channel = UHFChannel
                .RTKCorrectionType = RTKCorrectionType
                .Connect()
            End With
            .SetBasePosition(Latitude, Longitude, Elev)
            .StartBase()
        End With
]

 

[LucaMs]

There is not. Before the points you have to explicitly write the object variables to be used.

 

[Terradrones]

Example please?

 

[LucaMs]

With GPSObject.RTK_Base
.StopBase()

GPSObject.RTK_Base.StopBase
GPSObject.RTK_Base.ElevetionMask = ElevationMask

 

[Erel]

A bit similar to:

Dim o As SomeObject = AnObject.AMethod.AnotherOne.AndAnotherOne
o.ElevationMask = 3
o.SomeOtherProperty = "abc"