Description: 用VB做QQ强制聊天器
用VB做QQ强制聊天器
大家好..我是愚罪..QQ:303931726
今天教大家来用VB做QQ强制聊天器.....
废话不多说了```
直接打开VB 新建一个EXE文件..新建一个Text和一个Command按纽
最后直接把代码写上去就可以了...
Private 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
Private Sub Command1_Click()
ShellExecute 0, "open", "tencent://message/?uin=" + Text1.Text, "", "", 1
End Sub
可以了...生成试验下..我就不美化了..你们可以去美化下```
看。。成功了-QQ forced to use VB to do so VB uses QQ chat chat mandatory browser everyone .. I was stupid crime .. QQ: 303931726 today teach everyone to use VB to do QQ chat browser mandatory nonsense ..... nothing to add to that `` ` VB directly open a new EXE file .. create a new Text and a Command button code to write directly to the final you can go ... Private 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 LongPrivate Sub Command1_Click () ShellExecute 0, open , tencent:// message/? uin =+ Text1.Text, , , 1End Sub can test the next generation ... .. I do not glorify .. you can go to see ``` under landscaping. . Successful Platform: |
Size: 1024 |
Author:好感觉 |
Hits:
Description: 一个比较完美的VB托盘气泡提示控件,支持不同版本的操作系统,可自定义气泡图标,可自定义气泡关闭的时间,自定义气泡框的标题和内容。如果你系统的shell32.dll的版本是5.x,它还支持队列气泡功能。-A more perfect bubble tray tips VB controls, support for different versions of operating systems, bubbles can be custom icon, custom bubbles can turn off the time, since the definition of the bubble of the title and the contents of the box. If your system is shell32.dll version 5.x, it also features support for Queue bubble. Platform: |
Size: 71680 |
Author:chenshi12 |
Hits:
Description: VB使用SHEmptyRecycleBin方法, 依赖于shell32.dll动态链接库清空回收站,点击窗口中的按钮即可一键清空回收站。本源码主要是熟悉SHEmptyRecycleBin函数的使用,这个函数不只有清空回收站的功能,还可以统计查询回收站中的文件数量,占用字节大小等-VB use SHEmptyRecycleBin method relies on the dynamic link library shell32.dll empty the Recycle Bin, click on the button in the window of a key empty the Recycle Bin. The main source is familiar with SHEmptyRecycleBin function, this function is not only empty the Recycle Bin feature, you can also check the number of files in the Recycle Bin statistics, the occupation of the byte size, etc. Platform: |
Size: 1024 |
Author:epudn16 |
Hits:
Description: ' 此函数返回值是指向项目(ITEM)的一个指针,有了这个数值,再用API函数SHGetPathFromIDList可以获得具体的路径,如果用户按的是“取消”按钮,则返回值为NULL。
Private Declare Function SHBrowseForFolder _
Lib "shell32.dll" Alias "SHBrowseForFolderA" _
(lpBrowseInfo As BROWSEINFO) As Long
Private Declare Function SHGetPathFromIDList _
Lib "shell32.dll" _
(ByVal pidl As Long, _
pszPath As String) As Long(The return value of this function is a pointer to the item (ITEM). With this value, we can get the specific path by using the API function SHGetPathFromIDList. If the user presses the Cancel button, then the value is returned.) Platform: |
Size: 4096 |
Author:zhansanhao
|
Hits: