path$='x:\myfile.txt'
nol=NOL(path$)
x=x+1
If (x<=nol) Then
result$=StrFromFile(path$,x,1)
Message("","result$")
End
هر چند فرموديد اين تشكر رو با دكمه مربوطه انجام بديد بهتره اما حيف ديدم به فشار دادن يك دكمه اكتفا كنم عزيزم و از دوست گلم بابت اين جواب خيلي خيلي ممنونم .
ان شاء الله بتونم جبران كنم گلم.
بي تاب تو ام چرا نمي آيي تو؟