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 )


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

     
   

---

DDTP1 = Format(date1, "yyyy-MM")
ÊÔÊÔÕâÑù

---

ÄǸö²»ÄÜÓþͲ¹³äÆëÁ˲éѯ£¬Ò»Ñù°É¡£

---

TDataÊÇÖ»ÓÐÄêÔµÄô£¿

---

TData×Ö¶ÎÊÇ(ÈÕÆÚÀàÐÍ2008-02-02)

---

tdateÊÇÄêÔÂÈյģ¬Ö®ºóformatÍêÁ˲»¾ÍÖ»ÓÐÄêÔÂô£¬ÕâÑùÔõôÄÜÕÒµ½Êý¾ÝÄØ

---

ÓÃbetween ²îÒ»ÏÂʱ¼ä¶ÎÄÚµÄÊý¾Ý

---

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 )


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