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 <[email protected]> wrote: From: sri widayati <[email protected]> Subject: Re: [belajar-access] Option Group (radio button) - menangkap bilainya? To: [email protected] 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!
