Una pregunta de programación de VB, ¿cómo diseñarlo para que se mueva hacia arriba, abajo, izquierda y derecha con las barras de desplazamiento horizontal y vertical? ¿Por favor proporcione el código específico?

¡Esto es simple~! Primero, debes colocar el cuadro de la imagen en un contenedor. Se recomienda encarecidamente utilizar PictureBox como contenedor. Es decir, dibuje un PictureBox en el PictureBox. Esto es más fácil de operar. ¡También te resultará conveniente tratarlo más tarde! ~No más tonterías.

Supongamos que Imagen2 es el contenedor de Imagen1, el nombre de la barra de desplazamiento horizontal es HSX y el nombre de la barra de desplazamiento vertical es VSY. Entonces el código se puede escribir así:

Private subform_Load()

Imagen 1. AutoSize = Verdadero

Imagen 1. imagen = loadpicture("Cargue la imagen en la ubicación que especifique").

Si la imagen 1. Ancho gt imagen 2. ¿Qué pasa con el ancho?

HSX. habilitado=Verdadero

HSX. Máximo = Imagen1. Imagen de ancho 2. Ancho

Otro

HSX. enable = false

finalizará si...

si image1. altura gt imagen 2. ¿Qué pasa con la altura?

VSY. habilitado=Verdadero

VSY. Máximo = Imagen1. Altura - Imagen 2. Altura

Otro

VSY. enable = false

Termina si...

Conector final

Sub-HSX_Change() privado

Imagen 1. Izquierda = (-1) * HSX. valor

Conector final

Privado HSX_Scroll()

Llamar HSX

Conector final

Sub-VSY_Change privado ()

Imagen 1. Arriba = (-1) * VSY. Valor

Conector final

VSY_Scroll()

Llamar a VSY

Conector final