terramar

terramar

 Morelos, México @terramar desde - visto

Actividad pública reciente

Ha valorado "Excelente" la respuesta

Cursor al final..

respondió: 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...

respondió: 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

respondió: 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

respondió: 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..

respondió: Pon ese código en el evento Activate del form.. eso es todo..
Ha valorado "Excelente" la respuesta

Usar un List

respondió: 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..

respondió: 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..

respondió: 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 =...