VB 随笔
Jadychenji
这个作者很懒,什么都没留下…
展开
-
函数: 判断两个字符串是否完全一样
有时候要比对两个字符串是否完全一样, 以实现判断条件, 以下函数作为参考: Private Function IsEquals(str1 As String, str2 As String) As BooleanDim i As IntegerDim j As IntegerDi原创 2011-07-17 11:14:58 · 1207 阅读 · 0 评论 -
如何实现程序互斥运行
为了避免你的程序被多次执行而弹出多个窗口及创建多个进程, 以下代码可以加到程序中实现互斥运行。 Declare Function CreateMutex Lib "kernel32" Alias "CreateMutexA" (lpMutexAttributes As SECU原创 2011-07-17 11:23:09 · 410 阅读 · 0 评论