Form1
File Viewer (version 2B)
Form1%
FilenameBox
FindBox
DosBox
TextBox
FilenameLbl
Filename Input
FindLbl
Find Input
DosLbl
DOS/Win Input
FileCom
&File
ReadCom
ToggleReadCom
Toggle Read
FindFileCom
	Find File
QuitCom
D	SearchCom
&Search
FindCom
CommandCom
&Command
DosCom
DOS Command
WinCom
Windows Command
ToggleOSCom
	Toggle OS
QuitBtn_Click
Form_Click
ReadBtn_Click
FilenameBox
	LineInput
TextBox%
TextLst_ClickG
TextLstn
	ListCount!
ListSize
FindBtn_ClickO
CurrentLine
Text1_Changev
FindBox_Change
FindBox
	ListIndex
Foundr
FilenameBox_Change
	Form_Load
	MultiLine
ScrollBars
SelStart
	SelLength
CurrentIndexr
CurIndex
TextBox_Change
Search
SelText
BadFile
EndOfSub[
Command1_Click
DosBtn_Click^
DosBox
Dummy7
WinBox_Click
DosBox_Changee
Label1_Clicku
FindFileBtn_Click
DosLbl_Click
Filename
subdirectory
ToggleBtn_Click~
ReadBtn
Enabled
False
TrueQ
ShowShellsBtn_Click
Visible
WinBtn_Click
DosBtn
WinBtn
DosLblh
Label3_Click
FilenameLbl_Click
FindLbl_Click
ShowOSBtn_Click
QuitCom_Click
DosCom_Click
FileCom_Click$
FindCom_ClickI
ToggleReadCom_Click
ReadCom
ReadCom_Click
FindFileCom_Click
WinCom_Click
ToggleOSCom_Click
WinCom
DosCom
BadFile2
	EndOfSub2
FinCom
Checked
FindCom
FindLbl_Change
CommandCom_Click
DosCom_Click
 invoke the DOSBAT batch file 
dosbat.bat 
FindBox_Change
FindCom_Click
 update the index to the current character
 store the text of the Find box in the variable Find
 is variable Find empty?
 nothing to find
 locate the index of the next substring Find in thed
 text boxh
 found a match?
 Yes! Display the matching text as selected text
 No! Clear any selected text
FindFileCom_Click
 invoke the DOS dir command with the /se
 subdirectory option and the /p paginatedr
 output option
dosbat.bat dir 
 /s/p
FindLbl_Change
QuitCom_Click
ReadCom_Click
 obtain filename from the filename text box 
 if filename is an empty string, exitx
 set error-handler
 open the file
 clear variable to reuse it
 loop to read the text lines from the ASCII file
 append a new line
 copy F into text box 
 close the filep
 exit procedurep
* Error-handler 
Cannot open file 
File I/O Error
ToggleOSCom_Click
 toggle the Visible property of the DosBox text box,
 the DosBtn button, the WinBtn button, and the DosLbl
 label
ToggleReadCom_Click
WinCom_Click
 invoke a Windows application