Form Data Barang
Form data barang ini digunakan untuk input,edit dan delete
data barang yang ada. Form ini adalah form master yang harus ada karena ini
adalah objek penting dalam aplikasi SIP Toko ini.
Yang diperlukan dalam
pembuatannya adalah :
Object
|
Properties
|
Setting
|
Form
|
Name
|
frmJenisBarang
|
BorderStyle
|
0-None
|
|
BackColor
|
&H00FFC0C0&
|
|
StartUpPosition
|
2-CenterScreen
|
|
Label
|
Name
|
Label1
|
Font
|
Calibri
|
|
ForeColor
|
&H8000000D&
|
|
Caption
|
Form Data Barang
|
|
Textbox
|
Name
|
TxtCari
|
Appearance
|
0-Flat
|
|
Height
|
330
|
|
VBButton
|
Name
|
CmdSave
|
ButtonType
|
4-Mac
|
|
Caption
|
&Save
|
|
Name
|
CmdCancel
|
|
ButtonType
|
4-Mac
|
|
Caption
|
&Cancel
|
|
Name
|
CmdCari
|
|
ButtonType
|
4-Mac
|
|
Caption
|
&Cari
|
|
Name
|
vbButton1
|
|
ButtonType
|
3-WindowsXP
|
|
Caption
|
-
|
|
BackColor
|
&H00FFC0C0&
|
|
Name
|
vbButton2
|
|
ButtonType
|
3-WindowsXP
|
|
Caption
|
X
|
|
BackColor
|
&H00FFC0C0&
|
|
Timmer
|
Name
|
Timmer1
|
Interval
|
9000
|
|
Enabled
|
False
|
|
TDBGrid
|
Name
|
Grid
|
DeadAreaColor
|
&H00FFC0C0&
|
|
ColumnFooter
|
False
|
|
MarqueeStyle
|
2-HighlightCell
|
|
TDBGrid. Column(0)
|
DataField
|
KodeBarang
|
Caption
|
Kode Barang
|
|
TDBGrid. Column(1)
|
DataField
|
NamaBarang
|
Caption
|
Nama Barang
|
|
TDBGrid. Column(2)
|
DataField
|
Jenis
|
Caption
|
Jenis
|
|
TDBGrid. Column(3)
|
DataField
|
Satuan
|
Caption
|
Satuan
|
|
TDBGrid. Column(4)
|
DataField
|
HargaBeli
|
Caption
|
Harga Beli
|
|
TDBGrid. Column(5)
|
DataField
|
BiayaKirim
|
Caption
|
Biaya Kirim
|
|
TDBGrid. Column(6)
|
DataField
|
HargaPokok
|
Caption
|
Harga Pokok
|
|
TDBGrid. Column(7)
|
DataField
|
HargaGrosir
|
Caption
|
Harga Grosir
|
|
TDBGrid. Column(8)
|
DataField
|
HargaEcer
|
Caption
|
Harga Eceran
|
|
TDBGrid. Column(9)
|
DataField
|
StockMax
|
Caption
|
Stock Max
|
|
TDBGrid. Column(10)
|
DataField
|
StockMin
|
Caption
|
Stock Min
|
|
TDBGrid. Column(11)
|
DataField
|
Stock
|
Caption
|
Stock
|
Tampilan design form data barang
:
Tampilan form saat dijalankan :
Source Code :
Dim RsTemp As New ADODB.Recordset
Comments
Post a Comment