Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: [sadiko] en 4 Junio 2008, 03:24 am



Título: como pongo en posision aleatoria el msgbox???
Publicado por: [sadiko] en 4 Junio 2008, 03:24 am
bueno lo que quiero saber es que como pongo el posision aleatoria el msgbox

lo que estoy asiendo es una broma que cuando el user pulse el boton de si aparescan 20 msgbox pero todos apareces en la parte de enmedio y quiero que cada vez que cierre uno aparezca otro en diferente posision de la pantalla

aqui les dejo el codigo para que vean mas o menos que es lo que quiero hacer

Código:
Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
For a = 1 To 20
b = MsgBox("Y Ahora??", vbExclamation, "By Sadiko")
Next a
End Sub
'en esta parte del comand 2 si pulsa "no" la sentensia se repite infinitamente :P
Private Sub Command2_Click()
Dim a As Integer
For a = 1 To 20
a = MsgBox("Sha Como de que no", vbCritical, "By Sadiko")
Next a
End Sub


salu2 ::)


Título: Re: como pongo en posision aleatoria el msgbox???
Publicado por: cobein en 4 Junio 2008, 03:43 am
Un poco de google no lastima a nadie

http://www.planetsourcecode.com/vb/scripts/ShowCode.asp?txtCodeId=7165&lngWId=1


Título: Re: como pongo en posision aleatoria el msgbox???
Publicado por: seba123neo en 4 Junio 2008, 03:47 am
Hola,usa el api:

Posicionar un MsgBox En cualquier parte de la pantalla Usando el API y AddressOf (http://www.elguille.info/VB/avanzado/posMsgBox.htm)

saludos.