'---------------------------------------------------------------------------------------
' Procedure : CodeLinesCountSave
' Purpose : Returns the total lines of code in a Database. Blank lines and Comment only
' : lines are not counted. The results are saved in a text file in the...
Here is a simple sub I wrote to use when I need to use different Queries for the same ComboBox:
Private Sub MycboBox_GotFocus()
If Me!myCheckBox = True Then
Me!MycboBox.RowSource = "Query1"
Else
Me!MycboBox.RowSource = "Query2"
End If
End Sub
I have a table for...