Martin Sanchez

Es algo muy sencillo ' Obtener la fecha actual Hoy = Format(Date$, "dd/mm/yyyy") ' pedir fecha de naciemiento por inputbox F_Nacimiento = InputBox("Ingresa tu fecha de nacimiento dd/mm/aaaa") ' Calcular edad edad = Year(Hoy) - Year(F_Nacimiento) '...

Buscando que, debes ser más especifico al preguntar así podemos ayudarte mejor

Ok mira este código te puede ayudar mucho, lo que busca es una coincidencia con lo que quieres buscar Adodc1.RecordSource = "Select * from TABLA where CAMPO like '%" & TEXTBOX & "%'" Adodc1. Refresh Esta consulta te entregara todas las coincidencias...

Puedes hacer lo siguiente Dim Ruta as string CommonDialog1.DialogTitle = "Selecciona el archivo" CommonDialog1.Filter = "Ejecutables EXE|*.exe" CommonDialog1.ShowOpen Ruta = CommonDialog1.FileName Text1.Text = ruta

Este error te lo envia cuando al hacer tu consulta en la BDA e ingresar los valores obtenidos a un control uno o varios campos no estan llenos (NULL) por lo que te envia este error, para corregirlo puedes usar un if isnull(CAMPO DE LA BASE DE DATOS)...

Podrías hacer la consulta de esta forma dim periodo, matricula as string periodo = inputbox("Ingresa el periodo a consultar") matricula = inputbox("Ingresa la matricula a consultar") Adoc1.recordsourse="Select * from TABLA where clv_periodo =' " &...

A ver si te entendí bien hay te va podría meter esta consulta en el evento clic de un botón. La consulta va al contol ado vinculado con tu datagrid Adodc1, Adodc2... etc) Adodc1.RecordSourse="Select * From TABLA_DE_TU_BASE Where...