Textbox-nya kelompokkan dalam frame, dan frame diberi nama mis: Frame1, Frame2 (bebas). Terus kode programnya menghilangkan isi textbox dalam frame tertentu.
Dim vCtrl As Control
Private Sub Command1_Click()
For Each vCtrl In Me.Controls
If (TypeOf vCtrl Is TextBox) Then
If vCtrl.Container = "Frame2" Then
vCtrl.Text = ""
End If
End If
Next
End Sub
For Each vCtrl In Me.Controls
If (TypeOf vCtrl Is TextBox) Then
If vCtrl.Container = "Frame2" Then
vCtrl.Text = ""
End If
End If
Next
End Sub
Note:
Sebaiknya dibuat dalam suatu prosedur dengan nama frame sebagai variable, jadi lebih fleksibel, Private sub Hapus_Text(NamaFrame As String)
Ok, terima kasih atas tanggapanya dan sudah berharil, tetapi ada sedikit masalah, saya menggunakan Control SSTab diprogram tersebut, Textbox yang mau saya kosongkan hanya di Tab1 saja sedangkan tab lainnya tidak dikosongkan, jadi gimana menerapkan coding tsb ya
Blab-away for as little as 1ยข/min. Make PC-to-Phone Calls using Yahoo! Messenger with Voice.
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
- 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.
