HERAKLES Otomatik Avlı kalıcı sunucu. 19 Haziran'da açılıyor. Atius & Wizard güvencesiyle hemen kayıt ol, ön kayıt ödülleri aktif. HEMEN TIKLA!
Belirtilen yoldaki dosyanın yerinde olup olmadığını bulan program yapalım.
Oluşturduğumuz forma:
Textbox'ı dosyanın yolunu girmek için kullanacağız.
Butonun içine şu kodları ekliyoruz:
Kolay Gelsin.
Oluşturduğumuz forma:
- 1 adet button ve
- 1 adet textbox ekliyoruz.
Textbox'ı dosyanın yolunu girmek için kullanacağız.
Butonun içine şu kodları ekliyoruz:
Kod:
Dim dosya
dosya = Dir(textbox1.text)
If dosya = "" Then
MsgBox(" Dosya Bulunmuyor!")
Else
MsgBox(" Dosya Bulundu!")
End If
Kolay Gelsin.
Şu an konuyu görüntüleyenler (Toplam : 0, Üye: 0, Misafir: 0)
Benzer konular
- Cevaplar
- 3
- Görüntüleme
- 274
- Cevaplar
- 12
- Görüntüleme
- 1K
- Cevaplar
- 3
- Görüntüleme
- 599
- Cevaplar
- 8
- Görüntüleme
- 693
