fvomaster

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...

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 =...

El Grid tiene una propiedad Columns que hace referencia a la columna en cuestión. La columna tiene otro objeto ValueItems que determina el aspecto de la columna. La propiedad Presentación de este objeto determina el modo de presentación. El valor 4...

La función Date$ devuelve la fecha del sistema en un string con el formato MM-DD-AAAA. Date devuelve un variant con el formato de fecha especificado en el Panel de Control (puede devolver, por ejemplo, DD-MM-AA). Si queremos realizar cálculos con...

Encontré para ti el siguiente código... Seleccionar todo el texto: Text1. SetFocus Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text) Copiar texto: Clipboard. Clear Clipboard. SetText Text1. SelText Text1. SetFocus Pegar texto: Text1.SelText =...

Ok, veamos el siguiente código.. Private Declare Function GetVolumeInformation& Lib "kernel32" Alias "GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal pVolumeNameBuffer As String, ByVal nVolumeNameSize As Long, lpVolumeSerialNumber As...

Revisa el siguiente código que encontré para que lo adaptes y pruebes.. Crear un formulario y escribir el siguiente código: Private Type SHFILEOPSTRUCT hWnd As Long wFunc As Long pFrom As String pTo As String fFlags As Integer fAnyOperationsAborted...

`Por favor, revisa el siguiente ejemplo que he creado.. Insertar un ListBox y dos Botones en un nuevo proyecto. Poner la propiedad MultiSelect del ListBox a "1 - Simple" y escribe el siguiente código: Private Declare Function SendMessageLong Lib...

acá nos vamos con la respuesta.. Lo haré de la forma más detallada posible, para que este texto lo pegues en un procesador y lo puedas imprimir, así todo se te hará más fácil... 1) Hagamos la conexión a la base de datos. Public conexion As...

Debes complementar tú código de la siguiente manera.. Private Sub txthi_GOTFOCUS() txtHI.selstart=0 txtHI.SelLength = Len(Trim(txtHI.Text)) End Sub Es decir que la selección del texto comience desde el carácter número 0.. Pruébalo y hablamos..