@mbak sri,
sebenarnya apa yang anda lakukan ?
jika pertanyaan anda mengenai option group, maka bentuk kontrolnya berupa
sebuah frame dengan beberapa option button di dalamnya.
+--Nama Group-----------+
| |
| ( ) Option 1 |
| |
| ( ) Option 2 |
| |
+-----------------------+
Misalkan nama framenya adalah fraJenisPerawatan, nilai option value setiap
option button adalah berturut-turut 1 dan 2 (default), maka seharusnya kode
anda seperti:
select case fraJenisPerawatan
case 1: rst![jenis_perawata n] = "PM"
case 2: rst![jenis_perawata n] = "PB"
case else: rst![jenis_perawata n] = ""
end select
Jadi bukan nge-trap kode di setiap option button, tetapi cukup dari frame-nya
saja.
pergunakan event frame_on_klik.
aksan kurdin
--- In [email protected], edi rosadi <edirosa...@...> wrote:
>
> 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...@...> wrote:
>
>
> From: sri widayati <widwi...@...>
> 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!
>
