AccessTr.neTMicrosoft ExcelExcel Cevaplanmış Soruları

Textbox Ve Combobox Backcolor Rengini Kaldırma

1 2 3
08/08/2021, 19:26

malatyalı

Ustam
Kod:
For Each ç In Me.Controls
If TypeName(ç) = "TextBox" Or TypeName(ç) = "ComboBox" Then ç.Value = ""
If TypeName(ç) = "OptionButton" Or TypeName(ç) = "CheckBox" Then ç.Value = False
Next ç
yukarıda yer alan kod ile nesneleri temizliyorum.
Bu koda textbox ve combobox backcolor renklerini kaldırmayı nasıl ekleye bilirim?
08/08/2021, 19:41

berduş

Me.TextBox1.BackColor = vbButtonFace
08/08/2021, 20:23

malatyalı

USTAM
textboxlar ve comboboxlar için
Bunu koda nasıl entegre edeceğim.
09/08/2021, 01:04

feraz

For Each ç In Me.Controls

 If TypeName(ç) = "TextBox" Or TypeName(ç) = "ComboBox" Then 

  ç.Value = ""

  ç.BackColor = vbButtonFace

 end if

next
09/08/2021, 01:12

feraz

For Each ç In Me.Controls

    Select Case TypeName(ç)

        Case "TextBox", "ComboBox"

            ç.Value = ""

            ç.BackColor = vbButtonFace

        Case "OptionButton", "CheckBox"

            ç.Value = ""

            ç.BackColor = vbButtonFace

    End Select

Next
For Each ç In Me.Controls

    Select Case TypeName(ç)

        Case "TextBox", "ComboBox", "OptionButton", "CheckBox"

            ç.Value = ""

            ç.BackColor = vbButtonFace

    End Select

Next
09/08/2021, 08:13

berduş

ben bilerek cevap yazmamıştım @feraz bey sizce de sayın @malatyalı 'nın if koşulunu şimdiye kadar öğrenmiş olması gerekmiyor muydu?
if en temel kalıplardan biridir ve burada en temel seviyede kullanılmış. basit bir araştırmayla sayın @malatyalı da bunu çözebilirdi
1 2 3