MS ACCESS MAILING LIST: [belajar-access] Jalankan proses dengan VBA untuk semua record sekaligus [1 Attachment]

Friday, November 25, 2011

[belajar-access] Jalankan proses dengan VBA untuk semua record sekaligus [1 Attachment]

[Attachment(s) from budi suryadi included below]

Selamat Sore teman-teman access..

Saya sedang mencoba membuat database, tetapi menemui kendala

Misalnya saya punya dua buah tabel yang dihubungkan dengan relasi, dan satu buah query yang dibuat dari 2 buah tabel tersebut.

Kemudian saya membuat sebuah form dari data query tadi, dengan sebuah button yang berisi perintah berikut :

Private Sub Command11_Click()

    Dim HarTemp As Integer
    Dim Bulan As Integer
    HarTemp = Weekday([TimeIn])
    Select Case HarTemp
        Case Is = 1
            Hari.Value = "Sunday"
        Case Is = 2
            Hari.Value = "Monday"
        Case Is = 3
            Hari.Value = "Tuesday"
        Case Is = 4
            Hari.Value = "Wednesday"
        Case Is = 5
            Hari.Value = "Thursday"
        Case Is = 6
            Hari.Value = "Friday"
        Case Is = 7
            Hari.Value = "Saturday"
    End Select

Tgl.Value = DateValue(TimeIn.Value)
Jam.Value = TimeValue(TimeIn.Value)
End Sub

Yang ingin saya tanyakan bagaimana caranya agar ketika button proses diclick, maka perintah tersebut langsung berjalan

pada setiap record yang ada, sehingga saya tidak perlu berpindah record lalu klik button, lalu pindah record lagi dan klik button lagi...?

Apabila saya coba langsung bikin dengan query alhamdulillah bisa, tapi bagaimana caranya bila dengan code vba seperti di atas ?

Untuk lebih jelasnya saya lampirkan contoh databasenya...sebelumnya saya ucapkan terima kasih

Best Regard's
Budi Suryadi

__._,_.___

Attachment(s) from budi suryadi

1 of 1 File(s)