³ÌÐòÖÐÊÊͨ¹ýÕâ¾ä·¢Ë굀 SendMessage Preview_Handle, WM_CAP_DRIVER_CONNECT, nCameraID, 0
ÎÒµÄÁ½¸öu¿ÚÁ¬×ÅÁ½¸öÉãÏñÍ· ÎҸijÉSendMessage Preview_Handle, WM_CAP_DRIVER_CONNECT, 0, 0 ³ÌÐò²¶×½µÄÊÇĬÈϵ쬵«ÊÇ ÎҸijÉSendMessage Preview_Handle, WM_CAP_DRIVER_CONNECT, 1, 0 ³ÌÐòÈ´²¶×½²»µ½ÁíÒ»¸öÉ豸£¬²»ÖªµÀÊÇ ......
aspÒýÓÃvb6±àдµÄdll
×¢²ádll£¬regsvr32 E:\abc.dll£¬ÏÔʾ³É¹¦¡£
µ«ÊÇÔÚaspµ±Öд´½¨¶ÔÏó³É¹¦£¬µ÷ÓÃdllµ±Öеķ½·¨¶¼²»³É¹¦£¬Ò²Ã»Óб¨´í¡£Ôõô»ØÊÂÄØ£¿
ÊDz»ÊÇcreateobjectÀïµÄ×Ö´®²»¶Ô°¡¡£
ÒýÓÃ
ÊDz»ÊÇcreateobjectÀïµÄ×Ö´®²»¶Ô°¡¡£
ÊǶԵģ¬Èç¹ûд²»¶Ô£¬¾ÍÏÔʾ´´½¨¶ÔÏóʧ°ÜÁË¡£
ÎÒÏÖÔÚÄÜ´´½¨¶ÔÏó¡£µ«Êǵ ......
ÎÒÏëÓÃvb²éѯaccess
StrSql = "select * from t_VoteIp where NewsID=" & CLng(Trim(Text4.Text)) & ""
NewsIDÊdz¤ÕûÐÍ,¿ÉÊÇÎÒÔÚText4ÖÐÊäÈë1075È´²éѯ²»µ½ÄÚÈÝ£¬1075ÊÇȷʵ´æÔڵġ£
»¹ÓÐ
StrSql = "select * from t_news where news_date>" & cdate(text1.text) & & ......
ллÁË£¬£¬ÎÒÓõÄÊÇVB6.0 £¬ÒòΪ¸Õѧ²»¾Ã£¬£¬ËùÒÔÓеãÎÊÌâÏëÇë½Ì ¸÷λ
¾ÍÊÇ µ±ÎÒ±àµÄ ½çÃæ µã»÷ÓÒÉϽǵÄ×î´ó»¯Ê±£¬£¬½çÃæÄڵĸ÷×é¼þÒ² ÏëµÈ±ÈÄã·Å´ó£¬£¬
ÆäʵÉÏÒ»ÎÊÌâ µ½Ã»ÓÐʲô £¬£¬ÁíÒ»¸ö±È½Ï Ææ¹ÖµÄʾÍÊÇ£¬£¬ÒòΪÎÒÊÇÔÚ ¿íÆÁÉÏ ±àµÄ³ÌÐò £¬£¬ËùÒÔ ÎҵĽçÃæ¾Í ÀµÃ±È½Ï ¿ ......
½«VB»òC#´úÂëת»»ÎªPB´úÂë,Íò·Ö¸Ðл!
ÒòΪ²»ÄÜ·¢¸½¼þ,·¢Á´½ÓµØÖ·:
http://www.teklynx.com/top_pages/cs_actxsamples.html
Ö÷ÒªÊÇ´òÓ¡²¿·ÖµÄ´úÂë,ÆäËüµÄ²»ÓÃ,лл!
½«VB»òC#´úÂëת»»ÎªPB´úÂë,Íò·Ö¸Ðл!
Ö÷ÒªÊÇ´òÓ¡²¿·ÖµÄ´úÂë,ÆäËüµÄ²»ÓÃ,лл!
{{-- ......
ÕâÊÇÒ»¶Îword,vba¿ÉÒÔÖ´ÐеĴúÂë
Dim MyData As DataObject
Private Sub CommandButton1_Click()
TextBox1.SelStart = 0
TextBox1.SelLength = TextBox1.TextLength
TextBox1.Copy
MyData.GetfromClipboard
TextBox2. ......