使用 VB6 打开 WhatsApp 桌面

Question

嗯，你好，我有一个疑问。问题是我如何从特定号码的in中打开带有消息的Whatsapp 桌面。例如，我可以使用该属性来做到这一点：buttonVB6C#Process

var process = $"whatsapp://send?phone=54123456789&text=hello!!";
Process.Start(process);

但vb6我不知道如何做到这一点，因为该方法可以是：

Shell "C://path_to_whatsapp_installed/whatsapp.exe" 

但这样我就无法在特定的聊天中打开

Answer 1

您可以使用该ShellExecute功能：

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 Long 

Const SW_SHOWNORMAL = 1
Const SW_SHOWMAXIMIZED = 3

在表单中调用它，如下所示：

ShellExecute Me.hWnd, "Open", "whatsapp://send?phone=54123456789&text=hello!", "", "", SW_SHOWMAXIMIZED