[VB.NET] Apertura Form dopo completamento della ProgressBar

[a_s_roma]

Salve a tutti, volevo chiedere se qualcuno può aiutarmi, sul form 1 ho inserito una progressbar, quando il mouse va sul bottone la progress bar carica e alla fine del caricamento dovrebbe aprirmi il form 2, ma se ci metto form2.Show(), quando vado sul bottone mi apre subito il form2 senza caricare la barra. Come posso fare?
Grazie

[MItaly]

Posta il codice che hai scritto finora.
P.S.: linguaggio?

[a_s_roma]

Il linguaggio è visual basic però non so se si riferisce a c++ e poi non sono ferratissimo
Il codice finoscritto è questo che segue:

Public Class Form1

Dim value As String
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Interval = 30
Timer1.Enabled = False
ProgressBar1.Minimum = 0
ProgressBar1.Maximum = 50
ProgressBar1.Value = 0

End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
ProgressBar1.Value += 1
If ProgressBar1.Value = ProgressBar1.Maximum Then
ProgressBar1.Value = 0
End If
End Sub

Private Sub Button1_MouseEnter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.MouseEnter

Timer1.Enabled = True
ProgressBar1.Value = 0


End Sub

Private Sub Button1_MouseLeave(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.MouseLeave
Timer1.Enabled = False
End Sub

Grazie per l'aiuto sono disperato è per la tesi!!!!

[MItaly]

Originariamente inviato da a_s_roma
Il linguaggio è visual basic però non so se si riferisce a c++ e poi non sono ferratissimo

Eh? Cosa c'entra adesso il C++?
Comunque se vuoi che venga mostrato il form2 al termine del caricamento ti basta modificare Timer1_Tick in questo modo:

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    ProgressBar1.Value += 1
    If ProgressBar1.Value = ProgressBar1.Maximum Then
        ProgressBar1.Value = 0
        Timer1.Enabled = False 'se no si va avanti all'infinito...
        form2.Show() 'o form2.ShowDialog(), se vuoi che il form venga visualizzato in modalità modale
    End If
End Sub

[LeleFT]

Dimmi una cosa: sei arrivato alla tesi senza nemmeno sapere in che linguaggio stai programmando? I miei pregiudizi sull'università sono sempre più fondati...

Quello è VB!


Ciao.

[oregon]

Non penso (non voglio pensare) che sia per una tesi universitaria ... forse per una tesina di maturita' ...

[a_s_roma]

Volevo rispondere a quelli che prendono in giro, che io studio ingegneria elettronica e non informatica in + non ho mai programmato in vita mia perchè non mi è mai servito.

Per chi vuole ancora aiutarmi ho ancora bisogno di aiuto, praticamente il discorso è un po + complicato, ho + di un bottone e questi bottoni mi devono portare a diversi form, se metto quel comando ciò mi manderebbe solo nel form2, quindi avrei bisogno di capire che codice devo mettere per fare ciò. Vi ringrazio in anticipo.

[MItaly]

Freno, frizione, retro, acceleratore, freno, frizione, prima; ricominciamo daccapo .
Allora, spiegami se ho capito bene: hai un form con una serie di pulsanti e una barra di avanzamento; a ciascun pulsante corrisponde un form differente da aprire. Quando l'utente "appoggia" il mouse su un pulsante la barra di avanzamento inizia a "riempirsi"; quando la barra di avanzamento è "piena" si apre il form corrispondente al pulsante su cui l'utente sta tenendo "appoggiato" il mouse, altrimenti, se l'utente sposta il mouse, la barra di avanzamento viene resettata. Ho capito bene? Ah, un'ultima cosa: i form devono essere visualizzati come modali (ossia, l'utente può lavorare solo sul form appena aperto fino a quando non viene chiuso) o no (ossia, l'utente può lavorare sia sul form appena aperto che su tutti gli altri)?
P.S.: ancora non ho capito cosa c'entrava il C++... :rollo:

[a_s_roma]

Per quanto riguarda la pulsantiera è tutto come dici tu cioè quando il mouse va su un pulsante la barra si carica e quando è piena apre il form corrispondente se esce dal pulsante si azzera. Guarda io vorrei fare (sempre se è una cosa veloce) che quando si apre un form gli altri si chiudono, tutto questo sempre se non è lento a farlo. In pratica mi serve un interfaccia + veloce possibile.
Ti ringrazio

[MItaly]

Allora puoi riciclare quasi completamente il codice postato in precedenza...

Public Class Form1
    Private formToShow As Form
    Dim value As String
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Timer1.Interval = 30
        Timer1.Enabled = False
        ProgressBar1.Minimum = 0
        ProgressBar1.Maximum = 50
        ProgressBar1.Value = 0
        Button1.Tag = form2
        Button2.Tag = form3
        Button3.Tag = form4
        'altri eventuali assegnamenti dello stesso tipo
    End Sub
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        ProgressBar1.Value += 1
        If ProgressBar1.Value = ProgressBar1.Maximum Then
            ProgressBar1.Value = 0
            Timer1.Enabled = False
            form2.Close()
            form3.Close()
            form4.Close()
            'altre eventuali chiusure di form
            formToShow.Show()
        End If
    End Sub

    Private Sub Buttons_MouseEnter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.MouseEnter, Button2.MouseEnter, Button3.MouseEnter 'eventualmente anche altri Handles dello stesso genere

        Timer1.Enabled = True
        ProgressBar1.Value = 0
        formToShow = DirectCast(sender, Control).Tag

    End Sub

    Private Sub Button1_MouseLeave(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.MouseLeave, Button2.MouseLeave, Button3.MouseLeave 'c.s. 
        Timer1.Enabled = False
    End Sub
End Class

Non l'ho collaudato ma dovrebbe andare.