Format(taDate, "yyyy-MM-dd")
Dim date_jour As Date Dim int_nbr_rdv_tranche As Integer = 0 '//ex=nbr de rdv pour 9H30 Dim dta As MySqlDataAdapter date_jour = CDate(txt_date_rdv.Text) date_jour = Format(date_jour, "yyyy-MM-dd") MsgBox(date_jour)
Dim date_jour As Date Dim date_jour_format As String Dim int_nbr_rdv_tranche As Integer = 0 '//ex=nbr de rdv pour 9H30 Dim dta As MySqlDataAdapter date_jour = CDate(txt_date_rdv.Text) date_jour_format = Format(date_jour, "yyyy-MM-dd") MsgBox(date_jour_format)
MsgBox(txt_date_rdv.Text) str = Format(txt_date_rdv.Text, "yyyy-MM-dd").ToString MsgBox(str)
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionstr_date_jour = txt_date_rdv.Text tab_date = Split(str_date_jour, "/") str_date_jour = tab_date(2) & "-" & tab_date(1) & "-" & tab_date(0) str_requete "SELECT * from tbl_tranche WHERE JOUR_OUVRABLE" & "'" & str_date_jour & "'"