Şimdi acaba gifteki gibi açılan form textboxun altında çıkabilirmi hezaman.
Ve açılan formun botutları küçülmesi gerek olmadı birtürlü.
PHP Kod:
Option Compare Database
Const textSorgu As String = "SELECT ad, soyad, yas FROM Tablo1"
Sub TabloFormAc()
DoCmd.OpenForm "Tablo", acFormDS, , , acFormReadOnly, acWindowNormal 'acFormDS demek veri sayfa görünüm
End Sub
Private Sub Form_Load()
Call TabloFormAc
Forms!Tablo.RecordSource = textSorgu
End Sub
Private Sub textbox2_Change()
Dim sql As String
If Me.textbox2.text = "" Then
DoCmd.Close acForm, "Tablo", acSaveNo
Exit Sub
End If
sql = textSorgu & " WHERE Tablo1.ad Like '*" & Me.textbox2.text & "*'"
Call TabloFormAc
Forms!Tablo.RecordSource = sql
Me.SetFocus
End Sub