Acquista i nostri libri consigliati su Amazon.it
+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 3 su 3

DoCmd.Maximize non risponde come mi aspetterei

  1. #1
    L'avatar di Elimar
    Elimar non è in linea Scribacchino
    Ciao a tutti,
    ho un problema con una Maschera.

    Su caricamento della maschera principale eseguo il seguente codice per evitare che l'utente possa fare danni agli oggetti del DB.
    Private Sub Form_Load()
      DoCmd.SelectObject acTable, , True
      RunCommand acCmdWindowHide
      DoCmd.RunCommand acCmdWindowHide
      DoCmd.ShowToolbar "Ribbon", acToolbarNo
    End Sub
    
    Una volta che l'utente seleziona il Report che vuole visualizzare, con il seguente codice, minimizzo la maschera principale e apro il report selezionato (e questo funziona)
    Private Sub cboReportList_AfterUpdate()
    Dim ReportToOpen As String
    
      If IsNull(Screen.ActiveControl) Then Exit Sub
      ReportToOpen = Screen.ActiveControl
      If CurrentProject.IsTrusted Then Screen.ActiveControl = Null
      DoCmd.OpenReport ReportToOpen, acViewReport, , , acWindowNormal
      ReportToOpen = Empty
      Forms("Maschera Principale").SetFocus
      DoCmd.Minimize
    End Sub
    
    In chiusura di tutti i report chiamo la seguente Sub e qui è il mio problema:
    Sub Scopri_MascheraPrincipale()
      If CurrentProject.AllForms("Maschera Principale").IsLoaded Then
        Forms("Maschera Principale").SetFocus
        DoCmd.Maximize
      Else
        DoCmd.OpenForm "Maschera Principale", acNormal
      End If
    End Sub
    
    verifico se la maschera è aperta e se aperta cerco di massimizzarla, ma nonostante il codice arrivi alla fine senza alcun errore, una volta che il report viene chiuso, la maschera continua a rimanere minimizzata.

    Dove sto sbagliando?

    grazie a tutti per le dritte che mi vorrete dare.

    Già che ci sono vi chiederei un ulteriore aiuto, dopo aver caricato dei dati in una maschera, quando torno a visualizzare la mia maschera principale, nella quale c'è una subform collegata ad una query, per vedere le info che ho appena caricato devo cliccare F5, qualcuno saprebbe dirmi dove inserire il comandi:
    DoCmd.Requery e DoCmd.RefreshRecord
    sempre che siano questi quelli corretti da utilizzare

    Grazie ancora.
    ℹ️ Leggi di più su Elimar ...

  2. #2
    L'avatar di @Alex
    @Alex non è in linea Moderatore Globale
    Hai provato ad usare il Restore...?
    https://docs.microsoft.com/en-us/off....docmd.restore
    Le maschere di inserimento vanno usate in modalità acDialog proprio per rendere sincrona l'azione di chiusura della maschra di inserimento con l'aggiornamento della maschera principale...
    Se non hai fatto cosi... non potrai MAI sapere quando la form di inserimento viene chiusa, se non su evento Unload della stessa... ma la cosa si.complica se a poterla chiamare sono piu Forms...
    ℹ️ Leggi di più su @Alex ...

  3. #3
    L'avatar di Elimar
    Elimar non è in linea Scribacchino
    Grazie Ale,
    preziosissimo come sempre ... come farei senza di te
    ℹ️ Leggi di più su Elimar ...

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. UserControl non risponde al click
    Da GarGia1960 nel forum Visual Basic .Net
    Risposte: 1
    Ultimo Post: 28-11-2016, 14:25
  2. Risolto: Inserire conferma prima di minimize e maximize form
    Da persichetti nel forum Visual Basic .Net
    Risposte: 4
    Ultimo Post: 14-02-2012, 13:31
  3. Form non risponde
    Da nala84 nel forum Visual Basic .Net
    Risposte: 4
    Ultimo Post: 31-03-2010, 11:39
  4. Canon s400 non risponde
    Da lorussino nel forum Microsoft Windows
    Risposte: 1
    Ultimo Post: 13-05-2006, 12:20
  5. VB6 il programma non risponde
    Da bresso nel forum Visual Basic 6
    Risposte: 3
    Ultimo Post: 21-03-2006, 15:05