如何实现点击一个Command按纽,在某个文件夹里面创建一个文件?
谢谢先~~~

有几个方法..可以用API...
最简单的是用open "c:\a.txt" for output as #
close #1
这样就建立了a.txt文件..

谢谢你
我看见你帮很多人解决了很多问题
我就还想问你一个问题

我在一个主窗体里建立了一个子窗体
在主窗体载入时就载入子窗体
1.怎么样才可以使子窗体固定在一个我想要的位置不变?
2.怎么样才可以使该子窗体不被另外的最大化了的子窗体挡住?

谢谢你~~~

1.怎么样才可以使子窗体固定在一个我想要的位置不变?
这个是什么意思?..是让这个窗体永远不能移动?...如果是的话..简单的可以用计时器控件...复杂点的可以用子类技术..如果不是的话..你只要在窗体的load事件里写代码..me.left=10 :me.top=10 '这样在显示的时候就会在指定的位置里显示...
2.怎么样才可以使该子窗体不被另外的最大化了的子窗体挡住?
可以使用API.将它的位置设置为mosttop...
在窗体模块里加入如下代码就可以了..
Option Explicit
Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Private Const HWND_TOPMOST = -1
Private Const SWP_NOMOVE = &H2
Private Const SWP_NOSIZE = &H1

Private Sub Form_Load()
Call SetWindowPos(Me.hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE)
End Sub

感谢！学习中。。。

谢谢你的帮助
我的这两个子窗体的StartUpPosition属性设置不了其他的
只能默认为0
是怎么回事啊
而且用了你的代码段也实现不了
我用Timer也不行
是不是我的程序有问题啊?
不好意思,再麻烦你了

'工程-引用 microsoft scripting runtime
Dim file As New FileSystemObject
file.CreateTextFile "e:/bbb.txt"