Πρώτα Βήματα - Γλώσσες προγραμματισμού

Απ: Visual basic 6.0 help

gskrekos — Mon, 27 Mar 2006 22:52:53 GMT

Ευχαριστω για την συμβουλη.

Απ: Visual basic 6.0 help

imanos — Mon, 27 Mar 2006 15:36:50 GMT

Καλό θα είναι όταν δίνεις μιά τιμή σε ένα object να βάζεις και το property του.

Δηλαδή DTPicker.value και όχι σκέτο DTPicker και αυτό γιατί όταν περάσεις σέ .NET περιβάλλον αυτό είναι υποχρεωτικό και έτσι θα μπορέσεις νά κάνεις μετάβαση του project σου με λιγότερες διορθώσεις στον κώδικα σου .Δηλαδή γενικά να μην χρησιμοποιείς variant μεταβλητές.

Απ: Visual basic 6.0 help

gskrekos — Sun, 26 Mar 2006 21:47:57 GMT

Απλως το ειδα, και εφαρμοσα κατι που ειδα απλως μεσα στο timer εβαλα

DTPicker = DTpicker + 0.00001

Απ: Visual basic 6.0 help

gskrekos — Sun, 26 Mar 2006 21:22:11 GMT

Θα το δοκιμασω και θα σου πω, ευχαριστω προκαταβολικα που ασχολεισε.

Απ: Visual basic 6.0 help

imanos — Sun, 26 Mar 2006 19:55:55 GMT

Εφάρμοσε τον παρακάτω κώδικα .Στην φόρμα να προσθέσεις εκτός του DTPICKER και ένα checkbox.

Dim currentDateTime As Date

Private Sub Form_Load()

DTPicker1.CustomFormat = "dd/MM/yyyy hh:mm:ss tt"

currentDateTime = Now
DTPicker1.value=currentDateTime
End Sub

Private Sub Check1_Click()

If Check1.Value = True Then

Timer1.Interval = 0

Else

Timer1.Interval = 1000

End If

End Sub

Private Sub Timer1_Timer()

If Check1.Value = False Then

currentDateTime = CDate(CDbl(currentDateTime) + 0.00001)

DTPicker1.Value = currentDateTime

Else

currentDateTime = DTPicker1.Value

End If

End Sub

Απ: Visual basic 6.0 help

gskrekos — Sun, 26 Mar 2006 02:00:50 GMT

Την πρωτη λυση την εχω δοκιμασει αλλα δεν πιανει.

Απ: Visual basic 6.0 help

Mitsaras — Sun, 26 Mar 2006 01:16:31 GMT

Απ' ότι είδα, το DTPicker (από το MS Common Controls Library 2), έχει ένα Property με όνομα "Value", καθώς και άλλα όπως Day, Month, Second, Hour κλπ.

Μπορείς να γράψεις για παράδειγμα:

this.axDTPicker2.Second = this.axDTPicker2.Second + 1.

Το πρόβλημα με αυτήν τη λύση, είναι ότι πρέπει να ελέγχεις για overflows (πχ το Second property να μην πάει στο 61). Η πιο σωστή πρακτική, θα ήταν να αλλάξεις το Value, παίρνοντας το ήδη υπάρχον Value, και προσθέτωντάς του 1 δευτερόλεπτο.

Σε .net περιβάλλον, θα αρκούσε να γράψεις dtPicker.Value.AddSeconds(1), αλλά από VB6 δε θυμάμαι και πολλά πράγματα.

Απ: Visual basic 6.0 help

gskrekos — Sun, 26 Mar 2006 00:38:10 GMT

Πως ? Προσπαθω αλλα δεν ξερω.

Απ: Visual basic 6.0 help

Mitsaras — Sun, 26 Mar 2006 00:19:32 GMT

To DTPicker1.Value = Now() δεν είναι καλή λύση.

Προσπάθησε να αυξάνεις το Value του DateTimePicker ανά ένα δευτερόλεπτο κάθε φορά που χτυπάει το Timer Event.

Απ: Visual basic 6.0 help

gskrekos — Sat, 25 Mar 2006 23:26:26 GMT

Κανεις δεν μπορει να βοηθησει ρε παιδια ?

Απ: Visual basic 6.0 help

gskrekos — Fri, 24 Mar 2006 21:36:49 GMT

Να σου πω τροποποιω την ωρα αλλα επανερχεται λογω του timer, τι να κανω?

Θελω αμα την τροποποιω να μετραει απο εκει και περα κανονικα.

Απ: Visual basic 6.0 help

gskrekos — Fri, 24 Mar 2006 20:56:36 GMT

Ασε δεν πειραζει το βρηκα. Δηλαδη ετσι νομιζω ευχαριστω για ολα, αν προκυψει τιποτα στο λεω. cu

Απ: Visual basic 6.0 help

gskrekos — Fri, 24 Mar 2006 20:50:04 GMT

Για την ωρα πως ? Αυτο ειναι για την ημερομηνια και δουλευει τελεια.

Απ: Visual basic 6.0 help

imanos — Fri, 24 Mar 2006 20:38:08 GMT

Ναι είναι στο project components Microsoft windows common controls 2.6 SP4

ουσιαστικά είναι το MSCOMCT2.ocx

Απ: Visual basic 6.0 help

gskrekos — Fri, 24 Mar 2006 20:32:49 GMT

Πως θα το βρω στο toolbox-components and then?

Οσο για το δευτερο παιδευτικα αλλα το βρηκα το βραδυ, ευχαριστω για την ανταποκριση.