G
Guest
im a VB programmer and quite new in Access, i find the combo box behavior and
usage between the two has a lot of difference.
i place an unbound combo in the header section of my report, the combo has
rowsource type = value list and is populated by values in the form load event.
based on the selection in the said combo, i filter the detail section of my
form. The filter is applied as follows:
Private Sub cboFrom_AfterUpdate()
Me.FilterOn = True
If IsNull(cboFrom) Then
Me.Filter = ""
Else
strMoveFROM = cboFrom.Value
strMoveFROM = Trim(Mid(strMoveFROM, 1, InStr(1, strMoveFROM, ":") - 1))
Me.Filter = "[tmp_Status] = '" & strMoveFROM & "'"
End If
Me.Requery
End sub
My problem is that the combo displays blank after the filter is applied and
no records are found that satisfies the filter, if there are records found, i
get the correct display. This is only a display problem since even if the
combo displays blank, if has a .VALUE
Can anyone help me out with this?
Thanks in advance.
usage between the two has a lot of difference.
i place an unbound combo in the header section of my report, the combo has
rowsource type = value list and is populated by values in the form load event.
based on the selection in the said combo, i filter the detail section of my
form. The filter is applied as follows:
Private Sub cboFrom_AfterUpdate()
Me.FilterOn = True
If IsNull(cboFrom) Then
Me.Filter = ""
Else
strMoveFROM = cboFrom.Value
strMoveFROM = Trim(Mid(strMoveFROM, 1, InStr(1, strMoveFROM, ":") - 1))
Me.Filter = "[tmp_Status] = '" & strMoveFROM & "'"
End If
Me.Requery
End sub
My problem is that the combo displays blank after the filter is applied and
no records are found that satisfies the filter, if there are records found, i
get the correct display. This is only a display problem since even if the
combo displays blank, if has a .VALUE
Can anyone help me out with this?
Thanks in advance.