请问“openfile”是一个专门的打开文件的语句吗?如果是,下面的语句有什么错误?Private Sub Command1_Click()
CommonDialog1.Filter = "all files(*.*)|*.*|text_files(*.txt)|*.txt|batch files(*.bat)|*.bat"
CommonDialog1.FilterIndex = 2
CommonDialog1.ShowOpen
openfile (CommonDialog1.FileName)
Exit Sub 使用openfile可以打开一些其他的文件么?
比如是桌面上的快捷方式。比如上面的CommonDialog1.FileName为c:\显示桌面.lnk
在按下command1时候的效果可以和双击显示桌面.lnk的效果一下么?如果不能得话,用什么方法可以实现这样的效果?谢谢啦
CommonDialog1.Filter = "all files(*.*)|*.*|text_files(*.txt)|*.txt|batch files(*.bat)|*.bat"
CommonDialog1.FilterIndex = 2
CommonDialog1.ShowOpen
openfile (CommonDialog1.FileName)
Exit Sub 使用openfile可以打开一些其他的文件么?
比如是桌面上的快捷方式。比如上面的CommonDialog1.FileName为c:\显示桌面.lnk
在按下command1时候的效果可以和双击显示桌面.lnk的效果一下么?如果不能得话,用什么方法可以实现这样的效果?谢谢啦
打开文件你可以用Open 语句 Close 语句(关闭文件)
示例Dim I, FileName
For I = 1 To 3 ' 循环三次。
FileName = "TEST" & I ' 创建文件名。
Open FileName For Output As #I ' 打开文件。
Print #I, "This is a test." ' 将字符串写入文件。
Next I
Close ' 将三个已打开的文件全部关闭。
http://message.csdn.net/SendMessage.aspx?To=sunxl
在按下command1时候的效果可以和双击显示桌面.lnk的效果一下么?如果不能得话,用什么方法可以实现这样的效果?用SHELL方法来实现
你是不是itit上面的水民啊?+++++++++++比如上面的CommonDialog1.FileName为c:\显示桌面.lnk
在按下command1时候的效果可以和双击显示桌面.lnk的效果一下么?如果不能得话,用什么方法可以实现这样的效果?++++++++++这个我在itit上面发过的。还有
我列出来的程序是清华大学出版社出版的 1999年6月第一版 《Visual Basic 6.0入门与提高》中149页上的。
上面也没有说openfile为自定义函数,而是直接作为系统函数使用的。
不知道这是不是书上的错误。