Merry.Christmas("Ho Ho Ho")

Unobtainius

Active Member
Licensed User
Longtime User
B4X:
Sub FestiveGreetings
    For Each Person As Member In Formum.Members
        If Member.CelebratesChristmas Then
            MsgboxAsync($"Merry Christmas ${Member.Name}"$
        Else
            MsgboxAsync($"Festive wishes to you ${Member.Name}"$
        End If
    Next
End Sub
 

Unobtainius

Active Member
Licensed User
Longtime User
whoops, my bad
B4X:
Sub FestiveGreetings
    For Each Person As Member In Formum.Members
        If Person .CelebratesChristmas Then
            MsgboxAsync($"Merry Christmas ${Person .Name}"$
        Else
            MsgboxAsync($"Festive wishes to you ${Person .Name}"$
        End If
    Next
End Sub
 

Erel

B4X founder
Staff member
Licensed User
Longtime User
What about the non-OOP developers in the forum?

B4X:
Sub FestiveGreetings
    For Each Person As Member In Formum.Members
        If DoesCelebrateChirstmas(Person) Then
            MsgboxAsync($"Merry Christmas ${Person.Name}"$
        Else
            MsgboxAsync($"Festive wishes to you ${Person.Name}"$
        End If
    Next
End Sub
 

mc73

Well-Known Member
Licensed User
Longtime User
What about the non-OOP developers in the forum?

B4X:
Sub FestiveGreetings
    For Each Person As Member In Formum.Members
        If DoesCelebrateChirstmas(Person) Then
            MsgboxAsync($"Merry Christmas ${Person.Name}"$
        Else
            MsgboxAsync($"Festive wishes to you ${Person.Name}"$
        End If
    Next
End Sub

I get an "object not initialized [Formum]" error. Might this be [Forum] instead? :D

Merry Christmas and festive wishes to everyone!
 

ilan

Expert
Licensed User
Longtime User
Don't forget Hanuka!

B4X:
Sub FestiveGreetings
    For Each Person As Member In Formum.Members
        If DoesCelebrateChirstmas(Person) Then
            MsgboxAsync($"Merry Christmas ${Person.Name}"$
        Else if DoesCelebrateHanuka(Person) Then
            MsgboxAsync($"Happy Hanuka ${Person.Name}"$
        Else
            MsgboxAsync($"Festive wishes to you ${Person.Name}"$
        End If
    Next
End Sub
 

Descartex

Well-Known Member
Licensed User
Longtime User

Bruce Axtens

Active Member
Licensed User
Longtime User
Merry Christmas from Western Australia:
 
Top