‘Yazan=Mahmut Çakmak Private Sub Dir1_Change() File1.Path = Dir1.Path End Sub Private Sub Drive1_Change() On Error GoTo Hata Dir1.Path = Drive1.Drive Exit Sub Hata: If Err.Number = 68 Then `Sürücü Hazır Değilse m = MsgBox("Lütfen Sür

Devamını Görmek İçin Üye Girişi Yapmanız Gerekmektedir.

Baslık	Kategori	Hit
Form Başlığını Harf Harf yazdırmak	VISUAL BASIC	120
Extract Icon Http://excaliburonline.tripod.com	VISUAL BASIC	66
yazıyı döndürmek	VISUAL BASIC	109
TEXT YANIP SÖNME	VISUAL BASIC	187
Adres satırı	VISUAL BASIC	150