Function enableIt(Optional txt As TextBox,
_
Optional cmd As CommandButton, _
Optional lbl As Label)
On Error Resume Next
If Not IsMissing(txt) Then txt.Enabled = True
If Not IsMissing(cmd) Then cmd.Enabled = True
If Not IsMissing(lbl) Then lbl.Enabled = True
End Function
Optional cmd As CommandButton, _
Optional lbl As Label)
On Error Resume Next
If Not IsMissing(txt) Then txt.Enabled = True
If Not IsMissing(cmd) Then cmd.Enabled = True
If Not IsMissing(lbl) Then lbl.Enabled = True
End Function
Private Sub Command1_Click()
Call enableIt(Text1, , Label1)
End Sub
Call enableIt(Text1, , Label1)
End Sub
IpinZ
----- Original Message -----
From: "capresvb" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Sunday, January 15, 2006 5:19 PM
Subject: [Programmer-VB] Seputar
fungsi
> 1. Bagaimana cara membuat (memprogram) file ekstensi?
> 2. call aktifkan(2,3) //enable objek2 dan objek3=true else
> enable=false
> call aktifkan(1) //enable objek1=true else enable=false
> call aktifkan(1,2,3) //enablekan selruh objek
>
> seandainya ada 3 objek, terdiri dari:
> objek1=objek textbox, objek2=objek command, objek3=objek label
> Pertanyaannya: Bagaimana cara membuat fungsi/procedure supaya bisa
> digunakan untuk keperluan di atas?
> 3. suatu saat saya ingin mendaftarkan objek ke dalam fungsi.
> call registerobjek(txtNama, cmdSimpan, lblKelapKelip)
> call registerobjek(txtNama,cmdSimpan)
> //penjelasan mirip dengan nomor 2
> Pertanyaannya: Bagaimana cara membuat fungsi/procedure supaya bisa
> digunakan untuk keperluan di atas?
>
>
>
>
>
> Wahana Programmer Groups Links
>
> <*> Untuk mengunjungi sponsor milis ini, klik link berikut:
> http://wahanaprogrammer.net
>
> <*> Untuk menghubungi owner milis ini, kirim email ke:
> [EMAIL PROTECTED]
>
> <*> Konsultasi pemrogramman bisa chat disini:
> Yahoo! Messenger: wahanaprogrammer
>
> Yahoo! Groups Links
>
> <*> To visit your group on the web, go to:
> http://groups.yahoo.com/group/Programmer-VB/
>
> <*> To unsubscribe from this group, send an email to:
> [EMAIL PROTECTED]
>
> <*> Your use of Yahoo! Groups is subject to:
> http://docs.yahoo.com/info/terms/
>
>
>
>
>
Wahana Programmer Groups Links
<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
http://wahanaprogrammer.net
<*> Untuk menghubungi owner milis ini, kirim email ke:
[EMAIL PROTECTED]
<*> Konsultasi pemrogramman bisa chat disini:
Yahoo! Messenger: wahanaprogrammer
SPONSORED LINKS
| Programmer | Indonesia | Basic programming language |
| Computer programming languages | Programming languages | Java programming language |
YAHOO! GROUPS LINKS
- Visit your group "Programmer-VB" on the web.
- To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
