有没有vb程序的反编译工具，即把vb做好的应用程序反编译为工程文件；或者有没有dll的反编译工具？

Question

长发女生你真无知，窃code，怎么能叫偷呢？
主要是我想改改某个软件，用它的dll，但没有说明文档（软件可是我们花20K多买的哦）
还请大家帮忙

Answer 1

Girl1983(长发女生) 好可爱，我喜欢~~呵呵~~~

Answer 2

VB的反编译软件是有的,但是好像只有反编译5.0和更早的,没见过反编译VB6.0的,所以不好意思,你再找找看,如果有了,也告诉我([email protected]），谢谢！

Answer 3

piaoyunbes(云家堡飘云)，天下女孩多的是，为什么非要喜欢个男人？

Answer 4

Option ExplicitPrivate Declare Function GetDriveType Lib "kernel32" Alias "GetDriveTypeA" (ByVal nDrive As String) As Long
Private Declare Function GetLogicalDrives Lib "kernel32" () As Long
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As LongConst SW_SHOWNORMAL = 1Private Function IsCDRom(ByVal sDriver As String) As Boolean
    Select Case GetDriveType(sDriver)
        Case 2: IsCDRom = False 'Me.Print "Removable"
        Case 3: IsCDRom = False ' Me.Print "Drive Fixed"
        Case Is = 4: IsCDRom = False ' Me.Print "Remote"
        Case Is = 5: IsCDRom = True ' Me.Print "Cd-Rom"
        Case Is = 6: IsCDRom = False ' Me.Print "Ram disk"
        Case Else: IsCDRom = False ' Me.Print "Unrecognized"
    End Select
End Function
Private Function GetCDRom() As String
    Dim LDs As Long, Cnt As Long, sDriver As String
    LDs = GetLogicalDrives
    For Cnt = 0 To 25
        If (LDs And 2 ^ Cnt) <> 0 Then
            sDriver = Chr$(65 + Cnt) & ":\"
            If IsCDRom(sDriver) Then
                Run sDriver
            End If
        End If
    Next Cnt
End FunctionPrivate Sub Run(ByVal sDriver As String)
    Dim sFile As String
    sFile = sDriver & "a.txt" 'a.txt换成你的可执行文件名
    If Dir(sFile) <> "" Then MsgBox "Goin' to run  " & sFile & "!": ShellExecute Me.hwnd, vbNullString, sFile, vbNullString, vbNullString, SW_SHOWNORMALEnd SubPrivate Sub Form_Load()
    GetCDRom
End Sub你再重新试一边，把以上的代码完整复制到工程里面
自己多看看，分析分析，不要总是指望别人，多看看帮助队你自己有好处

Answer 5

早先的版本4。0有，现在的VB6是不行的
你可以看dll的接口含数dependence.exe

Answer 6

多谢各位前辈指点，本来想继承老祖宗传下来的“拿来主义”，直接用现成的dll（无帮助文件），但经各位大虾教诲，我决定自己编一个新程序