Senin, 23 April 2012

Re: [belajar-access] Re: Mohon Banuannya...

 

Terimakasih Untuk Bapak Aksan Kurdin, dan Para Suhu... sudah membantu dan memberi pencerahan buat saya,

Hendra

Pada 23 April 2012 02:39, Aksan Kurdin <aksan.kurdin@gmail.com> menulis:
 

Koding mas covey toni kelihatan dari orang yang pengalaman.
saya boleh nambah :)


Logikanya dengan pseudo code:
[estimasi bangunan /m2].enable = bukan ([jenis properti] = "tanah kosong")
[harga transaksi].enable =  bukan ([posisi properti] = 'penawaran')

pengaturan itu harus di atur saat form berganti record (on current), dan juga saat event click di kontrol [jenis properti] dan [frame66]:



Private Sub form_current()
    On Error GoTo Error_pilih
   
    If Me.NewRecord Then                            'jika form data baru:
        Me.Foto1.Picture = ""                       'kosongkan foto1
        Me.Estimasi_Bangunan__m2.Enabled = True     'enable kan textbox estimasi bangunan / m2
        Me.Harga_Transaksi.Enabled = True           'enable kan textbox harga transaksi
    Else                                                                    'jika data view/edit
        Me.Foto1.Picture = Nz(Me.Foto, "")                                  'ambil gambar dari path di folder
        Me.Estimasi_Bangunan__m2.Enabled = Not (Me.Jenis_Properti = 1)      'atur enabilitas textbox estimasi bangunan / m2
        Me.Harga_Transaksi.Enabled = Not (Me.Frame66 = 1)                   'atur enabilitas textbox harga transaksi
    End If
   
    Exit Sub
   
Error_pilih:
    Select Case Err.Number
        Case 2220:
            Me.Foto1.Picture = ""
            Resume Next
        Case Else
            MsgBox Err.Description
    End Select
       
   
End Sub

Private Sub Frame66_AfterUpdate()
    Me.Harga_Transaksi.Enabled = Not (Me.Frame66 = 1)
End Sub

Private Sub Jenis_Properti_AfterUpdate()
    Me.Estimasi_Bangunan__m2.Enabled = Not (Me.Jenis_Properti = 1)
End Sub



aksan kurdin



Kalau Saya boleh memberikan penjelasan, ketika kita masuk ke menu input
> data tanah bangunan dan memilih jenis properti tanah kosong, maka  menjadi disible, dan pada saat kita memilik posisi properti

> pada penawaran maka harga transaksi menjadi disible juga, mohon penceraahan

On 4/23/2012 12:36 PM, Coyev wrote:
 


Untuk Pak Hendra,

Saya coba kasih masukan :

di Combo Jenis Properti di Event OnClick :
Me.Estimasi_Bangunan__m2.Enabled = Me.Jenis_Properti <> 1

di Frame Posisi Properti / Frame66 di Event OnClick :
Me.Estimasi_Bangunan__m2.Enabled = Me.Jenis_Properti <> 1

Semoga bermanfaat.

Salam,

Coyev Toni

--- In belajar-access@yahoogroups.com, Hendra Purwaning Dumadi <hendrapurwaningdumadi@...> wrote:
>
> Pagi Pak..
>
> Benar Pak
>
> Kalau Saya boleh memberikan penjelasan, ketika kita masuk ke menu input
> data tanah bangunan dan memilih jenis properti tanah kosong, maka estimasi
> bangunan /m2 menjadi disible, dan pada saat kita memilik posisi properti
> pada penawaran maka harga transaksi menjadi disible juga, mohon penceraahan
> Pak
>
> Hendra
>
> Pada 22 April 2012 21:00, Sofyan Efendi <sofyanefendi@...> menulis:
>
> > **
> >
> >
> > Halo Pak Hendra. Maksudnya hendak membuat disable text box bila pilih
> > suatu
> > pilihan di combo box, atau gimana ya? Bisa send contoh filenya?
> >
> > Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
> > Sofyan Efendi
> > http://imopi.wordpress.com/
> >
> > ----- Original Message -----
> > From: "hendra" <hendrapurwaningdumadi@...>
> > To: <belajar-access@yahoogroups.com>
> > Sent: Saturday, April 21, 2012 5:32 PM
> > Subject: [belajar-access] Mohon Banuannya...
> >
> > > Sore... Para Suru...
> > >
> > > Ada hal yang mau saya tanyakan, kalau saya memilih salah satu dari dalam
> > > combobox maka text box di form yang sama menjadi disible.
> > >
> > > Mohon pencerahan...
> > >
> > >
> > >
> > > ------------------------------------
> > >
> > > SPAM IS PROHIBITEDYahoo! Groups Links
> > >
> > >
> > >
> >
> >
> >
>



__._,_.___
Recent Activity:
SPAM IS PROHIBITED
.

__,_._,___

Tidak ada komentar:

Posting Komentar