NewTextbox kontrolü

[bozacioglu]

Set NewCombobox = Me.Controls.Add("Forms.Combobox.1")
With NewCombobox
........
End with

kodu ile formumda birden fazla combobox oluşturdum. (Bel11,Bel12,Bel13........)
bu kodlar komut ile çalışarak oluştuğu için comboboxların click olayı kotrolü yok.
Bu şeklide oluşturulan boxlardan biinen bir tanesinin (herhanbiri değil yani) içine bilgi girişi olduğunda (örnek: msgbox "Selam" ) yazması için nereye bir komut yazılmalı.

 

[Zeki Gürsoy]

01/12/2020 tarihli mesajımda bu konuda iyi, kullanışlı bir örnek eklemiştim. İnceleyin... #5 nolu mesaj.

Soru - döngü ile textboxlarda çift tık işlemi yapma

Private Sub TextBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean) If TextBox1.Value = "" Then TextBox1.Value = "D" ElseIf TextBox1.Value = "D" Then TextBox1.Value = "İ" ElseIf TextBox1.Value = "İ" Then TextBox1.Value = "R" Else TextBox1.Value = "D" End If End Sub Yukarıda ki kod tek textbox...

excel.web.tr

.

 

[bozacioglu]

Teşekkür ederim İnceleyeceğim

 

[bozacioglu]

Örneğinizi incelemiştim. Teşekkür ederim. Ama bu kodları nereye yapıştıracağım. New Combobox ların kontrolü için daha anlayacağım bir dilden yazma şansınız var mıdır?

 

[bozacioglu]

Yardım edebilecek var mı, lütfen?

 

[bozacioglu]

frmDeneme.MpDeneme.Pages(3).Controls(....) hangi combobox a veri girişi yaparsam o veriye göre kod yazdım. Ama Set NewCombobox oldukları için click olayı yok. Hangisi bastığımı bulabilecek bir kod verebilirmisiniz.

 

[Muzaffer Ali]

Merhaba.
Class nesne oluşturma konularını araştırın.

https://www.excel.web.tr/threads/class-nesne-olusturmak.15876

Sorgu için arama sonuçları: class nesne

www.excel.web.tr