error karena perlu ada yang dijadikan fokus selain listbox yang akan di muncul dan sembunyikan . misalnya , buat text box namakan 'TextFokus' .
Private Sub Form_Load()
giliran = 1
Me.TimerInterval = 500 ' biar efeknya tampak pas
Me.TextFokus.SetFocus
End Sub
--- In belajar-access@yahoogroups.com, thomas <the_massto@...> wrote:
>
> masih eror pak, file saya lampirkan...
>
> Â
> ==============================================================================
> Ingin lebih dekat dengan saya, ketik aja :www.the-massto.co.cc
>
>
> ________________________________
> Dari: sudarsono <jkssbma@...>
> Kepada: belajar-access@yahoogroups.com
> Dikirim: Kamis, 7 Juli 2011 14:33
> Judul: Re: Bls: [belajar-access] listbox pake waktu??
>
>
> Â
>
> gunakan vba berikut : ( event di form )
>
> Option Compare Database
> Dim giliran As Integer
>
> Private Sub Form_Load()
> giliran = 1
> Me.TimerInterval = 500 ' biar efeknya tampak pas
> End Sub
>
> Private Sub Form_Timer()
> Dim mlist0, mlist5 As Boolean
>
> Select Case giliran
> Case Is = 1
> mlist0 = True
> mlist5 = False
> Case Is = 2
> mlist0 = False
> mlist5 = True
> Case Else
>
> giliran = 0
> mlist0 = False
> mlist5 = False
> End Select
>
> Me.List0.Visible = mlist0
> Me.List5.Visible = mlist5
> giliran = giliran + 1
> End Sub
>
> Kok , jadi jarang yang mengirim postingan ya . Kayanya sedang sibuk ,
> eeehh. . Hari ini saya kebetulan sedang senggang ....
>
> '======
> --- In belajar-access@yahoogroups.com, roland@ wrote:
> >
> > Maaf Mas, saat ini saya tidak bisa buatkan karena rutinitas yang
> padat. Mungkin rekan2 yang lain bisa bantu Mas Thomas.
> >
> > Salam,
> > Roland
> >
> > Powered by Telkomsel BlackBerry
> >
> > -----Original Message-----
> > From: thomas the_massto@
> > Sender: belajar-access@yahoogroups.com
> > Date: Thu, 7 Jul 2011 10:42:00
> > To: belajar-access@...@yahoogroups.com
> > Reply-To: belajar-access@yahoogroups.com
> > Subject: Bls: [belajar-access] listbox pake waktu??
> >
> > bisa minta tolong aplikasinya pak, filenya saya lampirkan. thanks
> >
> > Â
> >
> ========================================================================\
> ======
> > Ingin lebih dekat dengan saya, ketik aja :www.the-massto.co.cc
> >
> >
> > ________________________________
> > Dari: "roland@" roland@
> > Kepada: belajar-access@yahoogroups.com
> > Dikirim: Kamis, 7 Juli 2011 1:59
> > Judul: Re: [belajar-access] listbox pake waktu??
> >
> >
> > Â
> > Dicoba Pakai object timer + buat dummy textbox didefaultnya =0 dan
> misalnya kemudian isi textbox tsb diupdate +1 setiap detik. Apabila isi
> textbox= 600 (10 menit x 60 detik) akan trigger vba menghide salah satu
> list dan menampakan salah satu list yang diinginkan serta mereset
> textbox=0.
> >
> > Semoga bisa memberi pencerahan.
> >
> > Salam
> > Roland
> >
> > Powered by Telkomsel BlackBerry
> > ________________________________
> >
> > From: thomas the_massto@
> > Sender: belajar-access@yahoogroups.com
> > Date: Wed, 6 Jul 2011 22:14:11 +0800 (SGT)
> > To: belajar-access@...@yahoogroups.com
> > ReplyTo: belajar-access@yahoogroups.com
> > Subject: [belajar-access] listbox pake waktu?? [1 Attachment]
> >
> > master access....
> > saya mau minta tolong bagaimana cara menampilkan 2 listbox atau lebih
> dalam satu form secara bergantian, misalnya per 15 menit atau 10 menit.
> file saya lampirkan.
> > sebagai ilustrasi, di dalam file yg saya lampirkan tersebut ada 2
> lisybox yaitu list0 dan list5 beserta label-labelnya yang merupakan
> judul dari listbox tersebut. saya ingin listbox dan label2nya tersebut
> tampil secara bergantian per 10 menit.
> >
> >
> > thanks
> >
> > Â
> >
> ========================================================================\
> ======
> > Ingin lebih dekat dengan saya, ketik aja :www.the-massto.co.cc
> >
>
Tidak ada komentar:
Posting Komentar