Tengkiu.. it's works Best regrads, Sri Widayati
________________________________ From: edi rosadi <[email protected]> To: [email protected] Sent: Tue, December 1, 2009 10:28:11 AM Subject: Re: [belajar-access] Option Group (radio button) - menangkap bilainya? silahkan dipelajari contoh berikut : Option Compare Database Dim nilai As Integer Private Sub Option15_GotFocus( ) nilai = 1 End Sub Private Sub Option17_GotFocus( ) nilai = 2 End Sub Private Sub Command9_Click( ) If nilai = 1 Then rst![jenis_perawata n] = "PM" Else rst![jenis_perawata n] = "PB" End If End Sub Salam, Edi Rosadi http://edirosadie. blogspot. com http://cilegonmap. blogspot. com http://cilegonan. wordpress. com komersilkan blog atau website anda dengan bergabung di sini atau di sini --- On Tue, 1/12/09, sri widayati <widwi...@yahoo. com> wrote: >From: sri widayati <widwi...@yahoo. com> >Subject: Re: [belajar-access] Option Group (radio button) - menangkap bilainya? >To: belajar-access@ yahoogroups. com >Date: Tuesday, 1 December, 2009, 9:25 AM > > > >tengkiu Pak Edi.. > >tetapi saya coba blum berhasil jg... (operasi checked tidak dikenali). > > Best regrads, >Sri Widayati > > > > > ________________________________ From: edi rosadi <edirosa...@yahoo. com.sg> >To: belajar-access@ yahoogroups. com >Sent: Mon, November 30, 2009 4:50:37 PM >Subject: Re: [belajar-access] Option Group (radio button) - menangkap bilainya? > > >If (Me.Option15. checked= true) Then > > >Salam, > >Edi Rosadi >http://edirosadie. blogspot. com >http://cilegonmap. blogspot. com >http://cilegonan. wordpress. com > > > > >komersilkan blog atau website anda dengan bergabung di sini atau di sini > > > > > >--- On Mon, 30/11/09, sri widayati <widwi...@yahoo. com> wrote: > > >>From: sri widayati <widwi...@yahoo. com> >>Subject: [belajar-access] Option Group (radio button) - menangkap bilainya? >>To: belajar-access@ yahoogroups. com >>Date: Monday, 30 November, 2009, 3:21 PM >> >> >> >>Selamat sore para master.... >> >>Saya mempunyai problem, bgmn menangkap nilai / isi dari radio button. >>Pilihan pertama PM (option15) >>dan kedua PB (option17) >>Saya menuliskan script : >>If (Me.Option15. Value = 1) Then >>rst![jenis_perawata n] = "PM" >>Else >>rst![jenis_perawata n] = "PB" >>End If >>Tetapi masih salah (Me.Option15. Value=<you entered the expression that has >>no value> >> >>Sebenarnya bgmn utk menangkap option value yang tidak dibound lgs. >>Terima kasih >> >>Best regrads, >>Sri Widayati >> >> > ________________________________ >Yahoo! Toolbar is now powered with Search Assist.. Download it now! > ________________________________ New Email names for you! Get the Email name you've always wanted on the new @ymail and @rocketmail. Hurry before someone else does!
