1.建立一个EXE工程，在主窗体上放一个按钮，如图32。

                    图32

1. 在按钮的单击事件中输入代码：

Sub Form1_Command1_BN_Clicked(hWndForm As hWnd, hWndControl As hWnd)Dim s as StringDim 文件 As CWSTR = FF_OpenFileDialog(hWndForm,_"打开机器码文件",_"",_"",_"全部(*.*)|*.*|所有文件(*.*)|*.*",_"",_OFN_EXPLORER Or OFN_NOCHANGEDIR Or OFN_CREATEPROMPT,_False)If Len(文件) ThenPrint 文件Open 文件 For Input As #1Line Input #1, sDo Until(EOF(1))Print ValInt(s)Line Input #1, sLoopPrint ValInt(s)Close #1End IfEnd Sub

1. 在本工程的release文件夹中建立一个文本文件输入：

1099

1199

4300

运行程序，在打开的文件选择框中选择步骤4中建立的文件，程序将其内容输出在开发界面下方的控制台里