Free Web Hosting Provider - Web Hosting - E-commerce - High Speed Internet - Free Web Page
Search the Web

VisualWorld.8m.net

Visual World

Visual World presenta una sección especial dedicada a la programación de correo electronico, envia, lee y elimina mensajes de tu correo electronico desde una aplicación hecha en visual basic. Ver detalles...

A pedido del público publicaremos una sección dedicada al manejo de bases de datos con la referencia ADO, Ver detalles...

Pagina 1 - 2

Como crear un grupo de programas


Muy útil para crear instalaciones por ejemplo:

Añadir un textbox y hacerlo oculto.
Una vez oculto, escribir estas líneas sustituyendo "Nombre del Grupo" por que que se desea crear,
y que lo colocamos en Inicio -> Programas..

Crea un formulario exe standard, dibuja un commandbutton y añade el siguiente código.

Private Sub Command1_Click()
Text1.LinkTopic = "Progman|Progman"
Text1.LinkMode = 2
Text1.LinkExecute "[CreateGroup(" + "Nombre del Grupo" + ")]"
End Sub


Vaciar la carpeta de documentos de Windows


Con este código puedes ejecutar una aplicación externa desde Visual Basic, en este caso ejecutaremos el block de notas(note pad).

(ByVal lFlags As Long, ByVal lPv As Long) As Long

Private Sub Form_Load()
SHAddToRecentDocs 0, 0
End Sub

Uso adecuado de la función Random


Nos da el mismo número siempre que ejecutamos, para solucionar este problema escribe la sentencia randomize antes de utilizar rnd Observa con atención el siguiente código

Private Sub Form_Load()
Dim Num As Double
Randomize
Num = Rnd
MsgBox Num
End Sub