ssihc0的专栏

Option Base 1Option ExplicitPrivate Declare Function GetCurrentProcessId Lib "kernel32" () As LongPrivate Const PAGE_READWRITE = Private Const MEM_COMMIT = Private Type MEMORY_BASIC_INFORMATION    Bas

在VB新建一工程,有两个窗体,FORM1,FORM2 FORM1有一个PIC控件和一个按钮控件 代码如下: Option Explicit Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long Private De

[日期：2007-11-08]   来源：互联网整理  作者：未知   [字体：大 中 小]     新闻简介：Imports System.IO Imports System.IO.Compression Public Class ClsZip     Public Sub CompressFile(ByVal sourceFile As String, ByVal d

Option Explicit'FindWindow寻找窗口列表中第一个符合指定条件的顶级窗口（在vb里使用：FindWindow最常见的一个用途是获得ThunderRTMain类的隐藏窗口的句柄；该类是所有运行中vb执行程序的一部分。获得句柄后，可用api函数GetWindowText取得这个窗口的名称；该名也是应用程序的标题） '返回值 'Long，找到窗口的句柄。如未找到相符窗口，则返回零

首先获取进程ID   然后根据ID创建句柄，读取或者写入内存。呵呵，写得太简单了是吧。     http://sanjianxia.myrice.com/vb/112.htm     这个教你怎样获得进程ID         下面是怎样处理内存         VirtualQueryEx和ReadProcessMemory/WriteProcessMemory的使用。

ACCESS有个BUG，那就是在使用 like 搜索时如果遇到日文就会出现“内存溢出”的问题，提示“80040e14/内存溢出”。 以前也遇到过了，不过那时没怎么在意把含有日文的数据删除了就好了，现在这次的都是些重要的资料不可能删除的，就需要想办法来解决了。 那导致出问题的26个日文：ゴ ガ ギ グ ゲ ザ ジ ズ ヅ デ ド ポ ベ プ ビ パ ヴ ボ ペ ブ ピ バ ヂ ダ ゾ ゼ

来源:cww         常见到某些软体，当Mouse进入其区域时，会启动某个行为，Mouse离开时，又有其他的     动作，例如Cool   Bar，当Mouse移入时，Button会上升，离开时Button水变平面。         第一个想到的是在物件的MouseMove中设定进入的行为，这没有问题，但离开呢？有几     个想法：1.如果该物件在Form上，可

才学习这方面。发个模拟按键喊话的例子。 Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long Private Declare Fun

Dim cmd As New SqlConnection("Server=(local);UID=sa;PWD=123456;DATABASE=ipcmd") ' Try Dim recommand As New SqlCommand("insertt", cmd) recommand.CommandType = Data.CommandType.S

Private Type MEMORY_BASIC_INFORMATION    BaseAddress As Long    AllocationBase As Long    AllocationProtect As Long    RegionSize As Long    State As Long    Protect As Long    lType As LongEnd TypePr

Public Function SearchMem(hProcess As Long, strSearch As String, Optional spos As Long = &H400000) As Long    Dim i As Long, j As Long, count As Long, nLength As Long    Dim r As Long, mbi As MEMORY_B

Public Class serchClass Public Event searchend(ByVal t As Integer, ByVal n As String) public sub sub1() RaiseEvent searchend(0, 1) end subend class在fo

 因为涉及到商业软件，所以要等过期以后才发布出来。2005年4月初，识别入门的时候写的，代码不好，凑合着看吧。要点：1.去背景：这个图形码的背景色和文字色是有规律的，所以很好去背静2.分割随即位置的字符，方法：http://blog.youkuaiyun.com/Qqwwee_Com/archive/2006/04/14/662505.aspxImports System.NetImports System.

Sub myImage() Dim html As HTMLDocument = CType(Me.WebBrowser1.Document.DomDocument, HTMLDocument) 下面代码中，获取图片的方式有很多，因为比较简单，我就不列举了，直接用ID来做为例子的 Dim img As IHTMLControlElement =

Private Declare Function OpenProcess Lib "kernel32.dll" (ByVal dwDesiredAccess As Integer, ByVal bInheritHandle As Integer, ByVal dwProcessId As Integer) As Integer Public Declare Function ReadPr

加密 Public Function ascg(smsg As String) As String    Dim si, sb As Integer    Dim stmp As Integer    Dim stemp As String    sb = Len(smsg)    ascg = ""    For si = 1 To sb     stmp = AscW(Mid(smsg, s

首先你要明白下载文件的过程机制。我这几天正在写WINSOCK，把我的经验告诉你吧。1、发送HTTP头：首先构建最简请求字符串：dim HTTPHeader as stringHTTPHeader=""HTTPHeader=HTTPHeader & "GET /images/smilies/wizenflower.gif HTTP/1.1" & vbCrLf HTTPHeader=HTTPHeade

<br />这是我写的一个注册域名的一段代码片<br />想用C#写的，，自己用vb.net to c# 转一下<br /> <br />有什么不明白的，可以联系我，ssihc@163.com QQ:47400789<br /> <br />代码如下<br />Imports S

<br />我自己调式了好一会，很多朋友问我,vb.net c# 怎么调用openssl ，c# 的就不写了，，差不多自己写,<br />自己看也，，也不多说了，这些申明，，<br />Imports System.Runtime.InteropServices Imports System.Net Imports System.Net.Sockets Imports System.Text.RegularExpressions Imports System.Xml Imports System.

Private Delegate Sub ListBoxaddcallback(ByVal str As String) Private listboxadd1 As New ListBoxaddcallback(AddressOf listboxadd) Private Sub listboxadd(ByVal str As String) If Lis

  Me.ListView2.Columns.Clear() Me.ListView2.Items.Clear() Me.ListView2.Columns.Add("bnvcnA") Me.ListView2.Columns.Add("bnvcnB")