General information
| Events list |
Properties list | Control
list
General
information
Preview
PROJECT
vbsample
TYPE
form
Last modification date
21/01/02
Size
14 Kb
Used functions
cmdClose.cmdClose_Click
frmSalesOrder.Form_Resize
Header.
Purpose
This form displays the information of a salesorder
Description
This form allows the end user to display, update or delete a sales
order.
History
NOVALYS - 2001/10/20 - Creation
Properties
of frmSalesOrder
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 )
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( )
| lblLabels |
Label |
"Sales Rep.:" |
| lblLabels |
Label |
"Region:" |
| lblLabels |
Label |
"Order Date:" |
| lblLabels |
Label |
"Customer ID:" |
| lblLabels |
Label |
"Order ID:" |
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 )