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

VBÖеIJ»Ã÷´úÂë - VB / Êý¾Ý¿â(°üº¬´òÓ¡£¬°²×°£¬±¨±í)

ÕâÊÇVBÖеÄÁ½¶Î´úÂë.¿´²»Ã÷°×.Çë¸ßÈËÖ¸½Ì

Private Declare Function setWindowPos Lib "user 32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long




Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpbuffer As String, nSize As Long) As Long

ÕâÊÇÒýÓÃAPIÓõ͍Òå. Äã¿ÉÒÔÔÚVBµÄAPIä¯ÀÀÆ÷ÀïÃæÕÒµ½¸÷ÖÖAPIµÄ¶¨Òå
API¾ÍÊÇϵͳԤÉèºÃµÄһЩ¹¦Äܺ¯Êý,Äã±à³ÌµÄʱºò¿ÉÒÔÀûÓÃAPIÀ´ÊµÏÖ¹âÓÃVBÎÞ·¨½â¾öµÄÎÊÌâ

Windows API º¯Êý£º

Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long



¡¾²Ù×÷ϵͳ¡¿
Win9X:Yes
WinNT:Yes
¡¾ËµÃ÷¡¿
  Õâ¸öº¯ÊýÄÜΪ´°¿ÚÖ¸¶¨Ò»¸öÐÂλÖúÍ״̬¡£ËüÒ²¿É¸Ä±ä´°¿ÚÔÚÄÚ²¿´°¿ÚÁбíÖеÄλÖ᣸ú¯ÊýÓëDeferWindowPosº¯ÊýÏàËÆ£¬Ö»ÊÇËüµÄ×÷ÓÃÊÇÁ¢¼´±íÏÖ³öÀ´µÄ£¨ÔÚvbÀïʹÓãºÕë¶Ôvb´°Ì壬ÈçËüÃÇÔÚwin32ÏÂÆÁ±Î»ò×îС»¯£¬ÔòÐèÖØÉè×î¶¥²¿×´Ì¬¡£ÈçÓбØÒª£¬ÇëÓÃÒ»¸ö×ÓÀà´¦ÀíÄ£¿éÀ´ÖØÉè×î¶¥²¿×´Ì¬ 
¡¾·µ»ØÖµ¡¿
  Long£¬·ÇÁã±íʾ³É¹¦£¬Áã±íʾʧ°Ü¡£»áÉèÖÃGetLastError 
¡¾ÆäËü¡¿
  ´°¿Ú³ÉΪ×î¶¥¼¶´°¿Úºó£¬ËüÏÂÊôµÄËùÓд°¿ÚÒ²»á½øÈë×î¶¥¼¶¡£Ò»µ©½«ÆäÉèΪ·Ç×î¶¥¼¶£¬ÔòËüµÄËùÓÐÏÂÊôºÍÎïÖ÷´°¿ÚÒ²»áתΪ·Ç×î¶¥¼¶¡£ZÐòÁÐÓô¹Ö±ÓÚÆÁÄ»µÄÒ»¸ù¼ÙÏëZÖáÁ¿»¯ÕâÖÖ´Ó¶¥²¿µ½µ×²¿ÅÅÁÐ


Ïà¹ØÎÊ´ð£º

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


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

vb - VB / »ù´¡Àà

xmlDoc1.loadXML(h)×ÜÊÇ·µ»Øfalse£¬ÎªÊ²Ã´£¿Ð»Ð»°ïæ»Ø´ðÒ»ÏÂ
hÊÇÊ²Ã´ÄØ¡£¡£¡£¡£¡£¡£¡£¡£¡£

hÊÇxml¸ñʽµÄ×Ö·û´®

ÄãÊÇÏë´ò¿ª¡£XML¸ñʽµÄÎļþ°É£¿

ÎÒÊǰÑh·ÅÔÚxmlDoc1ÀÓÃxmlDoc1.loadXML(h)£¬È»ºóÈ¡xmlDo ......

vb²Ù×÷excel - VB / »ù´¡Àà

ÎÊÌ⣺
ÏÖÔÚAccessÊý¾Ý¿âÖÐÓÐÁ½ÕűíTableAºÍTableB
TableAÖÐÓмǼÈçÏÂ:
×Ö¶Î1(Name) ×Ö¶Î2(Num)
  A 3
  A 4
  B 6
  ... ......

ÇóÖú£ºC´úÂë¸Äд³ÉVB´úÂë - VB / »ù´¡Àà

Ë­ÄܰïÎÒ°ÑÏÂÃæÕâЩ´úÂë¸Ä³ÉVBÐÎʽµÄ£¬¶àлÁË£¬¼±ÓÃ~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[],float g ......

VBµ÷ÓÃEXCEL»æÍ¼£¬ÈçºÎÐÞ¸ÄXÖá×ø±ê - VB / »ù´¡Àà

СµÜÓÃVBµ÷EXCEL×÷ͼ
objExlApp.Workbooks.Add
  objExlApp.Charts.Add
  objExlApp.ActiveChart.ChartType = xlLine
  objExlApp.ActiveChart.HasLegend = True
  objExlApp. ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ