Solved

print a seq file to a vert scroll textbox

Posted on 1998-06-05
4
235 Views
Last Modified: 2010-05-03
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
Comment
Question by:hjaycox
  • 2
4 Comments
 

Author Comment

by:hjaycox
ID: 1462667
Edited text of question
0
 
LVL 5

Accepted Solution

by:
bin_huwairib earned 50 total points
ID: 1462668
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
 

Expert Comment

by:tell
ID: 1462669
"f" is simply your filehandle
try:
Open "filename.txt" For Input As #1
    Text1.Text = Input(LOF(1), 1)
Close #1
0
 

Author Comment

by:hjaycox
ID: 1462670
excellent....thank you
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

I was working on a PowerPoint add-in the other day and a client asked me "can you implement a feature which processes a chart when it's pasted into a slide from another deck?". It got me wondering how to hook into built-in ribbon events in Office.
Since upgrading to Office 2013 or higher installing the Smart Indenter addin will fail. This article will explain how to install it so it will work regardless of the Office version installed.
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…
This lesson covers basic error handling code in Microsoft Excel using VBA. This is the first lesson in a 3-part series that uses code to loop through an Excel spreadsheet in VBA and then fix errors, taking advantage of error handling code. This l…

910 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

19 Experts available now in Live!

Get 1:1 Help Now