• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 248
  • Last Modified:

print a seq file to a vert scroll textbox

what is the code to print the ENTIRE seq file to a vert scroll textbox. Seq is on 'B' drive and the textbox is on the 'c' drive
I was given this one line code but I do not understand it .
'text1.text = input (LOF(f), f)  . What is the 'f'
0
hjaycox
Asked:
hjaycox
  • 2
1 Solution
 
hjaycoxAuthor Commented:
Edited text of question
0
 
bin_huwairibCommented:
hjaycox,

Check the following example.

Example
=======

1- Add form1 to project1.
2- Add command1 to form1.
3- Add textbox1 to form1 and set MultiLine property to True.
4- Paste this code:

Private Sub Command1_Click()
 Dim txt As String
 
 Open "b:\test.txt" For Binary As #1  'replace test.txt with your file name
 txt = Space(LOF(1))
 Get #1, 1, txt
 Text1.Text = txt
 Close #1
End Sub


Best regards
Bin Huwairib
0
 
tellCommented:
"f" is simply your filehandle
try:
Open "filename.txt" For Input As #1
    Text1.Text = Input(LOF(1), 1)
Close #1
0
 
hjaycoxAuthor Commented:
excellent....thank you
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Cloud Class® Course: C++ 11 Fundamentals

This course will introduce you to C++ 11 and teach you about syntax fundamentals.

  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now