YAZDIĞINIZ METİN DEĞİŞMESİN
Öyle bir metin kutusu istiyorsunuz ki kullanıcı üzerine bir şeyler yazdığında değiştiremesin, istediğiniz metin dosyasını bu kutuya yüklediğinizde kullanıcı sadece bunu aşağı yukarı kaydırsın. Örneğimiz için alelade bir form üzerine yine alelade bir metin kutusu oluşturun. DENEME.TXT adında ve uzunca bir metin içeren örnek dosya oluşturun.Form_Load () 'Deneme dosyamızı yüklüyoruz... Open "DENEME.TXT" For Input As #1 Text1.Text = Input$(LOF(1), 1) Close #1 End Sub Private Sub Text1_KeyPress(keyascii As Integer) ' Kullanıcı bir tuşa bastığında ASCII değerini 0 yaparak tuş vuruşunu gözardı et. keyascii = 0 End Sub