Byval

vb 启动外部程序并且模拟鼠标点击

System.ComponentModel'Imports System.Runtime.InteropServicesPublic Class Form1    Private Sub Form1_Disposed(ByVal
yeuego·2011-03-09 13:00

VB 控制音量

Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" ( _ ByVal
yeuego·2011-03-09 13:00

VB 获取/设置屏幕分辨率

Option Explicit Private Declare Function GetSystemMetrics Lib "user32" ( ByVal nIndex
yeuego·2011-03-09 13:00

VB 建立快捷方式

Private Declare Function fCreateShellLink Lib "VB5STKIT.DLL" ( ByVal lpstrFolderName
yeuego·2011-03-09 13:00

VB 实现屏幕右下角浮出式消息窗口，透明淡出效果。

Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" ( ByVal
yeuego·2011-03-09 13:00

Shell 调用程序后等待该程序结束后返回继续

方法1： Private Declare Function WaitForSingleObject Lib "kernel32" ( ByVal hHandle As
yeuego·2011-03-09 13:00

VB 在EXPLORER进程崩溃之后重建托盘图标

重点为：向系统注册“TaskbarCreated”消息 Public Function Wndproc( ByVal hwnd As Long , ByVal Msg As Long
yeuego·2011-03-09 13:00

VB 多种格式的音乐播放模块

Public Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" ( ByVal
yeuego·2011-03-09 13:00

VB 最简单的WAV声音或音乐文件播放的代码

Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" _ ( ByVal
yeuego·2011-03-09 13:00

VB 模拟鼠标滚轮事件

Option Explicit Public Declare Sub mouse_event Lib "user32" ( ByVal dwFlags As
yeuego·2011-03-09 13:00

VB 调用 Jmail 组件发邮件

Option Explicit Sub SendMail( Optional ByVal sSubject As String , Optional ByVal sBody
yeuego·2011-03-09 13:00

VB 获取进程的启动用户

WTSEnumerateProcesses _ Lib "wtsapi32.dll" Alias "WTSEnumerateProcessesA" _ ( ByVal
yeuego·2011-03-09 11:00

VB 长整型和字节数组的转换问题 (Long<>Byte)

CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal
yeuego·2011-03-09 11:00

子类化 - zAddressOf

object, 1 = last private method, 2 = second last private method, etc Private Function zAddressOf( ByVal
yeuego·2011-03-09 11:00

VB 用汇编进行快速CRC较验

Private Declare Function CallWindowProc Lib "user32" Alias "CallWindowProcA" ( ByVal
yeuego·2011-03-09 10:00

VB 中调用API NTOpenProcess

Declare Function NtOpenProcess Lib "ntdll.dll" ( _ ByRef ProcessHandle As Long , _ ByVal
yeuego·2011-03-09 10:00

VB 中运用 TimeSetEvent 代替 Timer 控件

窗体代码: Option Explicit Private Declare Function timeKillEvent Lib "winmm.dll" ( ByVal
yeuego·2011-03-09 10:00

VB 用WH_KEYBOARD_LL实现全局热键的例子

Function SetWindowsHookEx _ Lib "user32" _ Alias "SetWindowsHookExW" ( ByVal
yeuego·2011-03-09 10:00

VB 定义全局(热键)快捷键

Private Declare Function GetAsyncKeyState Lib "user32" ( ByVal vKey As Long ) As Integer
yeuego·2011-03-09 10:00

VB 读取《武林外传》角色名的源码

Private Declare Function GetWindowThreadProcessId Lib "user32" ( ByVal hWnd As Long
yeuego·2011-03-09 10:00

VB 实现对IIS的简单管理

WWWServer As IADs, WWWService As IADs, WWWVDir, WWWVdirRes As IADs Function CreateWebSite( ByVal
yeuego·2011-03-09 10:00

VB中通过NtSystemDebugControl访问内核空间

Option Explicit Private Declare Function AdjustTokenPrivileges _ Lib "advapi32.dll" ( ByVal
yeuego·2011-03-09 10:00

VB 获取 GetLastError 的错误信息

Declare Function FormatMessage Lib "kernel32.dll" Alias "FormatMessageA" ( ByVal
yeuego·2011-03-09 10:00

VB 开机自动运行程序

Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA" ( ByVal
yeuego·2011-03-09 10:00

VB 使用 ZwQueryInformationProcess

Explicit Public Declare Function ZwQueryInformationProcess _ Lib "NTDLL.DLL" ( ByVal
yeuego·2011-03-09 10:00

vb cls_PipeAccess.cls

(phReadPipe As Long , _ phWritePipe As Long , _ lpPipeAttributes As SECURITY_ATTRIBUTES, _ ByVal
yeuego·2011-03-09 10:00

一些有用的未公开API的VB声明

Public Declare Function NtSuspendProcess _ Lib "NTDLL.DLL" ( ByVal hProc As Long )
yeuego·2011-03-09 10:00

让别的程序在你的窗口里运行，设置父窗口。

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" ( ByVal
yeuego·2011-03-09 10:00

VB InputBox 对话框星号保护隐私

Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" _ ( ByVal
yeuego·2011-03-09 10:00

VB 动态调用未注册DLL

Private Declare Function FreeLibrary Lib "kernel32" ( ByVal hLibModule As Long ) As
yeuego·2011-03-09 10:00

vb程序中webbrowser 接受SendMessage 的消息

做个记录.Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal
yeuego·2011-03-09 10:00

获取当前活动窗口句柄和标题

 (lpPoint As POINTAPI) As Long'获得鼠标指针下窗口句柄的函数Private Declare Function WindowFromPoint Lib "user32" (ByVal
snlei·2011-03-04 22:00

[转] VB.Net的ByVal和ByRef --ByVal时的浅拷贝和深拷贝

VB.Net的ByVal和ByRef--ByVal时的浅拷贝和深拷贝,关键词是VB,B.,.N,Ne,et,t的,的B,By,yV,Va,al,l和,和B,By,yR,Re,ef,f-,--,-B,By
tyunshan·2011-02-23 14:00

IsNumeric

IsNumeric 写道 Public Function Number_Check(ByVal str As String) As Boolean Dim i As Integer = Len(str
gzj316·2011-02-14 23:00

从DataGridView写入Excel

Imports System.IO Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object,
seloba·2011-02-14 16:00

从DataGridView写入Excel

Imports System.IO Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object,
wsql·2011-02-14 16:00

vb.net 控件（包括字体）随窗体按比例缩放

Public Class frmDl Dim x As Single = 0 Dim y As Single = 0 Private Sub frmDl_Load(ByVal sender
wsql·2011-02-10 16:00

vb.net 控件（包括字体）随窗体按比例缩放

Public Class frmDl Dim x As Single = 0 Dim y As Single = 0 Private Sub frmDl_Load(ByVal sender
seloba·2011-02-10 16:00

使用VB获得系统目录路径

函数声明: Private Declare Function SHGetSpecialFolderLocation Lib "Shell32" (ByVal hwndOwner As Long, ByVal
lovedreamland·2011-02-10 13:00

VB6 Winsock解析中文乱码问题解决办法

解决如下 Option Explicit Private Declare Function WideCharToMultiByte Lib "kernel32" (ByVal
爪哇咖啡·2011-02-09 10:00

VB6中改变屏幕的分辨率和刷新频率

ChangeDisplaySettings Lib "user32.dll" Alias "ChangeDisplaySettingsA" (ByRef lpDevMode As DEVMODE, ByVal
qzriso·2011-01-28 14:00

VB6中改变屏幕的分辨率和刷新频率

ChangeDisplaySettings Lib "user32.dll" Alias "ChangeDisplaySettingsA" (ByRef lpDevMode As DEVMODE, ByVal
qzriso·2011-01-28 14:00

VB Image

Private Declare Function GetObject Lib "gdi32" Alias "GetObjectA" (ByVal hObject
sugongqing·2011-01-13 21:00

Asp中通过简单的例子理解下ByVal和ByRef的用法

文件名称:ByVal.aspByRef.asp具体代码:运行结果:56结论:注意:子程序TestBy(ByValT)中T变量声明方式是ByVal运行结果子程序没有影响到A的值注意:子程序TestBy(ByRefT
·2011-01-06 00:04

【Hello AutoCAD 005】几个常用的绘图函数

  1 ' 创建直线 2   Public Function addLine( ByVal startPt As Point3d
TranSteel·2010-11-24 12:00

ByVal   /ByRef

ByVal与ByRef(默认值) 这两个是子过程的参数传递时,指定参数按什么传递的 ByVal(按值传递) ByRef(按地址传递) 具体这样来理解: 过程中的参数列表,我们称形参 调用过程时的参数列表
ljh0242·2010-11-04 16:45

ByVal   /ByRef

ByVal与ByRef(默认值) 这两个是子过程的参数传递时,指定参数按什么传递的 ByVal(按值传递) ByRef(按地址传递) 具体这样来理解: 过程中的参数列表,我们称形参 调用过程时的参数列表
ljh0242·2010-11-04 16:45

VB锁定键盘、鼠标

Public hHook As LongPublic h_Hook As LongDeclare Function UnhookWindowsHookEx Lib "user32" (ByVal
隗合山·2010-10-29 13:00

FORM 窗口总在最前（显示隐藏视窗）

Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter
隗合山·2010-10-29 12:00

完整的下载文件

Protected Sub downloadbyID(ByVal ID As Integer)         Dim prepareSql
Yarhhome·2010-09-08 10:00
上一页 7 8 9 10 11 12 13 14 下一页
按字母分类： ABCDEFGHIJKLMNOPQRSTUVWXYZ其他