Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

ÇëÇó°ïæ°ÑÒ»¶ÎC´úÂëת»»³ÉVB´úÂë! - VB / »ù´¡Àà

ÕâÒ»¶Î´úÂëÊÇÓÃÔÚÓÎÏ·ÀïµÄ,
¾ÍÊÇÁ÷ÐǺûµû½£Õâ¿îµ¥»úÓÎÏ·,
ÇëÇó°ïæ°ÑÕâ¶Î´úÂëת»»³ÉVB´úÂë!
´úÂëÈçÏÂ

C# code:

#include <windows.h>

#define BUTTON1 101


#define EDIT1 201
#define EDIT2 202
#define EDIT3 203


#define HOTKEYIDCHEAT 200
#define HOTKEYIDRECOVER 201


LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);

unsigned char Code[10]={0x8d, 6, 0xa3, 0x60, 0x19, 0x5d, 0, 0x90,
0x90, 0x90};

unsigned char CodeOrigin[10]={0x8B, 0x86, 0xA8, 0x22, 0, 0, 0x85,
0xc0, 0x75, 0x7e};

void MyWinMain()
{ MSG msg;
WNDCLASS wc;
memset(&wc, 0, sizeof(wc) );
wc.hInstance = (HINSTANCE)0x400000;
wc.lpfnWndProc = (WNDPROC)WndProc;
wc.lpszClassName = "IdentityClass";
wc.hbrBackground = (HBRUSH)COLOR_WINDOW;
RegisterClass(&wc);

CreateWindow("IdentityClass", "Ѫµ¶ÃÅÉèÖÃÃÅÅɽ׼¶", WS_OVERLAPPEDWINDOW | WS_VISIBLE,
200, 200, 270, 200, NULL, NULL, (HINSTANCE)0x400000, NULL);




while (GetMessage(&msg, NULL, 0, 0))
{
TranslateMessage(&msg);
DispatchMessage(&msg);
}

}

LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
switch (message)
{
case WM_DESTROY:
PostQuitMessage(0);
break;


case WM_CREATE:

CreateWindow("STATIC", "ÃÅÅÉ£º"


Ïà¹ØÎÊ´ð£º

vbµÄÀàÖÐʹÓÃ×Ô¶¨ÒåÀàÐÍÊý¾ÝµÄÎÊÌâ - VB / »ù´¡Àà


ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......

vb - VB / »ù´¡Àà

ÔÚvbÖÐÈçºÎ¶ÁÈ¡WordÄÚÈÝ(°üº¬±í¸ñ£¬Í¼Æ¬£¬µÈ£©
¾¹È»²»ÊÇzero¡£

²»ÖªµÀÔõôʵÏֵIJ»ÒªËµ»°

Õâ¸öÖ»ÄܶÁÎı¾,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......

vb - VB / »ù´¡Àà

ÎÒÏë°ÑwordÁí´æÎªxmlÖ®ºó£¬ÓÃvb¶ÁÈ¡Õâ¸öxmlµÄÄÚÈÝ£¬ÇëÎÊÈçºÎʵÏÖ£¿
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......

vb - VB / »ù´¡Àà

Êý¾Ý¿âÀïÓÐÒ»¸ö×ֶεÄÄÚÈÝÊǶþ½øÖÆ£¬Ôõô²ÅÄܰÑÕâ¸ö¶þ½øÖƶÁ³öÀ´
ʹÓÃ×Ö½ÚÁ÷¶ÔÏó¿ÉÒÔʵÏÖ

ÀýÈçÏÖÔÚÊý¾Ý¿âÀïÓиö×ֶεÄÄÚÈÝÊÇ0x504B03040A0000000800407F263C3B02465390000000820000000A0000006273CECACCE22E7478 ......

ÇóÖú£ºC´úÂëchange toVB´úÂë - VB / »ù´¡Àà

ͦ·±Ëö£¬Ö®Ç°·¢µÄÌû×Ó£¬·Öֵ̫µÍÏÖÔÚÖØ·¢Ò»¸ö¡£»¶Ó­¸÷λ´óÏÀ~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[] ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ