学习专栏

        晚上用VB写了一个导照片的程序，其问题如下：已知有一个图片库，图片库中的图片都以学生身份证命名， 我想在这大量的图片库中找出自已班级学生的照片，然后以姓名命名，如果手动一个一个查找还要改名相当麻烦，就算使用WINDOWS系统自带的搜索功能，一次最多找到四个身份证的图片（不知是什么原因或许系统自带的搜索对输入查找字符有限制，因身份证很长所以只能找到少数的图片）。我的解决思路：首先自己

Private Const BITS_TO_A_BYTE = 8Private Const BYTES_TO_A_WORD = 4Private Const BITS_TO_A_WORD = 32Private m_lOnBits(30)Private m_l2Power(30)Private Function LShift(lValue, iShiftBits)If iShiftBits =

将timer1的时间设为你要的时间  Option Explicit            Private Const EWX_LogOff       As Long = 0            Private Const EWX_SHUTDOWN       As Long = 1            Private Const EWX_REBOOT       As Long = 2

<br />Public Const REG_SZ = 1 ' Unicode nul terminated string<br />Public Const REG_BINARY = 3 ' Free form binary<br />Public Const HKEY_CURRENT_USER = &H80000001<br />Public Const REG_OPTION_BACKUP_RESTORE = 4     ' open for backup or restore<br />Public

在U盘插入或拔出时自动侦测 可以用 WMI 举个小例子吧!先工程引用Microsoft WMI Scripting V1.2 Library 窗体代码如下: Private Sub Form_Load() Dim Wql As String Set objSWbemSink = New SWbemSink Set objSWbemServices = GetObject("winmgmts://" & "." & "/root/cimv2") Wql = "Select * fr