Private Sub ButtonStart_Click
' Handle button click event to navigate using Google Maps
Dim address As String = $"${B4XFTStreeNo.Text} ${B4XFTStreet.Text} ${B4XFSuburb.Text} ${B4XFTState.Text}"$ ' Specify your desired address here
' Open Google Maps with navigation to the specified address
Dim pIntent As PhoneIntents
StartActivity (pIntent.OpenBrowser ("https://www.google.com/maps/dir/?api=1&destination=" & UriEncode(address) & "&travelmode=driving") )
End Sub
Sub UriEncode(s As String) As String
' Function to encode the address string for URL
Dim su As StringUtils
Return su.EncodeUrl(s, "UTF8")
End Sub