B4J Question Having Trouble with Simple Wait For

Sub Process_Globals
    Private fx As JFX
    Private MainForm As Form
    Private Button1 As Button
End Sub

Sub AppStart (Form1 As Form, Args() As String)
    MainForm = Form1
    MainForm.RootPane.LoadLayout("Layout1") 'Load the layout file.
    MainForm.Show
End Sub

'Return true to allow the default exceptions handler to handle the uncaught exception.
Sub Application_Error (Error As Exception, StackTrace As String) As Boolean
    Return True
End Sub

Sub Button1_Click
    Log("Clicked")
    Dim SerialNo As String
    SerialNo = "15"
    SendIt_Back (SerialNo)
    Wait For CDInMB_Result (Found As Boolean)
    Log(Found)
End Sub

Sub SendIt_Back (SerialNo As String)
    Dim Found As Boolean
    Found = (SerialNo = "15")
    CallSub2(Me, "CDInMB_Result", Found)
End Sub

Clicked
Clicked
true
Clicked
true
Clicked
true