ACCESS FEED: Re: [belajar-access] VBA atau Macro Code cari record di navigation Form target subform

Selasa, 09 April 2013

Re: [belajar-access] VBA atau Macro Code cari record di navigation Form target subform

Bismillahirrohmanirrohim...,

Asumsi:

1. Pada Tabel ada 2: tb1 dan tb2; salah satu fieldnya t1 (pada tb1) dan t2 (tb2)
2. Pada form ada 3: Utama, f1, dan f2
3. Pada form f1, terdapat textbox-textbox sebagaimana pada tb1. Begitu pula dengan f2. Akan tetapi recordsource-nya kosong.
4. Form utama:
   - terdapat textbox untuk pencarian, name: txtCari; Tanpa record source.
   - Dan, 2 subform (untuk menampung hasil pencarian). Sesuaikan ukurannya. Ke-2 sUb form tanpa source object; dalam posisi property visible=No
   - label untuk masing-masing sub form adalah label1 dan label2
   - Beri event txt cari Onchane:

    Private Sub txtCari_Change()

    f1.Visible = False
    f1.SourceObject = "f1"
    f1.Form.RecordSource = "select * from tb1 where t1like *" & txtCari.Text & "*"
    f1.Visible = True
    Label1.Caption = "Hasil Pencarian Tabel tb2, sortir field t1 *" & txtCari.Text & "*"
    f1.Requery

    f2.Visible = False
    f2.SourceObject = "f2"
    f2.Form.RecordSource = "select * from tb2 where t2 like *" & txtCari.Text & "*"
    f2.Visible = True
    label2.Caption = "Hasil Pencarian Tabel tb2, sortir field t2 *" & txtCari.Text & "*"
    f2.Requery

end sub

Semoga bisa membantu dan memberi semangat.

Hariyanto (Surabaya)

--- On Tue, 9/4/13, Andri < andri.sugilar@yahoo.co.id> wrote:

From: Andri <andri.sugilar@yahoo.co.id>
Subject: [belajar-access] VBA atau Macro Code cari record di navigation Form target subform
To: belajar-access@yahoogroups.com
Date: Tuesday, 9 April, 2013, 3:42 PM

Dear Master,

Minta pencerahannya para master, saya ingin mencari record tertentu di subform, tapi subform nya ada di dalam navigation form, bagaimana ya.

__._,_.___

Reply via web post

Reply to sender

Reply to group

Start a New Topic

Messages in this topic (2)

Recent Activity: