La programación de imágenes VB inserta imágenes, pero las imágenes solo se muestran lentamente y son solo una pequeña parte

Tu forma de cargar imágenes es relativamente lenta. Usar el método LoadPicture será muy rápido y la imagen se mostrará fielmente.

El código es el siguiente:

Private Sub Command1_Click()

CDlg1.DialogTitle = "Abrir archivo" 'CDlg1 es un control de cuadro de diálogo común

CDlg1.Filter = "Imágenes(*.bmp)!*.bmp"

CDlg1.ShowOpen

Fin Sub

Subcomando privado2_Click ()

Imagen1.Picture = LoadPicture(CDlg1.FileName)

Fin Sub

Subcomando privado3_Click()

Fin

Fin Sub