Private Sub ServiceCallsBrowserDialog_SearchValueChanged(ByVal sender As System.Object, ByVal e As MicroFour.StrataFrame.UI.Windows.Forms.BrowseDialogSearchValueChangedEventArgs) Handles Me.SearchValueChanged
            '-- When a customer is selected form the combobox, then requery the Building combobox.
            If e.SourceSearchField.Key.Equals("FK_Customers", StringComparison.OrdinalIgnoreCase) Then
                Dim comboListPopulationParam1 As Integer = 0
 
                '-- If the customer combobox has any selected record, then update the 
                '   comboListPopulationParam1 with the Customer PK
                If CType(e.SourceControl, ComboBox).SelectedIndex > 0 Then
                    '-- Resize the combo to properly show its information.
                    e.AllVisibleSearchControls("FK_Buildings").Width = 300
 
                    comboListPopulationParam1 = CType(e.SourceControl, ComboBox).SelectedValue
                End If
 
                '-- Requery the Building Address combobox.
                CType(e.AllVisibleSearchControls.Item("FK_Buildings"), ComboBox).Requery(comboListPopulationParam1, MicroFour.StrataFrame.Business.BusinessEditingState.Idle)
            End If
        End Sub