Hola, desde luego lo mio no son las fechas en Gambas

Tengo esto:

Una fecha guardada en sqlite en forma de cadena, esta: '2021-03-27 17:49'

Y necesito pasarla a un dateBox pero cuando lo hago de mil y una manera al final recibo en el datebox esto: 27/03/2021 19:49

En fin como lo solucionáis ustedes, ojo, observo que hay 2 horas de diferencia pero la verdad no se porque ya que mi sistema operativo esta en orden. Por otra parte no coincide con la hora que veo ahora mismo.

Código:

TextBox7.Text = Format(Date, "dd/mm/yyyy")

o este otros

Código:

Dim FechaA As String[]
Dim FechaSql As String
FechaA = Split(TextBox7.Text, "/")
FechaSql = FechaA[1] & "/" & FechaA[0] & "/" & FechaA[2] & " 02:00:00"

espero que te solucione la papeleta

observo que hay 2 horas de diferencia

Mira esta pagina:

   http://gambaswiki.org/wiki/comp/gb/system/timezone

---

necesito pasarla a un dateBox pero cuando lo hago de mil y una manera al final recibo en el datebox esto: 27/03/2021 19:49

A mí el DateBox no muestra también el horario.

De todas formas yo propongo este codigo (la representación del horario no habrá pasado a "DateBox"):

Código:

Public Sub Form_Open()

  Dim fecha As String = "2021-03-27 17:49"
  Dim nuevafecha As String
  Dim ss As String[]
 
  ss = Scan(fecha, "*-*-* *")

'  Reconstruye la fecha en el formato americano, para que pueda ser convertida al tipo "Date" por la función "Cdate()".
  nuevafecha = ss[1] &/ ss[2] &/ ss[0]
 
  DateBox1.Value = CDate(nuevafecha)

End

  nuevafecha = ss[1] &/ ss[2] &/ ss[0]
  DateBox1.Value = CDate(nuevafecha)

Vuott, tal vez seria mas completo modificar esl código de esta manera para ver correctamente fecha, horas y minutos

Código:

DateBox1.Mode = DateChooser.DateTime
nuevafecha = ss[1] &/ ss[2] &/ ss[0] & " " & ss[3]

Saludos.

Mil gracias a todos, de verdad de la buena

Mirad mientras esperaba vuestra respuesta he solucionado el problema de esta forma:

Nuestro ejemplo: '2021-03-27 17:49'
1. Convierto '2021-03-27' esta parte a '27/03/2021'
2. La Hora la extraigo para después encadenarla
3. Por último hago un Val de la cadena con la fecha. Esto me acuerdo que Shordi me lo metió a fuego en el pasado. Y al final me acordé y lo hice.

Dim sCreado As String = '27/03/2021' & " " & Right(CStr('2021-03-27 17:49', 5) ' Así funciona pero observo que CStr sobra, lo miraré
DateBox1.Value = Val(sCreado)

Gracias de verdad sois muy amables.

Vuott, tal vez seria mas completo modificar esl código de esta manera para ver correctamente fecha, horas y minutos

Ah, muy bien, tincho, muchas gracias.