Login | Register   
LinkedIn
Google+
Twitter
RSS Feed
Download our iPhone app
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX


Tip of the Day
Language: Visual Basic
Expertise: Beginner
Oct 1, 1996

Opening and Reading a File

Question:
Can you please send me the code to open a file using the common dialog box - not just the code to open the dialog box but to actually open the txt file into a text box.

Answer:
OK...here goes. You need to have \VB\CONSTANT.TXT loaded into your project...do a Add File on it.

   CommonDialog.Flags = OFN_HIDEREADONLY
   CommonDialog.DialogTitle = "Select Input File"
   CommonDialog.Filter = "All Files(*.*)|*.*|Text Files (*.txt)|*.txt"
   CommonDialog.FilterIndex = 2
   CommonDialog.CancelError = True
   CommonDialog.Action = DLG_FILE_OPEN
At this point, the filename to use is in the CommonDialog.Filename property. To read your text into the text box, here is the code to use:
   Dim sTemp as String
   Open CommonDialog.Filename for Input as #1
   sTemp = ""
   Do While Not EOF(1)
      sTemp = sTemp + Input$(1, 1)
   Loop
   Close #1
   TextBox.Text = sTemp
All of the pieces of code here are documented in the help files included with VB.
DevX Pro
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap
Thanks for your registration, follow us on our social networks to keep up-to-date