![]() |
| | |||||||
BİLGİSAYAR & İNTERNET katogorisi Programlama forumu içinde "STaNDaRT KONTROL NESNELERİ VE İŞLEVLERİ" başlıklı konu görüntüleniyor, "Pointer : Picture Box (Resim Kutusu) : Resimlerin gösterilmesini sağlar. Private Sub Form_Load() Picture2.Picture = LoadPicture("c:\windows\Dalgalar.bmp") End Sub Label (Etiket): Form üzerinde bilginin gösterilmesini sağlar. Private Sub Form_Load() Label2.Caption = ..."
![]() |
| | Seçenekler | Stil |
| | #1 |
| Yeni Kayıt ![]() Üyelik tarihi: Aug 2006
Mesajlar: 16
Rep Gücü: 3 Rep: 40 ![]() | Pointer : Picture Box (Resim Kutusu) : Resimlerin gösterilmesini sağlar. Private Sub Form_Load() Picture2.Picture = LoadPicture("c:\windows\Dalgalar.bmp") End Sub Label (Etiket): Form üzerinde bilginin gösterilmesini sağlar. Private Sub Form_Load() Label2.Caption = "Lütfen Adınızı ve Soyadınızı Giriniz:" End Sub Private Sub Form_Load() Label2.Caption = "Lütfen Adınızı ve Soyadınızı Giriniz:" Label2.AutoSize = True End Sub TextBox (Metin Kutusu): Bilgi girişi için kullanılır. Kod penceresinde iki liste kutusu bulunmaktadır. İlk liste kutusunun adı Object, 2. liste kutusunun adı ise Procedure dür. Object de nesneler, Procedure de ise o nesnenin gerçekleştirebileceği olaylar bulunmaktadır. Private Sub Text2_Change() MsgBox "change olayı" End Sub Private Sub Text2_KeyDown(KeyCode As Integer, Shift As Integer) MsgBox "key down olayı" End Sub Private Sub Text2_KeyPress(KeyAscii As Integer) MsgBox "key press olayı" End Sub Private Sub Text2_KeyUp(KeyCode As Integer, Shift As Integer) MsgBox "key up olayı" End Sub Private Sub Text2_Change() Text1.Text = Text2.Text End Sub Private Sub Text2_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then MsgBox Text2.Text End Sub Frame (Çerçeve) Kontrolleri gruplamak için kullanılır. Çerçeve içinde bulunan kontrollerin toplu olarak özellikleri düzenlenebilir. Örneğin Enabled ve Visible özellikleri toplu olarak düzenlenebilir. Çerçevenin hareketiyle içindeki tüm kontrol de taşınır. Command Button (Komut Düğmesi) Bir işlemin başlatılması için kullanılır. Caption=”&Çıkış” ----ALT Ç Private Sub Command1_Click() End End Sub Butona resim eklemek için style=1 olmalı.
__________________ HacKeD BY No_NicK |
| | |
| Herşey Yarı Fiyatına.. |
![]() |
| Seçenekler | |
| Stil | |
| |
Benzer Konular | ||||
| Konu | Konuyu Başlatan | Forum | Cevap | Son Mesaj |
| goldmaster arıza notları | süvari | Teknik Servis (uydu hastanesi) | 1 | 08-05-2008 05:44 PM |
| resident evil 4 tam çözüm | >neo> | Oyun Hileleri | 4 | 02-03-2008 11:26 PM |
| asansör sistemleri | bulenttg | Ekonomi, iş, kariyer | 0 | 05-02-2008 04:44 PM |
| Otomotiv Kısaltmaları Sözlüğü (ALFABETİK SIRAYLA) Aradığınız Her Terim İçinde | doğangüneş | Otomobil | 0 | 05-09-2007 12:05 AM |
| Gıda yonetmeligi | EMRE | Hukuk | 1 | 25-05-2007 07:14 PM |
| | |