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 thetxt file into a text box.
Answer:
OK…here goes. You need to have VBCONSTANT.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_OPENAt 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 = sTempAll of the pieces of code here are documented in the help files included with VB.
