[Webinar] Streamline your web hosting managementRegister Today

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

[Webinar] Improve your customer journey

A positive customer journey is important in attracting and retaining business. To improve this experience, you can use Google Maps APIs to increase checkout conversions, boost user engagement, and optimize order fulfillment. Learn how in this webinar presented by Dito.

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