VB'de Menüye Çok Kullanılan Dosyaları Eklemek

'Programlama' forumunda ...... tarafından 22 Ağu 2009 tarihinde açılan konu

  1. ......

    ...... Misafir



    İşte Visual Basic programlarınıza profesyonellik katacak bir püf noktası daha. Word, Excel gibi popüler programlar Dosya menülerinde �En son kullanılan� dosyalar için bir alan tutarlar. Böylece kullanıcı bu dosyayı bir daha açmak istediğinde dosyanın yerini genel diyalog kutusunda aramak zorunda kalmaz, menüden bu dosyayı seçerek açılmasını sağlayabilir. Siz de buna benzer bir şey yapabilirsiniz. Öncelikle yanda görülen 1. Formu ve üzerindeki menüyü yaratmakla başlayın.

    Private Sub eklenen_dosya_Click()
    Label1.Caption = eklenen_dosya.Caption
    End Sub

    Private Sub Form_Load()
    Label1.Caption = "" �Son açılan dosyayı temsil eden etiketi temizle
    eklenen_dosya.Visible = False �Menü seçeneğini gizle
    �(Program yeni başladı ve hiç dosya açılmadı)
    CommonDialog1.filename = "*.*"
    End Sub

    Private Sub Ac_Click() �Dosya * Aç komutu çalıştırıldığında
    CommonDialog1.DefaultExt = "*.*" �Tüm dosyalar
    CommonDialog1.Action = 1 �Dosya Aç
    eklenen_dosya.Caption = CommonDialog1.filename �Genel diyalog kutusunda seçilen dosyayı
    �Son menü seçeneğine ekle
    eklenen_dosya.Visible = True �Son menü seçeneğini görünür hale getir.
    Label1.Caption = CommonDialog1.filename
    End Sub


    Yukarıdaki kodları da yazdıktan sonra programınızı çalıştırın ve Dosya menüsünden Aç komutunu seçin. Herhangi bir dosya seçtikten sonra bunun, Dosya menüsünün en alt satırında eski ismi �eklenen_dosya� olan yere yerleştiğini göreceksiniz. İşte bu kadar basit...
     

Bu Sayfayı Paylaş