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

vb datagrid sql

Ò»¸ö´°Ì壬3¸ödatagrid£¬¹²¼Æ3¸ö±í£¬Ò»¸ö±í¶ÔÓ¦Ò»¸ödatagrid£¬µã»÷datagrid1(´ò¿ª¸Ã´°ÌåʱÒѾ­±»¸³Öµ)£¬¸ù¾Ýdatagrid1ÖеÄij¸öÖµ£¬²éѯ±í2ºÍ±í3£¬²¢°Ñ·ûºÏÌõ¼þµÄ·Ö±ð¸³Öµ¸ødatagrid2ºÍdatagrid3£¬ÒªÔõôд

VB code:
Private Sub DataGrid1_Click()
'ÔÚ´Ë´¦Ð´SQL²éѯÓï¾ä»ñµÃ¼Ç¼¼¯,²¢°ó¶¨¸Ã¼Ç¼¼¯µ½ÁíÍâµÄDataGrid¿Ø¼þ
End Sub



ÒýÓÃ
VB codePrivateSub DataGrid1_Click()'ÔÚ´Ë´¦Ð´SQL²éѯÓï¾ä»ñµÃ¼Ç¼¼¯,²¢°ó¶¨¸Ã¼Ç¼¼¯µ½ÁíÍâµÄDataGrid¿Ø¼þEnd Sub


ÎÒÖªµÀÕâÑùд£¬¿ÉÊDzéѯÓï¾äºÍÁ¬½ÓÊý¾Ý¿â¾­³£´íÎ󣬲»ÖªµÀÄÇÀï´íÁË

VB code:
Private Sub DataGrid1_Click()
DataGrid2.Visible = False
Adodc2.ConnectionString = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=jwl_dbf"
Adodc2.RecordSource = "select * from JWCK_BM" & " where ±¸¼þ´úÂë ='" & Adodc1.Recordset(2) & "'"
Adodc2.Refresh
Text1.SetFocus
DataGrid2.Visible = True
End Sub


Adodc1.Recordset(2)ÊǽÓ×ŲéѯµÄÌõ¼þ,ͨ¹ýÊó±êµã»÷DataGrid1×ó²à»ÒÉ«ÇøÓò»ñÈ¡,Recordset(2)ÖкìÉ«Êý×Ö±àºÅ¶ÔÓ¦¾ßÌåµÄ×Ö¶ÎÐÞ¸Ä.

'µ¥»÷datagrid1ʱ£¬°ÑÆäÑ¡ÖÐµÄ ¿Í»§×÷Ϊ²éѯÌõ¼þ ²éѯ ±¸×¢ºÍ°Ý·Ã (beizhu  baifang)Á½±íÖУ¬²¢·Ö±ð¸³Öµ¸ø datagrid2 ºÍdatag


Ïà¹ØÎÊ´ð£º

vbµÄÀàÖÐʹÓÃ×Ô¶¨ÒåÀàÐÍÊý¾ÝµÄÎÊÌâ - VB / »ù´¡Àà


ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......

vb - VB / ·Ç¼¼ÊõÀà

Ôõô°ÑÒÑÖªµÄÊý¾Ý±£´æ³ÉxmlÎļþ£¬ÏÖÔÚÒÑÖªµÄÊý¾ÝÊÇ
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xmlns:o=& ......

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

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

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

vbÒì²½ÎÊÌâ - VB / »ù´¡Àà

ÏÖÔÚСµÜÔÚÓÃvb6.0±àд³ÌÐò£¬Óöµ½Òì²½µÄÎÊÌ⣬¾ßÌåÈçÏ£º
µã»÷°´Å¥Aʱ£¬µ÷ÓÃÍⲿµÄdll(C++)£¬´ËdllÊÇͬ²½·µ»ØÊý¾Ý¡£´ËʱÈç¹ûÔ¶³ÌδÏìÓ¦£¬ÎҵijÌÐò½çÃæ¾Í»á¿¨ËÀ¡£Òò´ËÎÒÏëµ½ÓÃtimerÀ´ÊµÏÖÒì²½ £¬µ«ÊDz»Çå³þ¾ßÌåµÄÊµÏ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ