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

VB shape¿Ø¼þ - VB / ·Ç¼¼ÊõÀà

´ó¼ÒºÃ!! ÎÒÏëÎʸö»ù´¡ÎÊÌâ 
  ÔÚshape¿Ø¼þ±àд´úÂëʱ


  Private Sub UserControl_Resize()
  '±ä»»shape¿Ø¼þµÄ´óС
  'ÒÔ±ãÌî³äshapeLabelµÄ¿É¼û±íÃæ.
  shpBack.Move 0, 0, ScaleWidth, ScaleHeight
  'ʹLable1¿Ø¼þ´¹Ö±¾ÓÖÐ,²¢Ê¹ËüµÄ¿í¶ÈÓëShapeLabelÒ»ÖÂ.
  lblCaption.Move 0, (ScaleHeight _
  - lblCaption.Height) / 2, ScaleWidth
   



  lblCaption.Move 0, (ScaleHeight - lblCaption.Height) / 2, ScaleWidth
  Õâ¾äÓëÉÏÃæ´úÂëÖеÄ×îºóÒ»¾äÓÐÓÐÉ¶Çø±ð°¡
  ÎÒÏëÎʵÄÊÇ ÕâÑùµÄ´úÂëÊéд·½Ê½ ÊDz»ÊÇ»»ÐÐʹÓÃµÄ ¼ÓÁ˸ö _ Ïß »¹ÊÇÕâ¸ö _ ÔÚÓï¾äÖÐÓÐ×Åʲô×÷Óð¡ 
  Íû´óÏÀ²»Äþ´Í ½Ì
×÷ÓþÍÊÇ»»ÐÐ,¾ÍÊÇlblCaption.Move 0, (ScaleHeight - lblCaption.Height) / 2, ScaleWidth


ûÓÐÇø±ð¡£

Ò»°ã½¨ÒéÿÐдúÂ볤¶È²»Òª³¬¹ýÆÁÄ»¿í¶È£¬·½±ãÔĶÁ¡£


¶ÔÆë ºÃ¿´

àÅ,¾ÍÊÇ»»ÐеÄ×÷ÓÃ,,ÕâÑù½ö½öΪÁË·½±ã,ºÃ¿´¶øÒÑ....³ÌÐòÔ±±à³Ì±ê×¼¹þ...


Ïà¹ØÎÊ´ð£º

vb - VB / »ù´¡Àà

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

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

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

vb - VB / »ù´¡Àà

vbÖÐ ÏÖÔÚÎÒÒª°ÑÊý¾Ý¿âÀï´æ´¢µÄÒ»¸ö¸½¼þµÄÄÚÈÝÌæ»»ÁË£¬Ôõô×ö£¬Ö»ÊÇÌæ»»ÎÒÖ¸¶¨µÄλÖ㬲»ÊÇÈ«²¿Ìæ»»
Ç뽫ÎÊÌâ˵Ã÷°×£¬´æ´¢×ֶθñʽ£¬Èç¹ûÊÇBinary¸ñʽµÄ±È½ÏÂé·³£¬Èç¹ûÊÇ×Ö´®£¬Ö±½ÓÌæ»»¡£×îºÃ²»Òª½øÐÐÖ¸¶¨Î»ÖÃÌæ»»¡ ......

VBÈçºÎ»ñµÃ±ðµÄ³ÌÐòÉϵıí¸ñÄÚÈÝ£¿ - VB / API

ÎÒµÄÒªÇóÊÇ£ºÍ¨¹ýץȡ±ðµÄ³ÌÐòÉϵıí¸ñµÄ¾ä±ú£¬È»ºó¶ÁÈ¡Õâ¸ö±í¸ñµÄÄÚÈÝ¡£
±í¸ñ¾ä±ú£¨ÀàÃû£ºMSFlexGridWndClass£©ÎÒÒÑ×¥µ½£¬½ÓÏÂÀ´ÈçºÎ¶ÁÈ¡±í¸ñµÄÄÚÈݾͲ»»áÁË£¿ÇóÖú¡£

ÄܰѴúÂë·¢À´Ñ§Ï°Ï²»£¿
244326867@qq.com ......

vbÖÐunicodeÂë,ÈçºÎת»»³ÉÎı¾ - VB / »ù´¡Àà

ÓÃVB±à³Ì¶ÁÈ¡¶ÌÐÅ,µÃµ½Ò»´ó¶Ñunicode±àÂë,Çë½ÌÈçºÎת»»³ÉÎı¾
ÀýÈç:¶ÁÈ¡¶ÌÐźó(»ªÎª900C»òTC35i),´®¿ÚµÃµ½ÈçÏÂÊý¾Ý:
+CMGL: 17,"REC UNREAD","8615007557713",,"10/03/30,09:37:15+32&qu ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ