VBÖÐÀûÓÃDataBaseÇÉÃîÉèÖÃDataReportÖеĶ¯Ì¬SQL
½üÈÕ·ÖÎöÒ»VB×öµÄ±¨±í£¬ÓÉÓÚ¶ÔVBÖ»ÊÇÁ˽⣬̸²»ÉÏÊìÁ·£¬²»¹ý¶ÔÆäË®¾§±¨±íµ¹ÓеãÈÏʶ£¬Ö®Ç°Ò²×ö¹ýÈýÁ½¸öСµÄ±¨±í £¬¼ÓÖ®¶ÔPBÖеı¨±íÁ˽â·Ç³£ÊìϤ£¬µ±Ê±ÐÅÐÄÂù´óµÄ¡£
ÏÈÊÇ¿´ÁËDataReport£¬ÓÃÓÚ»æÖƱ¨±í¸ñʽ¡£ÔÙÀ´¿´DataEnvironment£¬ÓÃÓÚ¶¨Òå»ñÈ¡µÄÊý¾ÝÁС£½«DataReportÓëDataEnvironment°ó¶¨ºó¾Í¿É»ñÈ¡Êý¾ÝÁË¡£
»ùÓÚÕâ¸ö˼·»¹ËãÊǼòµ¥£¬×ö¸ö¼òµ¥µÄ²»´ø²ÎÊýÌõ¼þµÄSQLͨ¹ýÁË¡£²»¹ý´ò¿ª±¨±íµÄ½çÃæÎÞ·¨×Ô¶¨Ò壬Èç¼Ó¸ö²éѯµÄ°´Å¥£¬ÈòéѯµÄÌõ¼þÓ뱨±íÏÔʾÔÚͬһ¸ö½çÃæÖУ¬(PBʵÏÖ¾ÍÌ«¼òµ¥ÁË)¡£Ïëµ½Ò»¸öÓëDataReport²î²»¶àͬÃûµÄActiveX-DataRepeat£¬(Ïëͨ¹ýActiveX¼ÓÔØ¸ÃDataReport£¬ÕâÑù¾Í¿ÉÔÚ×Ô¶¨Òå½çÃæÉÏÏÔʾÕâ¸öReport)ÏÈ¿´¿´ÔÙ˵£¬½áÂÛÊÇÁ½ÂëÊ¡£DataReportÓÃÓÚÉè¼Æ±¨±í£¬DatarepeatÓëDataGridÀàËÆÊý¾Ýµ×²ãת»»´¦ÀíµÄ¡£(Ö»¹ÖÓ¢ÎIJӦ¸Ã´Ó×ÖÃæÉÏ¿ÉÒÔÀí½âÕâ¸öDataRepeatÓëReportÊÇÁ½ÂëÊ£¬²»¹ýÕâÖÖ¾«ÉñÖµµÃÌᳫ£¬Ã»Óе÷²é¾Íû·¢ÑÔȨ¡£)
ÎÞ²ÎÊýµÄSQLÊÇûÎÊÌ⣬ÏÂÃæ¾ÍÊÇÓвÎÊýµÄÁË¡£·ÖÎö±ðÈ˵ijÌÐòÊǼþ¿ÉŵÄÊ£¬ÌرðÊǶÔVB²»Ê죬¼ÓÉϱðÈËʹÓõÄÁíÀà·½·¨£¬¸üÊÇһͷÎíË®¡£Õâ»ØÎÒ¾ÍÓöÉÏÁË¡£
´úÂëÖÐûÓÐÈ¥´¦ÀíDataEnvironment£¬ËäÈ»DataReport¶¼ÓëDataEnvironment°ó¶¨ÁË£¬µ«ÊôÓÚ¾²Ì¬Ê½°ó¶¨¡£Ô×÷ÕßʹÓõÄÊÇDataBase£¬Í¨¹ýOpenDatabaseÒ»¸öMDBÎļþ£¬ÔÙÔÚQueryDefs×ÓÀàÖÐÈ¥¶¯Ì¬ÉèÖÃSQL£¬ÕâÑù¾Í½«Ï൱ÓÚ¶Ô²ÎÊý´«ÈëÁË¡£¿ªÊ¼Ê±ÕÕè»»¢ÁË£¬³ÌÐò䱨´í£¬¿É¼ìË÷ºóûÓа´²éѯÌõ¼þÀ´¼ìË÷¡£DataEnvironmentÖÐÎÒ¶¨ÒåÁ˵ÄCmdText·½Ê½£¬½«±¨±íÐèÒªµÄÁж¼¸ø³öÀ´£¬Where Ìõ¼þ¸ø²»³öÀ´£¬ÒòΪÌõ¼þÊÇÔÚ½çÃæÖмÈëµÄ¡£·ÖÎöÏÂÔÓеÄDataEnvironment£¬Ê¹ÓõÄÊÇCmdTable·½Ê½£¬ÓëÄÚ²¿µÄÊÓͼֱ½Ó¶ÔÓ¦£¬¿ÉÎÒÕâÎÞ·¨¶ÔÓ¦±í£¬ÎÒµÄSQLÊǶà±í¹ØÁª¡£
“Óöµ½ÎÊÌ⣬ÄãbaiduÁËÂð?”£¬Õâ»°·Ç³£Á÷ÐС£ÄǾÍÏÈÕÒÕÒÏà¹Ø×ÊÁÏ£¬ÎÞÀµÔÀ´ÕâÃÇÈÊÐÖʹµÄÕÐÊý̫ƫ£¬ÎÞ¹û¡£
¼ÌÐø·ÖÎö£¬ÔÀ´ÄÇλÈÊÐÖʹÓÃÁËDataBaseÀ´ÓëReport´ò½»µÀ£¬ÄǾͲé²éQueryDefs£¬¸Ã¼¼ÊõºÃÏñʧ´«ÁËÒ»°ã£¬Ö»ÄÜÔÚMSDNÉÏ¿´µ½English°ïÖú£¬Ò²Ã»¿´µ½DataBaseÓëDataReportÏà¹ØµÄ£¬Ö»ÓжÎÑùÀýÊÇ¿ÉÒÔÓÃÀ´ÉèÖÃÒ»¸öSqlÓï¾ä¡£
»»¸ö½Ç¶È¿´ÎÊÌ⣬¼ÈÈ»¿´²»µ½ÕæÕýÒâÒåµÄ°ïÖú£¬ÄǾÍ×ÔÒÑÁ˽⣬»¹ºÃVBÖÐÓÐÕâ¸öµ÷ÊԲ鿴Æ÷£¬Debug¶¯Ì¬¸ú×ÙÔÙ¿´¿´DataBase¶ÔÏó£¬DataBaseΪһÊ
Ïà¹ØÎĵµ£º
VB ×¢ÊͳÌÐò´úÂëµÄ·ûºÅÊÇ '£¬Ö»ÒªÔÚijÐгÌÐòÇ°Ãæ¼ÓÉϸ÷ûºÅ¾Í¿ÉÒÔ×¢Ê͸ÃÐгÌÐò¡£µ«Èç¹û³ÌÐò´úÂëÓï¾äºÜ¶àµÄʱºò£¬Ò»ÐÐÒ»ÐеØ×¢Ê;ͷdz£²»·½±ã¡£Æäʵ VB
±¾ÉíÌṩÁËÒ»´ÎÐÔ×¢ÊͶàÌõÓï¾äµÄ¹¦ÄÜ£ºÔÚÖ÷²Ëµ¥“ÊÓͼ”Ñ¡ÏîµÄ“¹¤¾ßÀ¸”Ï£¬Ñ¡ÖГ±à¼”£¬VB
µÄ½çÃæ»á³öÏÖÒ»ÅŹ¤¾ß°´Å¥£¬ÆäÖоÍÓÐÓà ......
webbrowser ²»ÄÜÊÕµ½SendMessageµÄÏûÏ¢
Ö÷ÒªÊÇÒòΪ1webbrowser µÄ¾ä±úÕÒ²»µ½¡£¾¹ýŬÁ¦ËÑË÷£¬ÖÕÓÚ½â¾öÁË¡£×ö¸ö¼Ç¼.
Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Private Declare Function ......
Dim p(10000, 1) As Double
Dim num As Integer
Dim ptx As Single
Dim pty As Single
Dim w0, w1, w2, w3 As Single
Private Sub Command1_Click()
Dim t As Single
Dim i As Integer
Dim f0, f1, f2, f3 As Single
Picture1.DrawWidth = 3
For t = 0 To 1 St ......
·ÃÎÊÔ¶³ÌÊý¾Ý¿âµÄÇé¿öÓÐÒÔϼ¸ÖÖ£º
1£©·ÃÎÊÔ¶³ÌÊý¾Ý¿âµÄaccessÊý¾Ý¿â
2£©·ÃÎÊÔ¶³ÌmssqlÊý¾Ý¿â»òoracleµÈÆäËû¹ØÏµÊý¾Ý¿â£¬µ«ÊÇÊý¾Ý¿âͨÐŶ˿ڱ»·À»ðǽ×èµ²»òÆäËûÍøÂçÔÒòÔì³ÉÎÞ·¨Ê¹Óøö˿Ú
±¾ÎĽöÔÚwindows2000 advance server,mdac2.8ϲâÊÔͨ¹ý£¬ÆäÓàÌõ¼þ²»±£Ö¤ÄÜÕý³£ÔËÐÐ
ÔÚmdacµÄService ProvidersÖаüÀ¨Microsoft ......
vb¿ª·¢Èí¼þÊÇÔÚÒ»¶¨µÄ»·¾³Ï½øÐеģ¬Èçvisual basic 6.0 mssql»òaccessµÈ£¬µ«ÊÇ×îÖÕÈí¼þÒª¸ø¹ã´óȺÖÚʹÓ㬱ðÈ˲»¿ÉÄܶ¼°²×°ÕâЩ¶«Î÷£¬ËùÒÔÐèÒª´ò°ü£¬Éú³É°²×°Îļþ£¬¾ÍÏëÎÒÃÇÏÂÔØµÄºÜ¶à°²×°³ÌÐò£¬¶¼ÊÇ´ò°üºóµÄ½á¹û£¡
µ«ÊÇÖµµÃ×¢ÒâµÄÊÇ£¬´ò°üµÄ¹ý³ÌÖУ¬ÓÐÌí¼Ó£¬É¾³ý×é¼þ¹©ÄãÑ¡Ôñ£¬Èç¹ûÓõ½Ïà¶Ô·¾¶£¬¸½¼þ£¬ÍâÁªµ ......