Dosya Yerinde mi?

[ßyMesMes]

Türkiye'nin ilk Cross-Platform OldSchool MOBİL & PC 1-99 Sunucusu Lamira2 6 Kasım'da Açılıyor! Büyük Açılışı Kaçırma HEMEN TIKLA!

Belirtilen yoldaki dosyanın yerinde olup olmadığını bulan program yapalım.

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:

Dim dosya
        dosya = Dir(textbox1.text)
        If dosya = "" Then
            MsgBox(" Dosya Bulunmuyor!")
        Else
            MsgBox(" Dosya Bulundu!")
        End If

Kolay Gelsin.

 

[turkmmouser03]

Teşşekurler . Kaliteli Bir Konu​

 

[Karcemackers]

Paylasım icin tesekkurler.