Red de conocimiento informático - Problemas con los teléfonos móviles - Problemas de programación de VB (puestos en primer plano)

Problemas de programación de VB (puestos en primer plano)

Coloque un Temporizador (Timer1) en el formulario y luego escriba el siguiente código en el código del formulario:

Privado

Declarar

Función

SetWindowPos&

Lib

"user32"

(ByVal

hwnd

Tanto

Long,

ByVal

hWndInsertAfter

Tan

Long,

PorVal

x

Como

Largo,

PorVal

y

Tan

Largo,

PorVal

cx

Tan

Largo,

ByVal

cy

Como

Long,

ByVal

wFlags

Como

Largo)

Dim

SetTop

Privado

Sub

Form_Load ()

Temporizador1.Enabled

=

Verdadero

Temporizador1.Intervalo

=

10

Fin

Sub

Privado

Sub

Timer1_Timer()

SetTop

=

SetWindowPos(Me.hwnd,

-1,

0,

0,

0,

0,

3)

Fin

Sub

El contenido es una cita, dirección original:

/question/62437495.html