📄 hz3.prg
字号:
**************************************************
*-- 类: hz3 (e:\jcxt\user.vcx)
*-- 父类: form
*-- 基类: form
*
DEFINE CLASS hz3 AS form
Top = 0
Left = 0
Height = 581
Width = 790
DoCreate = .T.
Caption = "财政检查汇总表"
Closable = .F.
FontName = "黑体"
FontSize = 12
WindowState = 0
Name = "Form1"
ADD OBJECT grid1 AS grid WITH ;
ColumnCount = 10, ;
FontBold = .T., ;
DeleteMark = .F., ;
HeaderHeight = 30, ;
Height = 512, ;
Left = 0, ;
Panel = 1, ;
RowHeight = 16, ;
ScrollBars = 0, ;
Top = 0, ;
Width = 780, ;
Name = "Grid1", ;
Column1.FontBold = .T., ;
Column1.ControlSource = "hzb3.bj", ;
Column1.Width = 15, ;
Column1.Visible = .T., ;
Column1.Name = "Column1", ;
Column2.FontBold = .T., ;
Column2.ControlSource = "hzb3.xm", ;
Column2.Width = 162, ;
Column2.ReadOnly = .T., ;
Column2.Visible = .T., ;
Column2.Name = "Column2", ;
Column3.FontBold = .T., ;
Column3.Alignment = 1, ;
Column3.ControlSource = "hzb3.sz1", ;
Column3.Width = 72, ;
Column3.Visible = .T., ;
Column3.Name = "Column3", ;
Column4.FontBold = .T., ;
Column4.Alignment = 1, ;
Column4.ControlSource = "hzb3.sz2", ;
Column4.Width = 70, ;
Column4.Visible = .T., ;
Column4.Name = "Column4", ;
Column5.FontBold = .T., ;
Column5.ControlSource = "hzb3.sz3", ;
Column5.Width = 73, ;
Column5.Visible = .T., ;
Column5.Name = "Column5", ;
Column6.FontBold = .T., ;
Column6.ControlSource = "hzb3.sz4", ;
Column6.Width = 73, ;
Column6.Visible = .T., ;
Column6.Name = "Column6", ;
Column7.FontBold = .T., ;
Column7.ControlSource = "hzb3.sz5", ;
Column7.Width = 67, ;
Column7.Visible = .T., ;
Column7.Name = "Column7", ;
Column8.FontBold = .T., ;
Column8.ControlSource = "hzb3.sz6", ;
Column8.Width = 65, ;
Column8.Visible = .T., ;
Column8.Name = "Column8", ;
Column9.FontBold = .T., ;
Column9.ControlSource = "hzb3.sz7", ;
Column9.Width = 70, ;
Column9.Visible = .T., ;
Column9.Name = "Column9", ;
Column10.FontBold = .T., ;
Column10.ControlSource = "hzb3.bz", ;
Column10.Width = 75, ;
Column10.Visible = .T., ;
Column10.Name = "Column10"
ADD OBJECT hz3.grid1.column1.header1 AS header WITH ;
FontBold = .T., ;
Caption = "科", ;
Name = "Header1"
ADD OBJECT hz3.grid1.column1.text1 AS textbox WITH ;
FontBold = .T., ;
Alignment = 0, ;
BorderStyle = 0, ;
ControlSource = "hzb2.bj", ;
Margin = 0, ;
Visible = .T., ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT hz3.grid1.column2.header1 AS header WITH ;
FontBold = .T., ;
Alignment = 2, ;
Caption = "项 目", ;
Name = "Header1"
ADD OBJECT hz3.grid1.column2.text1 AS textbox WITH ;
FontBold = .T., ;
Alignment = 0, ;
BorderStyle = 0, ;
ControlSource = "hzb2.xm", ;
Margin = 0, ;
ReadOnly = .T., ;
Visible = .T., ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT hz3.grid1.column3.header1 AS header WITH ;
FontBold = .T., ;
Alignment = 2, ;
Caption = "审前末余额", ;
Name = "Header1"
ADD OBJECT hz3.grid1.column3.text1 AS textbox WITH ;
FontBold = .T., ;
DateMark = "z", ;
Alignment = 2, ;
BorderStyle = 0, ;
ControlSource = "hzb2.sz1", ;
Format = "", ;
InputMask = "", ;
Margin = 0, ;
Visible = .T., ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT hz3.grid1.column4.header1 AS header WITH ;
FontBold = .T., ;
Alignment = 2, ;
Caption = "CPA末余额", ;
Name = "Header1"
ADD OBJECT hz3.grid1.column4.text1 AS textbox WITH ;
FontBold = .T., ;
Alignment = 1, ;
BorderStyle = 0, ;
ControlSource = "hzb2.sz2", ;
InputMask = "", ;
Margin = 0, ;
Visible = .T., ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT hz3.grid1.column5.header1 AS header WITH ;
FontBold = .T., ;
Alignment = 2, ;
Caption = "审后末余额", ;
Name = "Header1"
ADD OBJECT hz3.grid1.column5.text1 AS textbox WITH ;
FontBold = .T., ;
Alignment = 1, ;
BorderStyle = 0, ;
InputMask = "", ;
Margin = 0, ;
Visible = .T., ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT hz3.grid1.column6.header1 AS header WITH ;
FontBold = .T., ;
Alignment = 2, ;
Caption = "核查末余额", ;
Name = "Header1"
ADD OBJECT hz3.grid1.column6.text1 AS textbox WITH ;
FontBold = .T., ;
Alignment = 1, ;
BorderStyle = 0, ;
InputMask = "", ;
Margin = 0, ;
Visible = .T., ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT hz3.grid1.column7.header1 AS header WITH ;
FontBold = .T., ;
Alignment = 2, ;
Caption = "CPA样本内", ;
Name = "Header1"
ADD OBJECT hz3.grid1.column7.text1 AS textbox WITH ;
FontBold = .T., ;
Alignment = 1, ;
BorderStyle = 0, ;
InputMask = "", ;
Margin = 0, ;
Visible = .T., ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT hz3.grid1.column8.header1 AS header WITH ;
FontBold = .T., ;
Alignment = 2, ;
Caption = "CPA样本外", ;
Name = "Header1"
ADD OBJECT hz3.grid1.column8.text1 AS textbox WITH ;
FontBold = .T., ;
Alignment = 1, ;
BorderStyle = 0, ;
InputMask = "", ;
Margin = 0, ;
Visible = .T., ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT hz3.grid1.column9.header1 AS header WITH ;
FontBold = .T., ;
Alignment = 2, ;
Caption = "小 计", ;
Name = "Header1"
ADD OBJECT hz3.grid1.column9.text1 AS textbox WITH ;
FontBold = .T., ;
Alignment = 1, ;
BorderStyle = 0, ;
InputMask = "", ;
Margin = 0, ;
Visible = .T., ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT hz3.grid1.column10.header1 AS header WITH ;
FontBold = .T., ;
Alignment = 2, ;
Caption = "备 注", ;
Name = "Header1"
ADD OBJECT hz3.grid1.column10.text1 AS textbox WITH ;
FontBold = .T., ;
BorderStyle = 0, ;
ControlSource = "hzb2.bz", ;
Margin = 0, ;
Visible = .T., ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT label1 AS label WITH ;
AutoSize = .T., ;
FontBold = .T., ;
Caption = "填报日期", ;
Height = 16, ;
Left = 7, ;
Top = 529, ;
Width = 55, ;
ForeColor = RGB(0,0,255), ;
Name = "Label1"
ADD OBJECT label2 AS label WITH ;
AutoSize = .T., ;
FontBold = .T., ;
Caption = "负责人", ;
Height = 16, ;
Left = 146, ;
Top = 530, ;
Width = 42, ;
ForeColor = RGB(0,0,255), ;
Name = "Label2"
ADD OBJECT label3 AS label WITH ;
AutoSize = .T., ;
FontBold = .T., ;
Caption = "编制人员", ;
Height = 16, ;
Left = 273, ;
Top = 529, ;
Width = 55, ;
ForeColor = RGB(0,0,255), ;
Name = "Label3"
ADD OBJECT label4 AS label WITH ;
AutoSize = .T., ;
FontBold = .T., ;
Caption = "联系电话", ;
Height = 16, ;
Left = 416, ;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -