RosettaCodeData/Task/Conditional-structures/FreeBASIC/conditional-structures-1.basic

9 lines
86 B
Plaintext

Dim a As Integer = 1
If a = 1 Then
sub1
ElseIf a = 2 Then
sub2
Else
sub3
End If