如何用VB6程序打开网上邻居和使系统静音? 2:控件ActSkin4的界面文件那里可以下载到?

catcw 2004-05-07 01:57:11
如何用VB6的程序打开网上邻居和使系统静音?

问题2:控件ActSkin4的界面文件那里可以下载到?
用什么软件可以自己制作?
...全文
53 3 点赞 打赏 收藏 举报
写回复
3 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
hhjjhjhj 2004-08-19
打开网上邻居
Private Sub Command1_Click()
Set shl = CreateObject("Shell.application")
shl.Explore 18
End Sub
  • 打赏
  • 举报
回复
hhjjhjhj 2004-08-18
静音
Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long

Private Sub Command1_Click()

mciAoff = mciSendString("set cdaudio audio all off", 0&, 0, 0)
End Sub
  • 打赏
  • 举报
回复
kmzs 2004-05-07
都不懂,郁闷
  • 打赏
  • 举报
回复
相关推荐
发帖
资源
加入

1060

社区成员

VB 资源
申请成为版主
帖子事件
创建了帖子
2004-05-07 01:57
社区公告
暂无公告