Il quesito è il seguente:
In una userform ho inserito un controllo immagine (image1) e con il codice che segue carico le immagini
in base al dato che leggo in una delle combobox, e sino a quì tutto ok.......
- Codice: Seleziona tutto
Dim s As String
Dim sPath As String
Dim pic As IPictureDisp
s = ComboBoxCat.Text
sPath = "C:\Mia Cartella\Foto\"
Set pic = LoadPicture(sPath & s & ".jpg")
With Me.Image1
.Picture = pic
End With
Ora il miei problemi sono 2.
1 Come posso far caricare una determinata foto se nella cartella delle foto l'immagine corrispondente
al dato nella combobox non c'è?
Controllo presenza foto in cartella ,ma come?
2 Come posso fare ad adattare le immagini caricate alla dimensione del controllo immagine presente nella userform?
Spero di essere stato chiaro!!!!
Grazie a tutti.