Observe o código Visual Basic a seguir.
Module Module1
Dim X As String
Dim Y As String
Sub A()
X = "JKL"
End Sub
Function B() As String
Dim Y As String
Y = "123"
Return IIf(Len(X) <> 3, Y, X) & "RST"
End Function
Sub Main()
Call A()
Y = "GHI"
MsgBox(B)
End Sub
End Module
Ao ser executado no ambiente do Visual Studio 2008, a partir do procedimento
main(), a mensagem exibida por esse código é :
- ✂️
- ✂️
- ✂️
- ✂️
- ✂️