ACCESS2003ÀïµÄVB»·¾³ÏëʵÏÖ¸´Öƹ¦ÄÜ - VB / »ù´¡Àà
ÔõÑùʵÏÖµã»÷Ò»¸ö°´Å¥£¬¾Í½«µ±Ç°´°ÌåÖ¸¶¨ÊäÈë¿òÀïµÄÊý¾Ý¸´ÖƵ½Windows¼ôÇаåÄØ£¿ÎÒÊÔ¹ýÓÃClipboard£¬µ«²»ÐУ¬ËƺõûÓÐÕâ¸öº¯Êý
ÓÐÕâ¸ö¹¦Äܰ¡¡£²éÒ»ÏÂmsdn¾Í¿ÉÒÔÁ˰¡¡£ Private Sub mnuCopy_Click () Clipboard.Clear Clipboard.SetText Text1.SelText End Sub Private Sub mnuCut_Click () Clipboard.Clear Clipboard.SetText Text1.SelText Text1.SelText = "" End Sub Private Sub mnuPaste_Click () Text1.SelText = Clipboard.GetText() End Sub VB code: Private Sub Command1_Click() Clipboard.SetText Me.Text1.Text End Sub лл¸÷룬µ«ÎÒÓÃclipboardʱ£¬Ìáʾ±äÁ¿Î´¶¨Ò壬ÕâÓÖÊÇΪʲôACCESSÀïµÄVB»á²»ÈÏclipboardÕ⺯ÊýÄØ£¿ÒýÓà ÒýÓà 3 Â¥ terry1937 µÄ»Ø¸´: лл¸÷룬µ«ÎÒÓÃclipboardʱ£¬Ìáʾ±äÁ¿Î´¶¨Ò壬ÕâÓÖÊÇΪʲôACCESSÀïµÄVB»á²»ÈÏclipboardÕ⺯ÊýÄØ£¿ ACCESS 2003 VBAÖÐûÓÐclipboard¶ÔÏó ×Ô¼ºÓÃÒ»¸ö±äÁ¿À´´¦Àí°É£¨APIÒ²¿É¿¼ÂÇһϣ© http://www.access-cn.com/vvb/thread-56210-1-1.html Õâ¸öÄÜÌṩ³ÌÐò´úÂë¸øÎÒÂ𣿠¿´¿´ÉÏÃæµÄÁ´½ÓÀïµÄÄÚÈÝ¡£ÒýÓà ¿´¿´ÉÏÃæµÄÁ´½ÓÀïµÄÄÚÈÝ¡£ ÄÜ˵˵¾ßÌå²Ù×÷£¬°üÀ¨³ÌÐò´úÂë·ÅÔÚÄǸöλÖã¬ÒòΪÎÒÊÇVB³õѧÕߣ¬»¹ÓУ¬ÄǶδúÂëÔËÐÐʱ³öÏÖÓû
Ïà¹ØÎÊ´ð£º
ÔÚvbÖÐÈçºÎ¶ÁÈ¡WordÄÚÈÝ(°üº¬±í¸ñ£¬Í¼Æ¬£¬µÈ£© ¾¹È»²»ÊÇzero¡£ ²»ÖªµÀÔõôʵÏֵIJ»ÒªËµ»° Õâ¸öÖ»ÄܶÁÎı¾, VB code: Private Sub Command1_Click() Dim WordApp As Object Set WordApp = CreateObject(& ......
vbÖÐ ÏÖÔÚÎÒÒª°ÑÊý¾Ý¿âÀï´æ´¢µÄÒ»¸ö¸½¼þµÄÄÚÈÝÌæ»»ÁË£¬Ôõô×ö£¬Ö»ÊÇÌæ»»ÎÒÖ¸¶¨µÄλÖ㬲»ÊÇÈ«²¿Ìæ»» Ç뽫ÎÊÌâ˵Ã÷°×£¬´æ´¢×ֶθñʽ£¬Èç¹ûÊÇBinary¸ñʽµÄ±È½ÏÂé·³£¬Èç¹ûÊÇ×Ö´®£¬Ö±½ÓÌæ»»¡£×îºÃ²»Òª½øÐÐÖ¸¶¨Î»ÖÃÌæ»»¡ ......
ËÄܰïÎÒ°ÑÏÂÃæÕâЩ´úÂë¸Ä³ÉVBÐÎʽµÄ£¬¶àлÁË£¬¼±ÓÃ~~ #include "stdlib.h" #include "math.h" #include "stdio.h" float objfx(float x[]); void constraint(float x[],float g ......
ͦ·±Ëö£¬Ö®Ç°·¢µÄÌû×Ó£¬·Öֵ̫µÍÏÖÔÚÖØ·¢Ò»¸ö¡£»¶Ó¸÷λ´óÏÀ~~ #include "stdlib.h" #include "math.h" #include "stdio.h" float objfx(float x[]); void constraint(float x[] ......
ÎÒµÄÒªÇóÊÇ£ºÍ¨¹ýץȡ±ðµÄ³ÌÐòÉϵıí¸ñµÄ¾ä±ú£¬È»ºó¶ÁÈ¡Õâ¸ö±í¸ñµÄÄÚÈÝ¡£ ±í¸ñ¾ä±ú£¨ÀàÃû£ºMSFlexGridWndClass£©ÎÒÒÑ×¥µ½£¬½ÓÏÂÀ´ÈçºÎ¶ÁÈ¡±í¸ñµÄÄÚÈݾͲ»»áÁË£¿ÇóÖú¡£ ÄܰѴúÂë·¢À´Ñ§Ï°Ï²»£¿ 244326867@qq.com ......