Actividad pública reciente
Ha valorado "Excelente" la respuesta
Cursor al final..
Para dar solución a tu problema debes realizar lo siguiente, asumiendo que te encuentras trabajando en un text1.. 'Asegurarnos que reciba el foco Text1.SetFocus 'La posición del caracter inicial es la longitud del texto... Text1.SelStart = Len(Text1)...
Ha valorado "Excelente" la respuesta
Funciones de cadena...
Algo encontré por acá.. Estas funciones tienen una versión ANSI/DBCS y una versión binaria o versión Unicode, como se muestra en la tabla siguiente. Utiliza las funciones apropiadas dependiendo del propósito de la manipulación de cadenas. Las...
Ha valorado "Excelente" la respuesta
Ms-dos
Claro, al igual que un ejecutable de entorno Windows, ¿recuerdas? Private Sub Command1_Click() Shell "C:\WINDOWS\COMMAND\EDIT.COM", vbNormalFocus End Sub Se hace igual.. pruébalo..
Ha valorado "Excelente" la respuesta
DirListBox, DriveListBox y FileListBox
Ok.. Analiza el siguiente ejemplo, si necesitas más ayuda me avisas.. Para ver el funcionamiento de este pequeño visor de iconos necesitamos colocar en un Form1 (default) los siguientes controles: 1 Control DriveListBox 1 Control DirListBox 1 Control...
Ha valorado "Excelente" la respuesta
Botones de opción..
Pon ese código en el evento Activate del form.. eso es todo..
Ha valorado "Excelente" la respuesta
Usar un List
Espero que te encuentres muy bien, tengo un código que me gustaría que estudiaras, al menos a mi me funciona bien.. revísalo y adáptalo, está hecho con conexión a Access 2000.. Option Explicit Dim myConn As ADODB.Connection Dim myRecSet As...
Ha valorado "Excelente" la respuesta
Enviar mail..
Acá te envío mi ayuda.. Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, _ ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, _ ByVal lpDirectory As String, ByVal...
Ha valorado "Excelente" la respuesta
Puntero del mouse..
Efectivamente se puede realizar este procedimiento de ocultar o hacer aparecer el mouse... Fíjate en el siguiente ejemplo.. Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long Private Sub cmdOcultar_Click() resultado =...
