ÓÃVBÓöµ½Ð©ÎÊÌâ

         
            Dim order As New PreOrder()
            order = getOrder(Trim(Me.ListBox1.SelectedItem.ToString))
            Me.TextBox1.Text = order.id
            Me.DateTimePicker1.Value = order.rdate
            Me.TextBox2.Text = order.num

            Ìáʾ  1.  δÉùÃ÷Ãû³Æ¡°getOrder¡±
                 
                  ÕâÊÇʲô·½·¨°¡£¿¶¯Ì¬Á´½Ó¿âÓÐÂ𣿻¹ÊÇÒª×Ô¼ºÐ´°¡£¿
                 
                  2.  Me.DateTimePicker1.Value = order.rdate  ´Ó×Ö·û´®¡°¡±µ½ÀàÐÍ¡°Date¡±µÄת»»ÎÞЧ¡£

                  Ôõô´Ó×Ö·ûת»¯ÎªDateÐÍ°¡£¿

---

ÎÒ²éÁËÏÂVBµÄMSDNÓÐDisplayAttribute.GetOrder ·½·¨£¬ÔÚSystem.ComponentModel.DataAnnotations.dll ÖУ¬ÎÒÌí¼ÓÕâ¸ö¶¯Ì¬Á´½Ó¿â£¬Ã»×÷Óá£
{{