Hombre..rollo mas o menos es lo mismo pero si, seria más optimo, eso sin duda.
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúPrivate Sub Command1_Click()
Dim numero As Byte
Randomize
numero = Rnd
Text1.Text = numero
End Sub
MessengerApi.Messenger.xxxxxxxx
Option Explicit
Public WithEvents MSN As Messenger
Private Sub Form_Load()
Set MSN = New Messenger
End Sub