Vb.net Access²éѯ°´ÄêÔÂ

    ÎÒÐèҪͨ¹ýµ¥¸ö²éѯÌõ¼þ°´ÄêÔÂ,²éѯµ½accessÊý¾Ý¿âÀïµÄÊý¾ÝΪ (ÈÕÆÚÀàÐÍ2008-02-02)


        Dim DDTP1 As String

        Dim date1 As Date = DTP1.Value

        DDTP1 = Format(date1, "#yyyy-MM#")


        Dim myTable As DataTable = myDataSet("select * from Pay where TData = " & DDTP1).Tables(0)
       
        (±íPay , ÈÕÆÚ×Ö¶ÎTdata )


        ÉÏÃæµÄ²éѯ²»ÄÜʵÏÖ,·³ÇëÄĸö¸ßÊÖ°ïÏÂÎÒ!¶àл.

     
   

---

°ó¶¨

---

VB.NET code:
Õâ¸ö·½·¨°É

Dim DDTP1 As String
Dim date1 As Date = DTP1.Value.ToString("yyyy-mm-dd")
Dim myTable As DataTable = myDataSet("select * from Pay where TData = " & DDTP1).Tables(0)

'(±íPay , ÈÕÆÚ×Ö¶ÎTdata )


'ÉÏÃæµÄ²éѯ²»ÄÜʵÏÖ,·³ÇëÄĸö¸ßÊÖ°ïÏÂÎÒ!¶àл.

---

VB.NET code:
strSql = " select top 10 * from VWEmployees where EmpBirthday between '" & cmbBirS.Value.Date & "' And '" & cmbBirE.Val