Új hozzászólás Aktív témák

• #367 Gh0sT addikt sszever #366

  Új Válasz 2006-05-25 13:43:31 #367

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Gh0sT

  addikt

  válasz sszever #366 üzenetére

  
  Private Sub Parancsgomb2_Click()
  DoCmd.GoToRecord , , acNewRec
  If IsNull(Szöveg0.Value) Then
  MsgBox (''Keresés előtt kötelező a mező kitöltése'')
  Szöveg0.SetFocus
  Szöveg0.BackColor = 11053311
  Else
  vagatkod.SetFocus
  DoCmd.FindRecord Szöveg0.Value, acEntire, False, acSearchAll, , acCurrent, True
  Szöveg0.BackColor = 16777215
  Szerintem itt jó lesz
  
  End If
  End Sub
  

Új hozzászólás Aktív témák