fvomaster

Para ordenar los registros de tu datagrid: Asume que estoy usando un adodc con nombre adodc1 para llenar el data, entonces.. Si tu tabla a consultar fuera Productos y quisieras ordenar por Nombre_Producto en orden ascendente quedaría.....

En este caso debes validar el evento keypress de tu objeto de tal manera que sólo te acepte sólo valores numéricos. Observa el siguiente ejemplo para un textbox llamado text1 Private Sub text1_KeyPress(keyascii As Integer) If keyascii = 13 Then 'Si...

A ver, imaginemos la siguiente situación, tu tienes una tabla en Access que se llama Productos y tiene los campos Clave_Producto y Nombre_producto.. Para intentar guardar tu información usas un data, pero antes de guardar debes verificar que la clave...

Espero que te encuentres muy bien, por favor, realiza el siguiente procedimiento.. Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As Any, ByVal uReturnLength As...

Espero que te encuentres muy bien, ¿por lo que veo "me" es un adodc cierto?, veremos este tema con varias posibles soluciones Si "Me" es un adodc quedaría. (Aunque creo que con esto haces referencia al form, al menos así se programa en Access)...

En este caso tienes la posibilidad de hacer dos cosas.. Primero: Utilizar la función Round, para redondear a la cantidad de decimales que desees.. por ejemplo, redondeo el valor que esté en text1 a dos decimales. text1.text=Round(text1.text,2)...

A continuación te explico lo que necesitarías para enviar y recibir mails respectivamente mediante programación en Visual 6.. Envío de e-mail desde VB: 1.- Adjuntar al proyecto los controles MAPI (Proyecto/Componentes y señalar Microsoft MAPI...

Utiliza el siguiente código: éste te arroja el nombre de usuario y el nombre de ubicación de archivos temporales, adecualo.. Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As...

En éste caso encontré el método utilizando una API, revísala por si acaso te sirviera.. Declaramos en el formulario : Const LB_FINDSTRING = &H18F Private Declare Function SendMessage Lib "User32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg...

Te presentaré mi solución con un ejemplo para que lo revises.. En un formulario añadimos un ListBox y declaramos : Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _ (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long,...