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

vb picturebox±³¾°Í¸Ã÷

ÈçÌâ

°ÑÉÏÃæµÄMe.hwnd»»³ÉPicture1.hwnd¼´¿É

ÒýÓÃ
°ÑÉÏÃæµÄMe.hwnd»»³ÉPicture1.hwnd¼´¿É

·Ç³£¸Ðл¹²Ïí£¡¿ÉÄÜÎÒûÓÐдÇå³þÎÊÌ⣬ÊÇÒªpicturebox±³¾°Í¸Ã÷£¬²»ÊÇËü±¾Éí͸Ã÷

¿´¿´Õâ¸ö

¶¥Ò»¸ö~~

Èç¹ûÄãÐèÒªµÄÊDZ³¾°Í¼Æ¬µÄ͸Ã÷±³¾°Ð§¹û£¬ÐèÒª½«Í¼Æ¬ÔÚPSÖд¦Àí²¢Áí´æΪGIF¸ñʽ»òTIF¸ñʽ£¬²¢ÔÚ´æ´¢¶Ô»°¿òÖÐÑ¡Ôñ±³¾°Í¸Ã÷Ñ¡Ïî¡£

VB code:
Private Declare Function TransparentBlt Lib "msimg32.dll" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal nSrcWidth As Long, ByVal nSrcHeight As Long, ByVal crTransparent As Long) As Boolean

Private Sub Form_Load()
Picture1.AutoRedraw = True
Picture2.AutoRedraw = True
Picture1.Picture = LoadPicture(App.Path & "\001.JPG") 'Ò»ÕÅ°×É«±³¾°Í¼Æ¬
Picture1.Left = -1 * Picture1.Width ' Picture1ÊǸ¨ÖúͼƬ¿ò,·ÅÔÚ´°ÌåÖ®Íâ
Picture1.ScaleMode = vbPixels
Picture2.ScaleMode = vbPixels
End Sub

Private Sub Picture2_Paint()
DoEvents
TransparentBlt Picture2.hdc, 0, 0, Picture2.ScaleWidth, Picture2.ScaleHeight, Picture1.hdc, 0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight, RGB(255, 255, 255) 'RGB(255, 255, 255)ÊÇ͸Ã÷É«-- °×É«
End Sub


È¥µôPicture2.AutoRedraw = TrueÒ»¾ä

ÕâÒ²Ö»ÊÇͼƬ͸Ã÷,²¢²»Ê


Ïà¹ØÎÊ´ð£º

¹ØÓÚASP.net(vb)²¥·Å¼à¿Ø¼ÏñµÄÎÊÌâ

ÎÒÓг§¼Ò×öµÄASPµÄ¼à¿Ø¼Ïñ£¨DVR£©µÄ¾ÖÓòÍø²¥·ÅµÄÔ´³ÌÐòÓë¿Ø¼þ£¬ÏëÒªÓÃASP.net×öÒ»¸öÊÓƵ»Ø·ÅµÄ³ÌÐò£¨ÀûÓÃËûµÄ¿Ø¼þ£©µ«²»ÖªÈçÏÂÈ¥×ö£¬Íû¸÷λָµã¡£
ÏȸãÇå³þËûÃǵĿؼþÊÇÔõôÓõÄ,
È»ºó¾ÍÖ±½ÓÓúÃÁË.
²»¹ý,Èç ......

VBÖÐÓÐÎÞTApplication¶ÔÓ¦ÀàÐÍ

ÎÒÓÃDelphiдÁËÒ»¸öDLL, DLLÀïÓÐMDIµÄ×Ó´°Ìå,DLL³õʼ»¯Ê± ´«µÝµ÷ÓÃÕßµÄTApplication¸øDLL, ÔÚDelphi7Öе÷ÓÃÒѾ­Í¨¹ý,µ«ÊDz»ÖªµÀÔÚVBÖÐÓÐÎÞTApplication¶ÔÓ¦ÀàÐÍ, ÊÇ·ñÄÜÔÚVBÖе÷ÓÃ?
ÄãºÃ£¬ÓÃinstance²»ÊǾͿÉÒÔÁË&# ......

ÇëºÃÐÄÈË°ïÎÒ°ÑVBÔ´ÂëתΪVB.NET~

Ï£Íû´ó¼ÒÄܹ»°ïÎÒÏÂ.¸ÐлÁË..


Ô´Âë´«ÔÚ´óÃ×ÅÌ VB6 µÄÔ´Âë http://www.damipan.com/file/3wNoKLW.html

תΪVB.NETÔ´Âë.

СµÜÍêÈ«ÊÇÐÂÊÖ ²»¶®µÄ˵.Âé·³¸÷λ°ïæһÏÂ

ÎÒµÄEMAILÊÇ:4452 ......

vb ÈçºÎ½«Ê®Áù½øÖÆUTF-8ת»»Îªºº×Ö

¾Ý˵javaÓïÑÔÊÇÕâÑùµÄ£¬ÄÇVBÄØ£¿

byte[] b(byte)0x62,(byte)0x11,(byte)0x72,(byte)0x31};
  try {
System.out.println(new String(b,"UTF-16"));
  } catch (UnsupportedEnco ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ