很简单的问题，但是我不会，有关文件关联的。

我程序里有一个textbox控件，怎样实现双击一个txt文件，自动调用我的程序，然后再TextBox里把该文本文件显示出来呢？代码该怎么写？直接改txt打开方式肯定不行吧？

解决方案 »

  1.   

    当然要修改打开方式啦，在你的程序修改注册表，把文本文件与你的程序关联
    还要在你的程序里用command函数处理用户双击.txt文件时传递过来的参数
      

  2.   

    1。修改 注册表 hkey_classes_root2.在 sub main 中写入相应代码3.在编译时 设置参数
      

  3.   

    再给你一段注册文件类型的代码Public Sub associate(EXT As String, FileType As String, FileName As String) '创建文件关联
    On Error Resume Next
    Dim b As Object
    Set b = CreateObject("wscript.shell")
    b.regwrite "HKCR\" & EXT & "\", FileType
    b.regwrite "HKCR\" & FileType & "\", "MY file"
    b.regwrite "HKCR\" & FileType & "\DefaultIcon\", FileName
    b.regwrite "HKCR\" & FileType & "\shell\open\command\", FileName & " %L"
    b.regdelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\" & EXT & "\Application"
    b.regwrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\" & EXT & "\Application", FileName
    b.regdelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\" & EXT & "\OpenWithList\"
    b.regwrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\" & EXT & "\OpenWithList\a", FileName
    End Sub
    调用:
        associate ".lu", "SystemFile", 打开文件的应用程序 '建立文件关联
      

  4.   

    这里是在注册表中修改文件类型的方法
    我知道当点击一个html文件时，浏览器就会自动打开，或者是点击一个doc文件，Word就会运行。有没有想过当用户点击你自己定义文件类型时，你的程序就会自动启动呢？其实想做到这点很简单，只须对注册表做点手脚就行了。每一个文件类型的信息被保存在注册表中的 'HKEY_CLASSES_ROOT'下面。假设我们自定义的文件类型的后缀为.hyp，文件名为Test_File_Hype (中间不能有空格).首先在HKEY_CLASSES_ROOT下创建 .hypHKEY_CLASSES_ROOT\.hyp将[默认]键值改为"Test_File_Hype"。然后在HKEY_CLASSES_ROOT下添加主键 Test_File_HypeHKEY_CLASSES_ROOT\Test_File_Hype按照下面的路径添加新的主键 HKEY_CLASSES_ROOT\Test_File_Hype\ShellHKEY_CLASSES_ROOT\Test_File_Hype\Shell\OpenHKEY_CLASSES_ROOT\Test_File_Hype\Shell\Open\Command将下面的字符作为Command的键值     your application path.exe %1     (例如 C:\WINDOWS\HYP\HYP.EXE %1)或许你还想为自己的文件类型加上同自己的执行文件一样的图标，很简单，照下面的方法添加就行了。HKEY_CLASSES_ROOT\Test_File_Hype\DefaultIcon输入键值：     your application path.EXE,0后面的零表示文件的图标同程序的主图标一致，如果你的程序有很多图标，换一换数字就可改变文件显示的图标了。
      

  5.   

    先修改txt文件的关联然后通过command传递文件路径就可以用textbox加载了
      

  6.   

    上面的代码好象只能关联程序，怎么才能在我的TextBox里显示出来呢？有代码或例子吗？