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

ÓÃvbµÄ´úÂë±àд¼ôÇаå,ÊÇÓÃÀ´¼ôÇÐͼƬµÄ

ÓÃvbµÄ´úÂë±àдһ¸öÄܼôÇÐͼƬµÄ¼ôÇаå!!
ÀýÈç:ÓÃ×Ô¼º±àµÄ¼ôÇаå´úÌæÏÂÃæµÄ¼ôÇаå
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const WM_PASTE = &H302

Private Sub Command1_Click()
Clipboard.SetData LoadPicture("c:\1.bmp")  'Clipboard¾ÍÊǼôÇаå ,ÓÃ×Ô¼º±àµÄ¼ôÇаå´úÌæËü
SendMessage RichTextBox1.hwnd, WM_PASTE, ByVal 0&, ByVal 0& '
End Sub
ѧϰ£¬Ñо¿Ò»Ï¡£¶¥


ÈçÐèÒªÔĶÁ¸Ã»Ø¸´£¬ÇëµÇ¼»ò×¢²áCSDN!




Ïà¹ØÎÊ´ð£º

vbдµÄ³ÌÐò±àÒëºó,ÔËÐÐÈô³ö´í,ÈçºÎÖªµÀµ½ÔÚÄÄÒ»ÐÐ?

vbдµÄ³ÌÐò±àÒëºó,ÔËÐÐÈô³ö´í,ÈçºÎÖªµÀµ½ÔÚÄÄÒ»ÐÐ?

°´Ctrl+F5Ô¤±àÒ룬³ö´íʱ»áÌøתµ½´íÎóÐÐ

²»ÊÇÄÇÑùµÄÁË,ÎÒÊÇÒªÇó±àÒë³ÉEXEºóÔËÐÐ,Ìáʾ³ö´íÄÜ·ñÌáʾ´íÔÚÄÄÒ»ÐÐ.

ÎÒ±àÒëºóÔÚÎҵĵçÄÔÉÏÔËÐÐûÎÊÌâ,µ«Ô ......

VBÐÞ¸Ä×¢²á±í

ÓÃVBÔõôֻÕë¶Ôwindows×Ô´øµÄÎļþµÄÓÒ¼üÌí¼Ó²Ëµ¥ È磨.txt .doc)
Õâ¸öÊÇÖ»Õë¶ÔÒÔÕâÁ½¸öΪÀ©Õ¹ÃûµÄÎļþ²Ù×÷
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\txtfile\shell\[Ëæ±ãÆðÃû]\command]
@= ......

.netÀïÃæÓÐûÓÐÏñvbÀïµÄrichtextbox¿Ø¼þ°¡

.netÀïÃæÓÐûÓÐÏñvbÀïµÄrichtextbox¿Ø¼þ°¡£¿
Óеġ£Ãû×ÖÒ²²î²»¶à¡£RichEdit »òÕß RichTextBox¡£

winfromÏîÄ¿Öй¤¾ßÏäÓеİÉ

webformûµÄ£¬Ö»ÓÐwinÓÐ
web¿ÉÒÔÓÃfckedit

ÒýÓÃ
webformûµÄ£¬Ö»ÓÐwinÓÐ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ