Visual basic 6, Λίγη βοήθεια...

Συζητήσεις για τις γλώσσες του dot Net και για του Visual Studio της Microsoft

Συντονιστές: WebDev Moderators, Super-Moderators

Απάντηση
Panoulis
Δημοσιεύσεις: 337
Εγγραφή: 02 Αύγ 2002 02:15
Τοποθεσία: Αθήνα

Visual basic 6, Λίγη βοήθεια...

Δημοσίευση από Panoulis » 08 Φεβ 2003 04:53

Είμαι αρχάριος στην Visual Basic και θέλω λίγο τη βοηθειά σας.

1. Υπάρχει καμιά εντολη η τρόπος στην VB που να κάνει τερματισμό η εππανακίνηση των Windows;

2. Έχω ένα timer και ένα progressbar στη φόρμα μου. Αυτό που θέλω να κάνω είναι το timer να αρχίσει να μετράει αντίστροφα για 15 δευτερόλεπτα και όπως μετράει το timer η progressbar να γεμίζει σιγά σιγά μέχρι το timer να τελιώσει.

3. Τι νέο έχει Visual basic .NET σε σχέση με την Visual Basic 6.0;

Ευχαριστώ προκαταβολικά... :D

Άβαταρ μέλους
agrippas
Script Master
Δημοσιεύσεις: 494
Εγγραφή: 18 Ιούλ 2002 14:52
Τοποθεσία: Υπερπέραν
Επικοινωνία:

Visual basic 6, Λίγη βοήθεια...

Δημοσίευση από agrippas » 08 Φεβ 2003 11:42

1. Υπάρχει τρόπος αλλά για κάθε έκδοση των Windows είναι ξεχωριστή εντολή. Πάντα θα χρησιμοποιείς τη Shell. Για περισσότερα ψάξε στο MSDN.

2. Βάλε στη φόρμα ένα command button, ένα timer, ένα progressbar με τιμές minimum = 0 και maximum = 15, και ένα Label.

Ο κώδικας είναι:

Κώδικας: Επιλογή όλων

Option Explicit
Dim IntMpara As Integer

Private Sub Command1_Click()
ProgressBar1.Value = 0
Timer1.Enabled = True
End Sub

Private Sub Form_Load()
Timer1.Enabled = False
Timer1.Interval = 1000
IntMpara = 0
End Sub

Private Sub Timer1_Timer()

Label1.Caption = 15 - IntMpara
Label1.Refresh

IntMpara = CInt(Round(ProgressBar1.Value, 0))
IntMpara = IntMpara + 1

ProgressBar1.Value = IntMpara
ProgressBar1.Refresh

If IntMpara >= 15 Then
    Label1.Caption = ""
    Call StopTimer
    
End If

End Sub

Private Sub StopTimer()
Timer1.Enabled = False
IntMpara = 0
End Sub
3. Αναλυτικά θα βρεις στο site της Microsoft. Πάντως το σίγουρο είναι ότι θα πρέπει να ξεχάσουμε πολλά απ' αυτά που ξέραμε...

Απάντηση

Επιστροφή στο “dot Net και Visual Studio”

Μέλη σε σύνδεση

Μέλη σε αυτήν τη Δ. Συζήτηση: Δεν υπάρχουν εγγεγραμμένα μέλη και 2 επισκέπτες