【VB】导出Picture控件图片
—— 发布于 2016-11-08 18:18:00
> **程序代码** ``` Private Sub Command1_Click() SavePicture Picture1.Picture, "c:\1.jpg" End Sub ```
【VB】打开百度网页
> **程序代码** ``` Private Sub Command1_Click() Shell "explorer http://www.baidu.com...
【VB】创建快捷方式
> **程序代码** ``` Private Sub Command1_Click() Dim Sh As Object Set Sh = C...
【VB】创建程序托盘图标
> **程序代码** ``` '以下代码须要两个按command,一个菜单(菜单里分别包含一个主菜单,三个子菜单,名称分别为sys\add\move\exit) ...
【VB】窗体置顶
> **程序代码** ``` Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As ...
【VB】常用代码
**程序代码:** ``` On Error Resume Next '出现错误时忽略错误继续执行 me.hide ...
【VB】操作注册表
程序代码 ```vb Private Sub Command1_Click() '读取 Text1.Text = ReadscrKeyValue() End ...
【VB】操作Ftp
程序代码 '须一个inet控件和5个按扭 ``` Private Sub Form_Load() Inet1.Protocol = icFTP Inet1.Re...
【VB】操作CMD
> **程序代码:** ``` Private Sub Command1_Click() '调用CMD并让CMD执行ping命令 Shell "cmd /k ...
【VB】标准md5加密算法(支持中文)
> **程序代码** '在附件中下载附件解压，里面的文件名不要改动，放到程序根目录下 '在窗体中加入一个WebBrowser控件，然后在窗体加载事件中加入以下代码...