Question

vb编程问题，在线等

vb中，我想打开一个txt文件，用的代码是 Open "C:\桌面\零件1.igs" For Input as #1,先建了一个windows应用窗体，然后加入了一个按钮，在按钮中想打开这个txt文件，写完程序，显示错误，说未声明open,命名空间中有文件I/O功能，是不是还要加什么命令阿，哪位高人指点一下，不
谢谢大家！我按照大家的方法试了一下，还是没有解决问题，我用的是Microsoft Visual Studio中的vb语言，是不是我的控件还没加齐，唉，有问题了，下一步就不好进行了。

Answer 1

在“工程”菜单里有“部件”，打开“部件”选项卡，把“Microsoft Common Dialog Contrlo 6.0”选项的钩打上，确定，此时在工具箱上出现了“CommonDialog控件”

建立一个CommonDialog控件名为：CommonDialog1
给Command1添加Click事件再试试看

发觉可能是版本问题了，我这个就可以，Microsoft visual basic 6.0中文版
要是只想打开用于插入数据或读取数据的那种‘打开’，就用你那种方法；要是打开可以直接操作的文件，就要用shell了，如：
Shell "NotePad " & "D:\1.txt", vbNormalFocus

Answer 2

把你完整的代码贴一下

Answer 3

OPEN是不用声明的
应该是你哪个代码出错了

Answer 4

如果你只想打开文件而不是要把文件内容读到程序中可以用shell
Shell"notepad.exe C:\桌面\零件1.igs"
注意中间有个空格！！

附加说明：
引号内第一项是要运行的程序（就是记事本），第二项是运行参数（在这里就是要打开的文件）

否则可以用下列代码
Function TXTRead() As String
Dim myhand As String
Open "C:\桌面\零件1.igs" For Input As #4
Input #4, myhand
Close #4
Qread = myhand
End Function
这个函数返回文本文件的内容，可以在需要的地方调用这个函数。

Answer 5

用:

Dim FileNum As Integer '声明变量FileNum做为文件编号
FileNum = FreeFile '文件号
Open "C:\桌面\零件1.igs" For Input As FileNum
Close #filenum '结束

试试!