Follow along with the video below to see how to install our site as a web app on your home screen.
Not: This feature may not be available in some browsers.
hAYIR PROJEDE TEXT OLDUGUNU VARSAYALIM TEXTE YAZDIKLARIMI OTOMATİK OLARAK NOT DEFTERİNE KAYIT OLMASINI İSTİYORUM YAZDIKTAN SONRA KAYDET BUTONU OLSUN ONA TIKLAYINCA KAYDETSİN BUNUN GİBİ..Butona tıkladığında not defteri mi açılsın
Hocam buyur,
dialog1.CancelError = True
On Error GoTo Son
dialog1.DialogTitle = "Kaydet"
dialog1.Filter = "Metin Belgesi(*.txt)|*.txt"
dialog1.FileName = "Yeni Metin Belgesi"
dialog1.ShowSave
Open dialog1.FileName For Append As #1
Print #1, Text1.Text
Close #1
MsgBox "Kayıt Tamamlanmıştır"
Son: