[vb6] convertire orario in intero

[yyzyyz]

ce la possibilita' di fare questo tipo di conversione ? es.
gli orari sotto sono espressi in minuti.

14:30 convertirlo in 15
12:10 "" 12

ho provato velocemente cInt ed altri ma senza esito positivo.

[oregon]

Ma l'ora in questione l'hai inserita in una stringa ?

Se è così, puoi scrivere

Dim v As Integer

v = DatePart("h", s) - (DatePart("n", s) > 29)

[gibra]

Originariamente inviato da yyzyyz
gli orari sotto sono espressi in minuti.

Direi proprio di no.
Se fossero espressi in minuti sarebbero degli interi.
(ovvero 45, 30, 60, 120, ...)

Quelli sembrano orari ma non si capisce se il 14:30 significhi
- ore e muniti
- minuti e secondi

Spiegati meglio...

[yyzyyz]

grz ad entrambi per l'interessamento, scusate se nn ho specificato , effetivamente si tratta di minuti e secondi.
Oregon il tuo esempio funziona, pero' non riesco ad integrarlo come vorrei nel mio progetto.
per ora sto facendo cosi, il discorso è che dovrei sommare o sottrarre dei minuti e non vorrei perdere i secondi nell'approssimazione dell'operazione.
utilizzo anche un timer non penso sia rilevante il codice in esso.

le variambili sono di tipo stringa

tmp_time = Mid(ora1.Text, 1, 2)
tempo = DateAdd("n", tmp_time + 15, Now)

[gibra]

Originariamente inviato da yyzyyz
il discorso è che dovrei sommare o sottrarre dei minuti e non vorrei perdere i secondi nell'approssimazione dell'operazione.

Sempre più confuso...

- prima affermi che vuoi arrotondare
14:30 convertirlo in 15
12:10 "" 12


- ora affermi che non vuoi perdere secondi nell''approssimazione

[oregon]

Originariamente inviato da gibra
Sempre più confuso...

In effetti ...

[yyzyyz]

si perche' inizialmente pensavo potesse andare bene in quel modo, cmq grazie per la vostra collaborazione.

[oregon]

Originariamente inviato da yyzyyz
si perche' inizialmente pensavo potesse andare bene in quel modo, cmq grazie per la vostra collaborazione.

E quindi?