Learn how to a build a cloud-first strategyRegister Now

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 244
  • 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

Featured Post

What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

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