VB中的input函數的用法：

1、首先啟動vb6，新建一個標準exe文件，進入窗體主界面。

2、在工具箱里雙擊按鈕控件，在窗體上創建一個按鈕對象。

3、雙擊按鈕控件進入代碼編寫區域，選擇對象為conmmand1，過程為click。

4、接著輸入代碼：Dima,bAsIntegera=InputBox("請輸入整數值","提示信息")。

5、點擊工具欄中的啟動按鈕進行調整，點擊按鈕，接著會彈出提示信息對話框。

6、執行文件-保存工程命令，將工程和窗體依次進行保存即可完成操作。

試試把那句修改成這樣open"e:\b.txt"forinputas#1ifnoteof(1)theninput#1,i,s,d,bclose#1