Visual basic
Public: Las variables declaradas serán publicas y podrán estar accesibles desde todos los formularios de la aplicación. Para conseguirlo tendremos que declararlas en un módulo de código, no en la sección declarations de cualquier formulario de los que conste la aplicación.
Static: Con esta forma de declarar variables conseguiremos que las variables locales no se creen y se destruyan alentrar y salir de los procedimientos donde fueron declaradas sino que se mantenga su valor durante todo el periodo de ejecución de la aplicación. De esta forma al entrar en algún procedimiento las variables recuerdan el valor que tenían cuando se salió de él.
Dim Matriz(4 to 10) as integer.
Option explicit obliga a declarar las variables.
Procedimientos
Procedimientos Sub que no devuelven unvalor.
Procedimientos Function que devuelven un valor (normalmente conocidos como funciones).
A diferencia de los procedimientos Sub, los procedimientos Function pueden devolver un valor al procedimiento que realiza la llamada.
Se los puede llamar asi:
Call MiProc (PrimerArgumento, SegundoArgumento).
MiProc PrimerArgumento, SegundoArgumento.
Por defecto los valores se pasan por referenciabyref esto significa que se modifican los datos del argumento que se pasa a la funcion, pero si se escribe byval se pasan los datos por valor esto hace que el dato se modifique solo dentro de la funcion.
Do until
Loop
Do
Loop until
Do
Loop while
If then
else
endif
for a = 1 to 4 step 3
next
select case a
case 0
funcion0
case 1
funcion1
caseelse
otrafuncion
end select
Funcionesgenerales
Dim a, b, c as integer Si no se escribe ningún tipo se declara como variant
‘ Comentarios
_ escribir en el renglón de abajo
Trim(text1) saca espacios en blanco delante y detrás del text
App.Path dirección donde se guarda el programa
Form
Unload me cierra frm
End finaliza programa
Frm2.show ver formulario show vbmodal no vuelve hasta no cerrar el formulario frm2.
Un formpuede ser el principal si se lo selecciona como tal en: menu proyecto, propiedades de proyecto, general, objeto inicial.
Chr(nro) ascii correspondiente a ese nro
Mod, len, mid, right, left, val
Format(a / 4, "##########,##0.00")
Str(a)
Private Sub txt1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 then si tecla es enter
End sub
Propiedades generales de los controles
Los objetostienen propiedades, metodos y eventos
propiedades
Name: nombre del control
Apparence: flat, 3d
Borderstyle:borde del frm
Caption: nombre a mostrar
Enabled:active control
Incon: icono del control
Visible: ver el control
Top, left posiciones
Width, heigth ancho y alto
Mdichild: si es hijo de otro frm
Tabindex: posición para el tab
Locked: bloquea control
Font: fuente tamaño y tipo de letraBackcolor: color del control
Tooltiptext: texto que visualiza cuando pasa el puntero del mouse
Setfocus: toma el foco del programa
Eventos
Click
Change
Private Sub Form_KeyPress(keyascii As Integer)
Private Sub objeto_KeyPress([índice As Integer,]keyascii As Integer)
Cambiar keyascii a 0 cancela la operación de esa tecla.
Private Sub Form_QueryUnload(cancelar As Integer, modo_descargaAs Integer)
Private Sub MDIForm_QueryUnload(cancelar As Integer, modo_descarga As Integer)
Private Sub Form_QueryUnload (Cancel As Integer, UnloadMode As Integer)
Dim Msg ' Declara la variable.
If UnloadMode > 0 Then
' Si sale de la aplicación.
Msg = "¿Realmente desea salir de la aplicación?"
Else ' Si sólo se cierra el formulario.
Msg = "¿Realmente desea cerrar el formulario?"
End If
' Si el usuario hace clic en el botón No, se detiene QueryUnload.
If MsgBox(Msg, vbQuestion + vbYesNo, Me.Caption) = vbNo Then Cancel = True
End Sub
Metodos
Additem
Drag
Move
Clear
Activecontrol:devuelve el...
Regístrate para leer el documento completo.