Questo sito utilizza cookie tecnici e di terze parti. Continuando la navigazione sul nostro sito accetti l'uso dei cookie. Per saperne di più leggi l'informativa sui cookie.   


Errore con LoadPicture
Ultimo messaggio: 10 giu 2019 12:15 di alip1. 4 Risposte.
Stampa gradevole
Solo gli utenti registrati possono rispondere ad una discussione.
Avatar
alip1
Messaggi: 72
Iscritto dal: 30 apr 2012 09:34
Utente
Utente

09 giu 2019 16:25

 

Buon pomeriggio a tutti.  Intanto chiedo scusa se post codice VBA di access perché non sapevo su quale altro forum andare e vb6 mi é sembrato più adatto.

Mi si presenta il seguente problema.

Ho un form che al suo interno contiene un altro form ( che viene reso visibile o meno a seconda di un certo valore di una variabile… nel form figlio vorrei settare dal form padre la proprietà picture caricando un immagine da un file esterno con la funzione Loadpicture … il pezzo di codice che uso é questo:

Sub VisualizzaIMG(stFileName As String)

  On Error GoTo errImg

   Forms("frmView").Controls.Item("frmImage").Picture = LoadPicture(stFileName)

   Forms("frmView").Controls.Item("frmImage").Visible = True

   Exit Sub

errImg:

   MsgBox err.number & " " & err.Description, vbOKOnly

End Sub

ma mi da il seguente errore:

438 Proprietà o metodo non supportati dall'oggetto

Come mai? Forse sbaglio qualcosa?? Sicuramente!!

Grazie a tutti per l'aiuto.

    Avatar
    SirJo
    Messaggi: 2377
    Iscritto dal: 30 apr 2012 08:43
    Utente
    Utente

    10 giu 2019 10:48
    è tanto tempo che non lavoro con il VB6 per cui sicuramente stò dicendo una fesseria, ma sei sicuro che il codice che hai scritto è VB6 ??
    A me sembra tanto codice VB.NET

    Prova con:
    Forms("frmView").Controls("frmImage").Picture = LoadPicture(stFileName)

    Sergio
      Avatar
      alip1
      Messaggi: 72
      Iscritto dal: 30 apr 2012 09:34
      Utente
      Utente

      10 giu 2019 11:08

      No é VBA in access… comunque ho risolto.

      Il controllo image di access non vuole loadpicture ma semplicemente una stringa col nome del file (tipo .jpg,jpeg,.gif,.bmp,.png), con relativo path,  da caricare. Ho cambiato la riga in:

       Forms("frmView").Controls.Item("imgImage").Picture = stFileName

      utilizzando un controllo Image ma lo stesso vale per un form.

        Avatar
        Filvin
        Messaggi: 69
        Iscritto dal: 16 mar 2017 17:11
        Utente
        Utente

        10 giu 2019 11:28

        Ma il codice 

        Me.imgImage.Picture = stFileName

        non funziona?

        Ciao, Filippo

          Avatar
          alip1
          Messaggi: 72
          Iscritto dal: 30 apr 2012 09:34
          Utente
          Utente

          10 giu 2019 12:15
          No perché la riga viene eseguita in una routine di altro form aperto in frmview per cui per accedere ad un altro controllo di frmview occorre usare forms. .. ecc
            Solo gli utenti registrati possono rispondere ad una discussione.