Visual Basic - Openfiledialog

ahmetet

Üye
10 Eyl 2012
195
0
İzmir
OpenFileDialog1.Title="Dosya Aç Penceresi" // Openfiledialog görüntülendiği zaman ismi
OpenFileDialog1.DefaultExt="txt" // örneğin dosya ismine ahmetet yazdık fakat .txt ' yi eklemedik bu kod otomatik olarak ekler
OpenFileDialog1.Filter="Text Dosyaları (*.txt)|*.txt|Tüm Dosyalar(*.*)|*.*" // Dosya türlerini filtrelersiniz , sınırlarsınız
OpenFileDialog1.Multiselect=True // Birden fazla dosya seçimini ayarlarsınız
OpenFileDialog1.ShowDialog() // ve Openfiledialog penceresini başlatırsınız
Dim Yollar() As String // Birden fazla dosya seçimi için yollar adlı bir değişken oluşturursunuz

Yollar=OpenFileDialog1.FileNames // Birden fazla dosya seçimi için bu değişkeni komuta atarsınız

// Bu kod sayesinde de birden fazla dosya seçecekseniz listbox'a tek tek hepsini alır

For Each Eleman As String In Yollar
ListBox1.Items.Add(Eleman)
Next
 
Üst

Turkhackteam.org internet sitesi 5651 sayılı kanun’un 2. maddesinin 1. fıkrasının m) bendi ile aynı kanunun 5. maddesi kapsamında "Yer Sağlayıcı" konumundadır. İçerikler ön onay olmaksızın tamamen kullanıcılar tarafından oluşturulmaktadır. Turkhackteam.org; Yer sağlayıcı olarak, kullanıcılar tarafından oluşturulan içeriği ya da hukuka aykırı paylaşımı kontrol etmekle ya da araştırmakla yükümlü değildir. Türkhackteam saldırı timleri Türk sitelerine hiçbir zararlı faaliyette bulunmaz. Türkhackteam üyelerinin yaptığı bireysel hack faaliyetlerinden Türkhackteam sorumlu değildir. Sitelerinize Türkhackteam ismi kullanılarak hack faaliyetinde bulunulursa, site-sunucu erişim loglarından bu faaliyeti gerçekleştiren ip adresini tespit edip diğer kanıtlarla birlikte savcılığa suç duyurusunda bulununuz.