Open App.Path & "/" & "metin.txt" For Input As #1
Input #1, contentfile
contentfile = RichTextBox1.Text
Close #1
ustalar bu kodla aktarmayı başarıyorum fakat metin.txt yaklaşık 48 kb oldugundan dolayı sadece 1-2 kelimesini alabiliyorum hangi degişkeni kullanmam gerekiyor lutfen bir el atın
__________________