Es una página en la cual te puedes auxiliar en caso de problemas, especialmente con el programa Visual Basic.
これは、Visual Basicプログラムで、特に問題が発生した場合に助けることができるページです。
jueves, 26 de mayo de 2011,12:14
¿Cómo resolver una ecuacion cuadrática?
Una ecuacion cuadrática del tipo Ax2+BX+C=0 se puede resolver con la fórmula general.
Se obtendrán dos raices (x1 y x2) determinadas por:
x1=(-B + sqr (B ^ 2 - 4 * A * C)) / (2 * A)
x2=(-B - sqr (B ^ 2 - 4 * A * C)) / (2 * A)
En estas ecuaciones, sqr es la funcion de Visual Basic para obtener la raíz cuadrada.
1.- Crea la interfaz del programa según se muestra. Cambia los nombres de los controles como sigue: txtA, txtB, txtC, txtX1, txtX2, cmdCalcular, cmdLimpiar, cmdSalir.
2.- En la venta de código declara las variables A,B,C,X1 y X2 dentro del evento click del botón de calcular. Como estas variables pueden contener números decimales, usa el tipo de Single.
Private Sub cmdCalcular_Click()
Dim A,B,C,X1,X2 as Single
3.- Asigna a las variables A, B y C los valores de las cajas de texto correspondientes.
A = Val (txtA.Text)
B = Val (txtB.Text)
A = Val (txtB.Text)
la funcion Val obtiene el valor númerico de una cadena de caracteres
4.-El botón Calcular realizará los cálculos necesarios con las variables para obtener los resultados X1 y X2.
x1=(-B + sqr (B ^ 2 - 4 * A * C)) / (2 * A)
x1=(-B - sqr (B ^ 2 - 4 * A * C)) / (2 * A)
5.- Las cajas de texto para los resultados desplegarán los valores finales de X1 y X2
txtX1.text = X1
txtX2.text = X2
6.- El botón limpiar borra los contenidos de todas las cajas de texto
Private Sub cmdLimpiar_Click()
txtA.text = ""
txtB.text = ""
...etc.
7.- El botón Salir termina el programa (puedes usar el comando End).
Private Sub cmdSalir_Click()
End
End Sub
8.- Si el valor de A es cero, ocurrirá un error. Cuando el usuario presione el botón de Calcular, debes revisar si A es diferente de cero, antes de realizar los calculos. Si A tiene el valor de cero, no se deben realizar los cálculos y se deben borrar automáticamente todos los datos de las cajas de texto.
9.- Cuando termines el programa pruébalo con las siguientes ecuaciones.
a) x2+2x-3=0 x1= x2=
b) 4x2+12x+6=0 x1= x2=
c) 2x2+x=0 x1= x2=
Se obtendrán dos raices (x1 y x2) determinadas por:
x1=(-B + sqr (B ^ 2 - 4 * A * C)) / (2 * A)
x2=(-B - sqr (B ^ 2 - 4 * A * C)) / (2 * A)
En estas ecuaciones, sqr es la funcion de Visual Basic para obtener la raíz cuadrada.
1.- Crea la interfaz del programa según se muestra. Cambia los nombres de los controles como sigue: txtA, txtB, txtC, txtX1, txtX2, cmdCalcular, cmdLimpiar, cmdSalir.
2.- En la venta de código declara las variables A,B,C,X1 y X2 dentro del evento click del botón de calcular. Como estas variables pueden contener números decimales, usa el tipo de Single.
Private Sub cmdCalcular_Click()
Dim A,B,C,X1,X2 as Single
3.- Asigna a las variables A, B y C los valores de las cajas de texto correspondientes.
A = Val (txtA.Text)
B = Val (txtB.Text)
A = Val (txtB.Text)
la funcion Val obtiene el valor númerico de una cadena de caracteres
4.-El botón Calcular realizará los cálculos necesarios con las variables para obtener los resultados X1 y X2.
x1=(-B + sqr (B ^ 2 - 4 * A * C)) / (2 * A)
x1=(-B - sqr (B ^ 2 - 4 * A * C)) / (2 * A)
5.- Las cajas de texto para los resultados desplegarán los valores finales de X1 y X2
txtX1.text = X1
txtX2.text = X2
6.- El botón limpiar borra los contenidos de todas las cajas de texto
Private Sub cmdLimpiar_Click()
txtA.text = ""
txtB.text = ""
...etc.
7.- El botón Salir termina el programa (puedes usar el comando End).
Private Sub cmdSalir_Click()
End
End Sub
8.- Si el valor de A es cero, ocurrirá un error. Cuando el usuario presione el botón de Calcular, debes revisar si A es diferente de cero, antes de realizar los calculos. Si A tiene el valor de cero, no se deben realizar los cálculos y se deben borrar automáticamente todos los datos de las cajas de texto.
9.- Cuando termines el programa pruébalo con las siguientes ecuaciones.
a) x2+2x-3=0 x1= x2=
b) 4x2+12x+6=0 x1= x2=
c) 2x2+x=0 x1= x2=
jueves, 19 de mayo de 2011,12:01
Gestión de Base de Datos Access
Las tablas de una base de datos se controlan por medio de un objeto llamado Data. Este objeto incluye controles para navegar por la tabla y tiene métodos simples para agregar o modificar registros, a través de un objeto llamado Recordset.
En terminos sencillos, un objeto Recorset es una tabla que contiene los datos. Un Recordset se encuentra formado por filas (registros) y columnas (campos), a las que deberemos hacer referencia para poder acceder a sus datos.
Éstos son los principales métodos del objeto Recordset:
AddNew ----> Agrega un nuevo registro a la base de datos
Delete ----> Elimina el registro actual de la base de datos
MoveFirst ----> Se ubica en el primer registro
MoveNext ----> Avanza al siguiente registro
MoveLast ----> Se ubica en el último registro
MovePrevious ----> Retrocede al registro anterior
En terminos sencillos, un objeto Recorset es una tabla que contiene los datos. Un Recordset se encuentra formado por filas (registros) y columnas (campos), a las que deberemos hacer referencia para poder acceder a sus datos.
Éstos son los principales métodos del objeto Recordset:
AddNew ----> Agrega un nuevo registro a la base de datos
Delete ----> Elimina el registro actual de la base de datos
MoveFirst ----> Se ubica en el primer registro
MoveNext ----> Avanza al siguiente registro
MoveLast ----> Se ubica en el último registro
MovePrevious ----> Retrocede al registro anterior
La forma de utilizarlos con la notación punto, es nombrado el control Data, luego la palabra Recordset y al final el método.
Por ejemplo: Estas 2 lineas borrarán el primer registro de la tabla:
Datal.Recordset.MoveFirst
Datal.Recordset.Delete
Tambien es importante que tomes en cuenta algunas propiedades, que de no ser consideradas, podrían generar errores al trabajar con los registros.
- BOF: Esta propiedad es verdadera (true) cuando el registro actual es el primer registro (beginning of fine)
- EOF: Esta propiedad es verdadera (true) cuando el registro actual es el último registro (End of file)
,11:47
Colecciones
Una coleccion de controles se crea de manera automática cada vez que se crea un nuevo formilario. Cada colección contenida en programa tiene su propio nombre para poder referirse a ella y alos objetos que contiene. Debido a que puedes tener más de un formulario en un programa, deberás incluir el nombre del formulario cuando quieras hacer referencia a esa coleccion.
Para hacer referencia a una coleccion se usa la siguiente sintaxis:
formulario.Controls!objeto
Para hacer referencia a una coleccion se usa la siguiente sintaxis:
formulario.Controls!objeto
,11:40
Manejo de menús
El editor de menús de Visual Basic es una herramienta grafica que gestiona los menús contenidos en tus programas. Podras añadir nuevos menús y submenús, modificarlos, reordenarlos, asignar a tus menús teclas de acceso (atajos con el teclado) y más. Podrás ejecutar acciones a través de tus propios menús, tal y como lo has venido haciendo con botones.
,11:36
Procedimiento y Funciones
Un procedimeinto nos sirve para realizar una tarea concreta que probablemente se vaya a requerir varias veces a lo largo del programa. Esta tarea se especifica en un bloque de código de manera independiente.
Una función tiene exactamente el mismo objeto, pero con la diferencia de que devuelve un valor, por lo que siempre debe usarse en conjunto con una variable que guardara el resultado de la funcion.
Lo primero que debemos hacer al crear un procedmiento o función es pensar las cosas que se desean hacer, la informacion que necesitaremos y,en el caso de las funciones, la informacion que se devolverá.
Para un Procedimiento
Sub nombre ([argumentos opcionales])
... Código del procedimiento
End sub
Para una Funcion
Function nombre (parámetros)
... Código de la función
End Sub
Una función tiene exactamente el mismo objeto, pero con la diferencia de que devuelve un valor, por lo que siempre debe usarse en conjunto con una variable que guardara el resultado de la funcion.
Lo primero que debemos hacer al crear un procedmiento o función es pensar las cosas que se desean hacer, la informacion que necesitaremos y,en el caso de las funciones, la informacion que se devolverá.
Para un Procedimiento
Sub nombre ([argumentos opcionales])
... Código del procedimiento
End sub
Para una Funcion
Function nombre (parámetros)
... Código de la función
End Sub