vb ´òÓ¡PictureboxÀïµÄ¿Ø¼þ - VB / ¿Ø¼þ
ÎÒÔÚPictureboxÉÏ·ÅÁËLabel¡¢Line¡¢CheckboxÓÉÓÚÊýÁ¿Ì«¶àPictureboxµÄ¸ß¶ÈÒѾ´ïµ½16470£¬Ò²¾ÍÊÇ˵ÊÇA4´óС£¬ÏÖÔÚÎÊÌâÊÇ´òÓ¡µÄʱºòÈ´´òÓ¡ÆÁÄ»ÏÔʾ²¿·Ö£¬ÒòΪÆÁÄ»£¨1024*768£©ÊÜÏÞÖÆÎÞ·¨Íê³ÉÈ«²¿´òÓ¡£¬ÎÒÊÔÁ˺ü¸ÖÖ·½·¨ºÃÊDz»ÖªµÀ¸ÃÔõô´¦Àí£¬ÎÒ¿´¹ý×ÊÁÏ˵¿ÉÒÔͨ¹ý×ø±êÀ´´òÓ¡£¬µ«ÎÒ²»Ì«¶®ÕâЩ£¡ÏëÇë½Ì¸öλÔõô²ÅÄܽ«Æä´òÓ¡Íê³É£¡×îºóÊÇÓдúÂëÒòΪÎÒ¶ÔVB´úÂë²»ÊǺÜÊìϤ£¬»ò·¢¸öÀý×Ó¸øÎÒjisklsw@163.com!ÂúÒâµÄÎÒÔÙ¼Ó100-200·Ö лл£¡¡¿
Picture2.Height = Picture1.Height
Picture2.AutoRedraw = True
BitBlt Picture2.hDC, 0, 0, Picture1.Width / Screen.TwipsPerPixelX, Picture1.Height / Screen.TwipsPerPixelX, Picture1.hDC, 0, 0, vbSrcCopy
Picture2.AutoRedraw = False
Picture2.Refresh
Printer.PaintPicture Picture2.Image, 0, 0
'Printer.Zoom = 20
Printer.EndDoc
ÉÏÃæ´úÂëÖ»ÄÜ´òµ½ÆÁÄ»ÏÔʾ²¿·Ö³¬³öµÄ¾Í´òÓ¡²»³öÀ´ÁË
ÎÒÊÔ¹ý·Ö¿ª´òÓ¡µ«È´±ä³ÉÁË´òÓ¡ÁËÁ½¸öÒ³Ãæ£¡
²»Òª¾ÐÄàÓÚpicturebox
±ØÒªµÄʱºòרÃÅΪ´òÓ¡Éè¼Æ²¼¾Ö£¬ÔÙÔõô˵£¬ÔÚÒ»¶¨µÄÖ½ÕÅÉϲ»¿ÉÄÜÈÝÄɹý¶àµÄ¶«Î÷¡£
²»Òª¾ÐÄàÓÚpicturebox
±ØÒªµÄʱºòרÃÅΪ´òÓ¡Éè¼Æ²¼¾Ö£¬ÔÙÔõô˵£¬ÔÚÒ»¶¨µÄÖ½ÕÅÉϲ»¿ÉÄÜÈÝÄɹý¶àµÄ¶«Î÷¡£
Ïà¹ØÎÊ´ð£º
ÔÚvbÖÐÈçºÎ¶ÁÈ¡WordÄÚÈÝ(°üº¬±í¸ñ£¬Í¼Æ¬£¬µÈ£©
¾¹È»²»ÊÇzero¡£
²»ÖªµÀÔõôʵÏֵIJ»ÒªËµ»°
Õâ¸öÖ»ÄܶÁÎı¾,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
ÏÖÔÚÓиöxmlÎļþÊÇ<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xm ......
ͦ·±Ëö£¬Ö®Ç°·¢µÄÌû×Ó£¬·Öֵ̫µÍÏÖÔÚÖØ·¢Ò»¸ö¡£»¶Ó¸÷λ´óÏÀ~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[] ......
ÎÒµÄÒªÇóÊÇ£ºÍ¨¹ýץȡ±ðµÄ³ÌÐòÉϵıí¸ñµÄ¾ä±ú£¬È»ºó¶ÁÈ¡Õâ¸ö±í¸ñµÄÄÚÈÝ¡£
±í¸ñ¾ä±ú£¨ÀàÃû£ºMSFlexGridWndClass£©ÎÒÒÑ×¥µ½£¬½ÓÏÂÀ´ÈçºÎ¶ÁÈ¡±í¸ñµÄÄÚÈݾͲ»»áÁË£¿ÇóÖú¡£
ÄܰѴúÂë·¢À´Ñ§Ï°Ï²»£¿
244326867@qq.com ......
ÏÖÔÚСµÜÔÚÓÃvb6.0±àд³ÌÐò£¬Óöµ½Òì²½µÄÎÊÌ⣬¾ßÌåÈçÏ£º
µã»÷°´Å¥Aʱ£¬µ÷ÓÃÍⲿµÄdll(C++)£¬´ËdllÊÇͬ²½·µ»ØÊý¾Ý¡£´ËʱÈç¹ûÔ¶³ÌδÏìÓ¦£¬ÎҵijÌÐò½çÃæ¾Í»á¿¨ËÀ¡£Òò´ËÎÒÏëµ½ÓÃtimerÀ´ÊµÏÖÒì²½ £¬µ«ÊDz»Çå³þ¾ßÌåµÄÊµÏ ......