易截截图软件、单文件、免安装、纯绿色、仅160KB

vb打开快捷方式的办法?

求助,我搜了下,这样的办法不行。。。
Shell "Rundll32.exe url.dll, FileProtocolHandler F:\QQ.lnk"
请问下,还有其他办法好用么?
虽然我也不知道,但直接Shell应用程序不是更好?没必要通过快捷方式绕个弯了吧?

Private Sub Command1_Click()
    Shell "Rundll32.exe url.dll, FileProtocolHandler C:\Documents and Settings\Administrator\桌面\Windows Media Player.lnk"
End Sub


睡觉

VB code:

Private Sub Command1_Click()
ShellExecute Me.hwnd, "OPEN", "C:\Documents and Settings\Administrator\桌面\Windows Media Player.lnk", "", "", 5

End Sub


{{


相关问答:

为什么用VB改变不了工具栏按扭的宽度 - VB / 控件

为什么工具栏按扭的宽度改变不了,在属性里改了又变成原来的数值了

大胡子真厉害,回答基本都是爆料级的
大胡子升级真快啊,这才几天就5条短裤外加月排名第一了
想想我这5个短裤混了差不多8年才得到的。

回复 ......

VB 的 PictureBOX 控件绘图问题 - VB / 控件

初学,大胆提问,请高手不吝赐教
1、滚动条点击与绘图板(屏幕,Piceure1)的移动问题已经解决。
  Picture1.Top = -VScroll1.Value + bcW '垂直移动
  Picture1.Left = -HScroll1.Value + bcW ' ......

vb自动发送邮件 - VB / 基础类

为什么我想循环自动发送邮件的时候,就只有第一封能自动发送,其它后面的邮件都只能创建,不能自动发送
Private Sub send_mail_Click() '发送邮件通知
  Do While Not TDBG_Dept.EOF
  If A> ......

vb - VB / 基础类

在vb中如何读取Word内容(包含表格,图片,等)
竟然不是zero。

不知道怎么实现的不要说话

这个只能读文本,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号