iOS Question Compatible modules

[Radisk3]

Hello,

I'm doing modules that are compatible to Android and iOS.
However, I have instructions that will only be used on Android or iOS.
There are ways to do an if statements like this not to be error on iOS and the same for instructions in the iOS does not generate an error in Android?

Sub Dados_Phone As String
   Dim PN As Phone
   Dim Aparelho As String
   Aparelho = Aparelho  & CRLF & _
       "Tipo: " & PN.GetPhoneType
   Aparelho = Aparelho  & CRLF & _
       "Fabricado: " & PN.Manufacturer
   Return Aparelho
End Sub

 

[klaus]

Like this:

#If B4A
'B4A code
#Else If B4i
'B4Ai code
#Else
'B4J code
#End If

I made the example in B4A, you see the B4A code in green and the code for the other two systens in gray.

 

[Radisk3]

Thank you
This is exactly what I needed.