Proje İçinde Command Box Ekleme

06/03/2012, 18:40

adrian

İyi günler...
Benim sorum, proje içinde nasıl commandbox ya da başka bir kutu ekleneçeğiyle ilgili.
Örneğin, program çalıştırıldıktan sonra, form1'de 3 ya da 4 değerini girersek form 2'de nasıl kendiliğinden 3 ya da 4 adet commandbox oluşur? Şimdiden teşekkürler
06/03/2012, 19:14

alpeki99


Set Cmd = Controls.Add("vb.commandbutton", "Cmd")
Cmd.Width = 2000
Cmd.Top = me.Height / 2 - Cmd.Height / 2 - 100
Cmd.Left = me.Width / 2 - Cmd.Width / 2 - 100
Cmd.Caption = "Buton Üretildi"
Cmd.Visible = true

gibi bir kod kullanmış birisi.
06/03/2012, 21:36

adrian

teşekkürler, komut çalıştı da pekiyi örneğin text1.text'e 5 değerini girdik diyelim. 5 adet command box butonu oluşması için ne yapmak gerekir?
06/03/2012, 22:49

alpeki99

Yukarıdaki kodları bir prosedür içerisine yazın. Prosedüre parametre olarak integer veya byte türünde bir değişken tanımlayın.

For döngüsü ile her defasında yukarıdaki prosedürü çalıştırın. Bu arada For'un değerini prosedüre parametre olarak gönderin.

Gelen parametre değerini kontrole isim olarak ekleyin. Cmd1, Cmd2, ... , CmdX gibi.
06/03/2012, 23:27

adrian

teşekkürler...
işe yaradı
06/03/2012, 23:32

alpeki99

İşinizi görmesine sevindim. Sizden ricamız mesajınıza örnek uygulama eklerseniz sorularınıza yardımcı olacakların işini kolaylaştırmış olursunuz.