易截截图软件、单文件、免安装、纯绿色、仅160KB

VB MSHFLEXGRID MSHFLEXGRID 同时选中不连续的多行

  在工程中添加一个类模块,名为   Selection  
  然后加入以下代码:  
   
  Dim   colRows   As   Collection  
  Dim   ControlKey   As   Boolean  
  Public   WithEvents   flx   As   MSFlexGrid  
   
  Public   Sub   ToggleSelection()  
          Dim   x   As   Integer  
          Dim   d  
          Dim   mode   As   Boolean  
          Dim   OldRow,   OldCol  
          x   =   flx.Row  
          If   x   =   0   Then   Exit   Sub  
          On   Error   Resume   Next  
           
          OldRow   =   flx.Row  
          OldCol   =   flx.col  
           
          d   =   colRows(CStr(x))  
          If   Err   Then           '   not   add  
              colRows.Add   x,   CStr(x)  
              mode   =   True  
          Else  
              colRows.Remove   CStr(x)       'remove  
              mode   =   False  
          End   If  
          MakeSelectedStatus   x,   mode  
     


相关文档:

永远的魔灵 by 郭卫 VB程序设计源码全家福

 
 
'*************************************************************************
**说 明:永远的魔灵 by icecept(郭卫)
'**创 建 人:icecept(魔灵)
'**日 期:2009-11-15 20:27:03
'**修 改 人:icecept(魔灵)
'**版 本:V1.0.0
'**E-mail   :icecept@163.com QQ:543375508
'**网 ......

目前发现的最强悍的VB隐藏进程方法

VB隐藏进程问题的讨论由来已久,效果有好有坏,反正是各有各的招,偶然机会看到planet-source一段隐藏进程的文章,作者说采用了kernel mode driver!方法,
单从技术方法而言,这是目前见到隐藏进程中最强悍的了(个人见解,井底之蛙了),不过这种东西用在正义的人手上是一个除暴安良的利器,用心叵测者就不好说了,但是技术终归是技术 ......

VB文件粉碎机


'代码:
Option Explicit
'======================用于查找进程和终止进程的API函数常数定义================ =====
Private Declare Function CreateToolhelpSnapshot Lib "kernel32" Alias "CreateToolhelp32Snapshot" (ByVal lFlags As Long, ByVal lProcessID As Long) As Long
Private Declare Function ProcessF ......

VB模拟按键

键盘是我们使用计算机的一个很重要的输入设备了,即使在鼠标大行其道的今天,很多程序依然离不开键盘来操作。但是有时候,一些重复性的,很繁琐的键盘操作 总会让人疲惫,于是就有了用程序来代替人们按键的方法,这样可以把很多重复性的键盘操作交给程序来模拟,省了很多精力,按键精灵就是这样的一个软件。那么 我们怎样才 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号