Prikazi cijelu temu 18.02.2013 10:33
miro35 Van mreze
Clan
Registrovan od:05.01.2009
Lokacija:-


Predmet:Re: Pretraživanje sa više kriterija
Razumio sam te.Evo kako sam ja to rješio sa null vrijednosti:
Znači na Change dogadjaj u polju preko kojeg vrÅ¡im pretragu sam napisao ovo:
Obrati pažnju na : "If (Me.txtSearchZaduzenjeSumar = "") Then
Me.txtSearchZaduzenjeSumar = Null
Me.List0.Requery
End If"
PreuzmiIzvorni kôd (Text):
  1. Private Sub TRSumarIme_Change()
  2. Dim vSearchString As String
  3.  
  4.     vSearchString = TRSumarIme.Text
  5.     txtSearchZaduzenjeSumar.Value = vSearchString
  6.     Me.List0.Requery
  7.     If (Me.txtSearchZaduzenjeSumar = "") Then
  8.     Me.txtSearchZaduzenjeSumar = Null
  9.     Me.List0.Requery
  10.     End If
  11. End Sub
Miro