AccessTr.neTMicrosoft AccessAccess Cevaplanmış Soruları

textbox combobox for next döngüsü

1 2
17/09/2009, 10:05

maytas

Merhaba.
Alternatif olması açısından bir cevap da ben yazayım.
UserForm'daki tüm TextBox ve ComboBox nesnelerinin içeriğini temizler.

Kod:
For Each Ctrl In Me.Controls
    If TypeOf Ctrl Is MSForms.TextBox Or TypeOf Ctrl Is MSForms.ComboBox Then Ctrl.Value = ""
Next

Kendi kodlarınızı kullanmak istiyorsanız hata vermemesi için ilgili sarırları şu şekilde değiştirin:

Kod:
Controls("TextBox" & i).Text = ""
Kod:
Controls("ComboBox" & j).Text = ""
17/09/2009, 19:05

Bilgisayarcı

If TypeOf Ctrl Is MSForms.TextBox Or TypeOf Ctrl Is MSForms.ComboBox Then Ctrl.Value = ""
yerine
if ctrl.controltype=actextbox ile daha rahat ulaşabilirsiniz
21/09/2009, 20:17

Puletin

Sayın hasankorkmaz45 arkadaşların verdiği cevaplar yeterli oldumu?
Lütfen açtıınız konuları cevapsız bırakmayınız.
Hayırlı Bayramlar.
1 2