字符串未被識別爲有效的DateTime

Question

進出口試圖顯示我的用戶的生日變成這樣的「1990年1月1日」 - 「MMMM DD，YYYY」從我的數據庫

和我的數據庫我的數據類型日期時間並具有這樣的格式「yyyy-MM-dd hh：mm：ss」

但是每當我嘗試顯示它。它得到一個錯誤「字符串未被識別爲有效的DateTime」

Try 
     con.Open() 
     ListView1.Items.Clear() 
     comm.CommandText = "SELECT user_id, last_name + ', ' + first_name + ' ' + middle_name as name, course, section, position, address, birthday from Users" 
     comm.Connection = con 
     dr = comm.ExecuteReader 
     While (dr.Read()) 
      Dim mydate = (dr("birthday")) 
      Dim edate As Date = Date.ParseExact(mydate, "MMMM/dd/yyyy", System.Globalization.DateTimeFormatInfo.InvariantInfo) 
      With ListView1.Items.Add(dr("user_id")) 
       .subItems.Add(dr("name")) 
       .subItems.Add(dr("course")) 
       .subItems.Add(dr("section")) 
       .subItems.Add(dr("position")) 
       .subItems.Add(dr("address")) 
       .subItems.Add(edate) 
      End With 
     End While 
     comm.Dispose() 
     dr.Close() 
     con.Close() 
    Catch ex As Exception 
     MsgBox(ex.Message) 
    End Try 

Answer 1

如果你想要這個格式「一月1,1993」 ......嘗試......

Try 
    con.Open() 
    ListView1.Items.Clear() 
    comm.CommandText = "SELECT user_id, last_name + ', ' + first_name + ' ' + middle_name as name, course, section, position, address, birthday from Users" 
    comm.Connection = con 
    dr = comm.ExecuteReader 
    While (dr.Read()) 
     Dim mydate = (dr("birthday")) 
     Dim edate As Date = mydate 
     With ListView1.Items.Add(dr("user_id")) 
      .subItems.Add(dr("name")) 
      .subItems.Add(dr("course")) 
      .subItems.Add(dr("section")) 
      .subItems.Add(dr("position")) 
      .subItems.Add(dr("address")) 
      .subItems.Add(Format(edate, "MMMM d,yyyy")) 
     End With 
    End While 
    comm.Dispose() 
    dr.Close() 
    con.Close() 
Catch ex As Exception 
    MsgBox(ex.Message) 
End Try