General information
| Events list |
Properties list | Function
list | Control list
General
information
Preview
PROJECT
vbsample
TYPE
Form
Last modification date
11/02/02
Size
20 Kb
Used functions
mnuOpenfrmemployee.mnuOpenfrmemployee_Click
cmdClose.cmdClose_Click
frmemployee.Form_Resize
mnuNewfrmemployee.mnuNewfrmemployee_Click
Header
Purpose
This form displays the information of the employees
Description
This form allows the end user to display, update or delete all employees
information.
History
NOVALYS - 2001/10/20 - Creation
Properties
of frmemployee
USER PROPERTIES
| NAME |
DATATYPE |
Functions/Events referencing |
STANDARD PROPERTIES
| NAME |
DATATYPE |
Functions/Events referencing |
| ScaleWidth |
|
frmSalesOrder.Form_Resize
frmDocument.Form_Resize |
| ScaleHeight |
|
frmSalesOrder.Form_Resize
frmemployee.Form_Resize
frmDocument.Form_Resize |
| MDIChild |
|
|
| LinkTopic |
|
|
| KeyPreview |
|
|
| Caption |
|
frmAbout.Form_Load
frmMain.LoadNewDoc |
Events
list
private sub Form_Load(
)
private
sub Form_Resize( )
private
sub Form_KeyDown( KeyCode as Integer , Shift as Integer )
private
sub Form_Unload( Cancel as Integer )
Function
list
public
function CallByNameSample( test as String ) as Integer
Controls
list and it's events
| cmdCancel |
CommandButton |
"&Cancel" |
private
sub cmdCancel_Click( )
| cmdUpdate |
CommandButton |
"&Update" |
private
sub cmdUpdate_Click( )
| cmdClose |
CommandButton |
"&Close" |
private
sub cmdClose_Click( )
| cmdRefresh |
CommandButton |
"&Refresh" |
private
sub cmdRefresh_Click( )
| cmdDelete |
CommandButton |
"&Delete" |
private
sub cmdDelete_Click( )
| cmdEdit |
CommandButton |
"&Edit" |
private
sub cmdEdit_Click( )
| cmdAdd |
CommandButton |
"&Add" |
private
sub cmdAdd_Click( )
private
sub cmdLast_Click( )
private
sub cmdNext_Click( )
| cmdPrevious |
CommandButton |
|
private
sub cmdPrevious_Click( )
private
sub cmdFirst_Click( )
private
sub adoPrimaryRS_MoveComplete( byval adReason as ADODB.EventReasonEnum ,
byval pError as ADODB.Error , adStatus as ADODB.EventStatusEnum , byval
pRecordset as ADODB.Recordset )
private
sub adoPrimaryRS_WillChangeRecord( byval adReason as ADODB.EventReasonEnum
, byval cRecords as Long , adStatus as ADODB.EventStatusEnum , byval pRecordset
as ADODB.Recordset )