【VB开源代码栏目提醒】：网学会员为广大网友收集整理了，FMRCIN.frm，希望对大家有所帮助！
VERSION 5.00
Object = "{67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0"; "MSADODC.OCX"
Object = "{CDE57A40-8B86-11D0-B3C6-00A0C90AEA82}#1.0#0"; "MSDATGRD.OCX"
Begin VB.Form FMRCIN
Caption = "进货单处理"
ClientHeight = 7170
ClientLeft = 3375
ClientTop = 3105
ClientWidth = 9795
LinkTopic = "Form1"
ScaleHeight = 7170
ScaleWidth = 9795
StartUpPosition = 2 '屏幕中心
Begin VB.TextBox RIGCT
DataField = "RIGCT"
DataSource = "Adodc2"
Height = 270
Left = 855
TabIndex = 64
Top = 6840
Width = 1600
End
Begin VB.TextBox RIGCS
DataField = "RIGCS"
DataSource = "Adodc2"
Height = 270
Left = 855
TabIndex = 63
Top = 6540
Width = 1600
End
Begin VB.TextBox RIGCN
DataField = "RIGCN"
DataSource = "Adodc2"
Height = 270
Left = 855
TabIndex = 62
Top = 6240
Width = 1600
End
Begin VB.TextBox RIUNP
DataField = "RIUNP"
DataSource = "Adodc2"
Height = 270
Left = 855
TabIndex = 61
Top = 5640
Width = 1600
End
Begin VB.TextBox BGENO
DataField = "BGENO"
DataSource = "Adodc2"
Height = 270
Left = 855
TabIndex = 60
Top = 5340
Width = 1600
End
Begin VB.TextBox RIITM
DataField = "RIITM"
DataSource = "Adodc2"
Enabled = 0 'False
Height = 270
Left = 855
TabIndex = 59
Top = 4980
Width = 1600
End
Begin VB.TextBox Text1
DataField = "RIENO"
DataSource = "Adodc2"
Enabled = 0 'False
Height = 270
Left = 855
TabIndex = 58
Top = 4680
Width = 1600
End
Begin VB.CommandButton BTN_DELB
Caption = "删除数据"
Height = 615
Left = 8040
Picture = "FMRCIN.frx":0000
Style = 1 'Graphical
TabIndex = 57
Top = 6480
Width = 1695
End
Begin VB.CommandButton BTN_INSB
Caption = "新增数据"
Height = 615
Left = 8040
Picture = "FMRCIN.frx":0102
Style = 1 'Graphical
TabIndex = 56
Top = 5760
Width = 1695
End
Begin VB.CommandButton Command3
Caption = "..."
Height = 270
Left = 2520
TabIndex = 55
Top = 5340
Width = 255
End
Begin VB.TextBox RIENO
DataField = "RIENO"
DataSource = "Adodc1"
Height = 270
Left = 855
TabIndex = 17
Top = 120
Width = 1200
End
Begin VB.TextBox RITYP
DataField = "RITYP"
DataSource = "Adodc1"
Height = 270
Left = 2895
TabIndex = 19
Top = 120
Width = 1200
End
Begin VB.TextBox RIDAT
DataField = "RIDAT"
DataSource = "Adodc1"
Height = 270
Left = 855
TabIndex = 21
Top = 500
Width = 1200
End
Begin VB.TextBox BNENO
DataField = "BNENO"
DataSource = "Adodc1"
Height = 270
Left = 840
TabIndex = 23
Top = 800
Width = 1200
End
Begin
VB.TextBox BSENO
DataField = "BSENO"
DataSource = "Adodc1"
Height = 270
Left = 855
TabIndex = 25
Top = 1100
Width = 1200
End
Begin VB.TextBox RIINO
DataField = "RIINO"
DataSource = "Adodc1"
Height = 270
Left = 855
TabIndex = 27
Top = 1400
Width = 1200
End
Begin VB.TextBox RIIID
DataField = "RIIID"
DataSource = "Adodc1"
Height = 270
Left = 2880
TabIndex = 29
Top = 1100
Width = 1200
End
Begin VB.TextBox RIIAD
DataField = "RIIAD"
DataSource = "Adodc1"
Height = 270
Left = 2895
TabIndex = 31
Top = 1400
Width = 1200
End
Begin VB.TextBox RIPAY
DataField = "RIPAY"
DataSource = "Adodc1"
Height = 270
Left = 855
TabIndex = 33
Top = 1700
Width = 1200
End
Begin VB.TextBox RIEXG
DataField = "RIEXG"
DataSource = "Adodc1"
Height = 270
Left = 2880
TabIndex = 35
Top = 1700
Width = 1200
End
Begin VB.TextBox RIAM1
DataField = "RIAM1"
DataSource = "Adodc1"
Height = 270
Left = 855
TabIndex = 37
Top = 2760
Width = 1200
End
Begin VB.TextBox RIAM2
DataField = "RIAM2"
DataSource = "Adodc1"
Height = 270
Left = 855
TabIndex = 39
Top = 3120
Width = 1200
End
Begin VB.TextBox RIAMT
DataField = "RIAMT"
DataSource = "Adodc1"
Height = 270
Left = 2895
TabIndex = 41
Top = 3120
Width = 1200
End
Begin VB.TextBox RISA1
DataField = "RISA1"
DataSource = "Adodc1"
Height = 270
Left = 855
TabIndex = 43
Top = 2000
Width = 1200
End
Begin VB.TextBox RISA2
DataField = "RISA2"
DataSource = "Adodc1"
Height = 270
Left = 2895
TabIndex = 45
Top = 2000
Width = 1200
End
Begin VB.TextBox RISA3
DataField = "RISA3"
DataSource = "Adodc1"
Height = 270
Left = 855
TabIndex = 47
Top = 2300
Width = 1200
End
Begin VB.TextBox RISA4
DataField = "RISA4"
DataSource = "Adodc1"
Height = 270
Left = 2895
TabIndex = 49
Top = 2300
Width = 1200
End
Begin VB.TextBox RIMRK
DataField = "RIMRK"
DataSource = "Adodc1"
Height = 990
Left = 855
TabIndex = 51
Top = 3480
Width = 3240
End
Begin VB.TextBox RISNO
DataField = "RISNO"
DataSource = "Adodc1"
Height = 270
Left = 2895
TabIndex = 53
Top = 800
Width = 1200
End
Begin VB.CommandButton BTN_QUT
Caption = "结束"
Height
相关文章
2013-9-1
