怎样用VB做一个窗口,这个窗口要居中显示并可以显示任何类型的文件，可以在这个窗口下打开或运行里面的程序

Question

但不可以删除或移动文件夹或文件的位置，就像个局域网的电影菜单一样，路径直接写死在VB代码中，请大家帮一下！
也就是说像打开文件夹一样，只是让他居中并定义了他的窗口大小和不能删除移动，但能操作运行里面的程序，他的路径其实是一个文夹（比如C：\1）当一个文件放到他指定的文件夹内，可以在这VB的窗口看得见并操作！

Answer 1

打开程序显示在窗口中而不是它自己或使用系统默认程序？
就好像文本文件就在窗口中打开而不是用记事本打开？
是不是这么理解？追问

打开可以是它自己或使用系统默认程序，打开文本文件可以不在窗口打开且用记事本打开，这个窗口其实就像打开文件夹一样的道理，只是让他每次打开都居中（不要全屏），在这窗口下不能删除不能移动里面的文件，但可以打开时是自己或用系统默认的程序运行打开。

追答

窗口全屏的话，把窗体的 StartUpPosition 属性设为1或2 （所有者中心或屏幕中心）即可。
你的要求需要控件或者用API，很抱歉我不会。

Answer 2

请一一列举所需功能好吗？
比如：
1.
2.
3.。。。。。

Answer 3

控件：Drivelistbox Dirlisebox 和 filelistbox 合用

Answer 4

我用Drivelistbox Dirlisebox 和 filelistbox 来给你写一段 StartUpPosition = 2窗体就置中了
有人用start命令 可这个在XP下没有 可以通过shell "cmd,exe /c "来调用默认的打开方式

Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
Private Sub File1_DblClick()
Dim P As String
If Right(File1.Path, 1) = "\" Then P = File1.Path Else P = File1.Path & "\"
Shell "cmd /c " & P & File1.List(File1.ListIndex), vbHide
End Sub