Visualizzazione dei risultati da 1 a 2 su 2
  1. #1

    [VB6] Spuntare checkbox senza creare evento click

    Ciao,
    non riesco a trovare una soluzione eppure sembra una cosa stupida.
    In fase di caricamento di un form, leggo dei dati da un file ed inserisco o meno la spunta ad una checkbox. Il problema è che non devo creare l'evento click, ma solo se l'utente, in un secondo momento, ci clicca sopra.
    Come risolvo?

    Grazie

    Max

  2. #2
    Utente di HTML.it L'avatar di gibra
    Registrato dal
    Apr 2008
    residenza
    Italy
    Messaggi
    4,244

    Re: [VB6] Spuntare checkbox senza creare evento click

    Originariamente inviato da VideoCasa
    Ciao,
    non riesco a trovare una soluzione eppure sembra una cosa stupida.
    In fase di caricamento di un form, leggo dei dati da un file ed inserisco o meno la spunta ad una checkbox. Il problema è che non devo creare l'evento click, ma solo se l'utente, in un secondo momento, ci clicca sopra.
    Come risolvo?
    Io ho sempre adottato questo sistema:
    crei una variabile a livello di modulo
    codice:
    Dim m_bIsLoading As Boolean
    La imposti a True all'inizio nel Form_Load e a False alla fine

    codice:
    Private Sub Form_Load()
        m_bIsLoading = True
    
        ' codice che carica i valori nei controlli
       
        m_bIsLoading = False
    End Sub
    Poi negli eventi dei controlli che vuoi intercettare, esempio il Click del CheckBox
    codice:
    Private Sub CheckBox1_Click()
        If m_bLoading Then Exit Sub
        ' Codice da eseguire
    End SUb
    Quando carichi il form m_bIsLoading sarà True, quindi il codice nei controlli non verrà eseguito. Ti consiglio anche, se già non lo fai, di caricare PRIMA il form è visualizzarlo DOPO, cioè :

    codice:
    Load frmTua
    frmTua.Show

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.