Public 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_SHOW = 5Private Sub Command1_Click()
ShellExecute hwnd, vbNullString, "mailto:[email protected]?subject=This%20is%20a%20Test%20Subject&body=Body%20text", vbNullString, vbNullString, SW_SHOW
End Sub
ShellExecute hwnd, vbNullString, "mailto:[email protected]?subject=This%20is%20a%20Test%20Subject&body=Body%20text", vbNullString, vbNullString, SW_SHOW
End Sub
解决方案 »
- vb 中 将 string 转成数组
- 如何访问通过Controls.Add方法动态添加的[未引用]自定义控件的自定义方法或属性?
- 在ACCESS数据库中能否用case when then end 语句??在线等,来者有分
- 怎么才能系统让系统每天定时执行一个VBA程序。
- 会话偶尔无法打开,请高手指点?
- 如何删除一个字符串中最后一个字符
- 端口的打开和关闭!!急~~!!在线等!
- 帮助人提问:有没有与InverRect相类似的一个函数,能够做到。。。。?
- 随意移动图片
- 如何服务器端组件及客户端程序将安装在不同的机器上?
- 引用列表框(LIST1)最后一个数据应使用什么啊?怎么写啊?
- 请问VB中标准模块中的申明和窗口通用过程中的申明有什么区别?
Private Declare ...
...&body=" & "Line1" & vbCrLf & "Line2"