Question

我试图在visual basic 6中启动一个隐藏文件属性，但是VB6无法识别我的应用程序启动的隐藏文件属性...另一方面，当我取消隐藏文件属性时，VB6识别文件。

我的问题是

如何设法让我的VB6.0应用程序启动隐藏文件属性应用程序？

以下是我的尝试：

Shell("Explorer.exe " & "hiddenapplication.exe", vbHide)

注意：假设“hiddenapplication.exe”是隐藏文件属性，它是我将应用程序定位为仅打开此文件的文件。

有什么建议吗？

Answer 1

此代码将检查文件是否处于隐藏属性，并将正常打开。

此代码也经过测试且100％正常运行！

Dim Res
Dim Filename

Filename = App.Path + "\hiddenapplication.exe"

If Dir("hiddenapplication.exe", vbHidden) <> "" Then
    Res = Shell("Explorer.exe " & Filename, vbHide)
    MsgBox "hiddenapplication.exe found and is now opened!"
End If

在Visual Basic 6中启动Windows文件系统属性“隐藏”应用程序

1 个答案: