求助，真切求助，vb打开多个文件的问题
各位高手们，小弟近来做一项目，实为VB打开多个文件之问题烦恼，大牛们有vb打开多个文件的源码么，请发一份给我email好么，416226798@qq.com，谢啦！
怎么打开的？如果是OPEN打开多个文件，其文件号必须用FreeFile函数动态取得；如果是用SHELL打开，是否因为内存不够？你没有说清楚！
还是因为没有相应的程序打开文件！
谢谢大家的帮助，小弟先贴出自己的代码，请指正，我用的是getopenfilename函数
VB code:
Option Explicit
'这是从多文件名字符串分离出文件名的函数
Type DlgFileInfo
iCount As Long
sPath As String
sFile() As String
End Type
Private Type OPENFILENAME
lStructSize As Long
hwndOwner As Long
hInstance As Long
lpstrFilter As String
lpstrCustomFilter As Long
nMaxCustFilter As Long
nFilterIndex As Long
lpstrFile As String
nMaxFile As Long
lpstrFileTitle As String
nMaxFileTitle As Long
lpstrInitialDir As String
lpstrTitle As String
flags As Long
nFileOffset As Integer
nFileExtension As Integer
lpstrDefExt As String
lCustData As Long
lpfnHook As Long
lpTemplateName As String
End Type
Public Function GetDlgFileInfo(strFile As OPENFILENAME) As DlgFileInfo
Dim sPath, tmpStr As String
Dim sFile() As String
Dim iCount As Integer
Dim I As Integer
Dim strFilename As String
strFilename = strFile.lpstrFile
On Error GoTo ErrHandle
tmpStr = OpenFile.lpstrFileT
相关问答：
请教一下：我用vb写了一个调用Illustrator的测试程序，代码很简单：Private Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......
用VB怎么只针对windows自带的文件的右键添加菜单 如（.txt .doc)
这个是只针对以这两个为扩展名的文件操作
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\txtfile\shell\[随便起名]\command]
@= ......
在下是vb的新手，想写段程序，在vb中，使用wscript调用一些外部的命令，但是程序执行一直有错误，请各位高手帮忙解答下，谢谢。
代码如下：
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
我是VB的新成员，现在想用VB来做个TXT文档，请大家给我代码及介绍一下相应的控件！
非常感谢！！！！！！
可以用一些OFFICE控件
google上找一下吧,VB写入TXT,很多样例代码的
直接调查用就可以了
面对美女 ......
各位大虾：
我是刚学VB，现在想用VB调用一个动态库，动态库里面有很多函数。我知道使用VB调用动态库调用函数，需要将要调用的函数在程序中声明即可，但是里面有很多函数，不会每一个函数都要声明吧。请� ......
