📄 main.prg
字号:
Column5.Width = 30, ;
Column5.Name = "Column5", ;
Column6.ControlSource = "kh.zw", ;
Column6.Width = 58, ;
Column6.Name = "Column6", ;
Column7.ControlSource = "kh.th", ;
Column7.Width = 70, ;
Column7.Name = "Column7", ;
Column8.ControlSource = "kh.sj", ;
Column8.Width = 71, ;
Column8.Name = "Column8", ;
Column9.ControlSource = "kh.bb", ;
Column9.Width = 66, ;
Column9.Name = "Column9", ;
Column10.ControlSource = "kh.gztz", ;
Column10.Width = 88, ;
Column10.Name = "Column10", ;
Column11.ControlSource = "kh.lx", ;
Column11.Width = 50, ;
Column11.Name = "Column11", ;
Column12.ControlSource = "kh.zzth", ;
Column12.Name = "Column12", ;
Column13.ControlSource = "kh.bj", ;
Column13.Name = "Column13", ;
Column14.ControlSource = "kh.rq", ;
Column14.Width = 52, ;
Column14.Name = "Column14", ;
Column15.ControlSource = "kh.jtzz", ;
Column15.Name = "Column15", ;
Column16.ControlSource = "kh.rh", ;
Column16.Width = 88, ;
Column16.Name = "Column16", ;
Column17.ControlSource = "kh.rrxm", ;
Column17.Width = 49, ;
Column17.Name = "Column17", ;
Column18.ControlSource = "kh.rrdw", ;
Column18.Name = "Column18", ;
Column19.ControlSource = "kh.zy", ;
Column19.Width = 40, ;
Column19.Name = "Column19", ;
Column20.ControlSource = "kh.zyxm", ;
Column20.Width = 51, ;
Column20.Name = "Column20", ;
Column21.ControlSource = "kh.zydw", ;
Column21.Name = "Column21"
ADD OBJECT main.pageframe1.page2.grid1.column1.header1 AS header WITH ;
Alignment = 2, ;
Caption = "选择", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column1.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column2.header1 AS header WITH ;
Alignment = 2, ;
Caption = "编号", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column2.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column3.header1 AS header WITH ;
Alignment = 2, ;
Caption = "姓名", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column3.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column4.header1 AS header WITH ;
Alignment = 2, ;
Caption = "单位", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column4.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column5.header1 AS header WITH ;
Alignment = 2, ;
Caption = "性别", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column5.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column6.header1 AS header WITH ;
Alignment = 2, ;
Caption = "职务", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column6.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column7.header1 AS header WITH ;
Alignment = 2, ;
Caption = "单位电话", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column7.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column8.header1 AS header WITH ;
Alignment = 2, ;
Caption = "手机", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column8.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column9.header1 AS header WITH ;
Alignment = 2, ;
Caption = "BB机", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column9.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column10.header1 AS header WITH ;
Alignment = 2, ;
Caption = "单位地址", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column10.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column11.header1 AS header WITH ;
Alignment = 2, ;
Caption = "客户类型", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column11.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column12.header1 AS header WITH ;
Alignment = 2, ;
Caption = "住宅电话", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column12.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column13.header1 AS header WITH ;
Alignment = 2, ;
Caption = "背景", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column13.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column14.header1 AS header WITH ;
Alignment = 2, ;
Caption = "出生日期", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column14.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column15.header1 AS header WITH ;
Alignment = 2, ;
Caption = "家庭住址", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column15.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column16.header1 AS header WITH ;
Alignment = 2, ;
Caption = "个人爱好", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column16.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column17.header1 AS header WITH ;
Alignment = 2, ;
Caption = "爱人姓名", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column17.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column18.header1 AS header WITH ;
Alignment = 2, ;
Caption = "爱人单位", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column18.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column19.header1 AS header WITH ;
Alignment = 2, ;
Caption = "子或女", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column19.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column20.header1 AS header WITH ;
Alignment = 2, ;
Caption = "子女姓名", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column20.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.grid1.column21.header1 AS header WITH ;
Alignment = 2, ;
Caption = "子女单位", ;
Name = "Header1"
ADD OBJECT main.pageframe1.page2.grid1.column21.text1 AS textbox WITH ;
BorderStyle = 0, ;
Margin = 0, ;
ForeColor = RGB(0,0,0), ;
BackColor = RGB(255,255,255), ;
Name = "Text1"
ADD OBJECT main.pageframe1.page2.optiongroup1 AS optiongroup WITH ;
ButtonCount = 6, ;
Value = 1, ;
Height = 60, ;
Left = 271, ;
Top = 356, ;
Width = 228, ;
TabIndex = 15, ;
Name = "Optiongroup1", ;
Option1.FontBold = .T., ;
Option1.FontSize = 11, ;
Option1.Caption = "编号", ;
Option1.Value = 1, ;
Option1.Height = 16, ;
Option1.Left = 12, ;
Option1.Top = 9, ;
Option1.Width = 63, ;
Option1.ForeColor = RGB(255,0,0), ;
Option1.Name = "Option1", ;
Option2.FontBold = .T., ;
Option2.FontSize = 11, ;
Option2.Caption = "姓名", ;
Option2.Height = 16, ;
Option2.Left = 82, ;
Option2.Top = 9, ;
Option2.Width = 63, ;
Option2.ForeColor = RGB(255,0,0), ;
Option2.Name = "Option2", ;
Option3.FontBold = .T., ;
Option3.FontSize = 11, ;
Option3.Caption = "性别", ;
Option3.Height = 16, ;
Option3.Left = 156, ;
Option3.Top = 10, ;
Option3.Width = 63, ;
Option3.ForeColor = RGB(255,0,0), ;
Option3.Name = "Option3", ;
Option4.FontBold = .T., ;
Option4.FontSize = 11, ;
Option4.Caption = "职务", ;
Option4.Height = 16, ;
Option4.Left = 12, ;
Option4.Top = 30, ;
Option4.Width = 63, ;
Option4.ForeColor = RGB(255,0,0), ;
Option4.Name = "Option4", ;
Option5.FontBold = .T., ;
Option5.FontSize = 11, ;
Option5.Caption = "类型", ;
Option5.Height = 16, ;
Option5.Left = 83, ;
Option5.Top = 32, ;
Option5.Width = 63, ;
Option5.ForeColor = RGB(255,0,0), ;
Option5.Name = "Option5", ;
Option6.FontBold = .T., ;
Option6.FontSize = 11, ;
Option6.Caption = "单位", ;
Option6.Height = 16, ;
Option6.Left = 156, ;
Option6.Top = 33, ;
Option6.Width = 63, ;
Option6.ForeColor = RGB(255,0,0), ;
Option6.Name = "Option6"
ADD OBJECT main.pageframe1.page2.label1 AS label WITH ;
AutoSize = .T., ;
FontBold = .T., ;
FontName = "楷体_GB2312", ;
FontSize = 12, ;
Caption = "排序方式=>", ;
Height = 20, ;
Left = 174, ;
Top = 375, ;
Width = 89, ;
TabIndex = 16, ;
ForeColor = RGB(128,0,255), ;
Name = "Label1"
ADD OBJECT main.pageframe1.page2.command3 AS commandbutton WITH ;
Top = 425, ;
Left = 335, ;
Height = 37, ;
Width = 72, ;
FontBold = .T., ;
FontSize = 11, ;
Caption = "排序确认", ;
TabIndex = 17, ;
ForeColor = RGB(255,0,128), ;
Name = "Command3"
ADD OBJECT main.pageframe1.page2.commandgroup1 AS commandgroup WITH ;
ButtonCount = 3, ;
Value = 1, ;
Height = 108, ;
Left = 71, ;
Top = 355, ;
Width = 101, ;
TabIndex = 19, ;
Name = "Commandgroup1", ;
Command1.Top = 11, ;
Command1.Left = 6, ;
Command1.Height = 30, ;
Command1.Width = 90, ;
Command1.FontBold = .T., ;
Command1.FontSize = 11, ;
Command1.Caption = "全部选定", ;
Command1.ForeColor = RGB(255,0,128), ;
Command1.Name = "Command1", ;
Command2.Top = 40, ;
Command2.Left = 6, ;
Command2.Height = 30, ;
Command2.Width = 90, ;
Command2.FontBold = .T., ;
Command2.FontSize = 11, ;
Command2.Caption = "全部取消", ;
Command2.ForeColor = RGB(255,0,128), ;
Command2.Name = "Command2", ;
Command3.Top = 69, ;
Command3.Left = 6, ;
Command3.Height = 30, ;
Command3.Width = 90, ;
Command3.FontBold = .T., ;
Command3.FontSize = 11, ;
Command3.Caption = "选择或取消", ;
Command3.ForeColor = RGB(255,0,128), ;
Command3.Name = "Command3"
ADD OBJECT main.pageframe1.page2.label2 AS label WITH ;
AutoSize = .T., ;
FontBold = .T., ;
FontName = "楷体_GB2312", ;
FontSize = 14, ;
Caption = "设置查询条件=>", ;
Height = 24, ;
Left = 23, ;
Top = 57, ;
Width = 151, ;
TabIndex = 21, ;
ForeColor = RGB(0,0,255), ;
Name = "Label2"
ADD OBJECT main.pageframe1.page2.command4 AS commandbutton WITH ;
Top = 367, ;
Left = 551, ;
Height = 37, ;
Width = 104, ;
FontBold = .T., ;
FontSize = 12, ;
Caption = "打印客户表", ;
ForeColor = RGB(255,0,128), ;
Name = "Command4"
ADD OBJECT main.pageframe1.page3.image1 AS image WITH ;
Picture = "fox2.bmp", ;
Height = 120, ;
Left = 579, ;
Top = 77, ;
Width = 96, ;
Name = "Image1"
ADD OBJECT main.pageframe1.page3.optiongroup1 AS optiongroup WITH ;
ButtonCount = 7, ;
Value = 1, ;
Height = 270, ;
Left = 32, ;
Top = 85, ;
Width = 216, ;
TabIndex = 2, ;
Name = "Optiongroup1", ;
Option1.FontBold = .T., ;
Option1.FontName = "楷体_GB2312", ;
Option1.FontSize = 14, ;
Option1.Caption = "设置客户职务", ;
Option1.Value = 1, ;
Option1.Height = 24, ;
Option1.Left = 19, ;
Option1.Top = 39, ;
Option1.Width = 154, ;
Option1.AutoSize = .T., ;
Option1.ForeColor = RGB(255,0,128), ;
Option1.Name = "Option1", ;
Option2.FontBold = .T., ;
Option2.FontName = "楷体_GB2312", ;
Option2.FontSize = 14, ;
Option2.Caption = "设置客户类型", ;
Option2.Height = 24, ;
Option2.Left = 19, ;
Option2.Top = 71, ;
Option2.Width = 154, ;
Option2.AutoSize = .T., ;
Option2.ForeColor = RGB(255,0,128), ;
Option2.Name = "Option2", ;
Option3.FontBold = .T., ;
Option3.FontName = "楷体_GB2312", ;
Option3.FontSize = 14, ;
Option3.Caption = "数据初始化", ;
Option3.Height = 24, ;
Option3.Left = 19, ;
Option3.Top = 224, ;
Option3.Width = 133, ;
Option3.AutoSize = .T., ;
Option3.ForeColor = RGB(255,0,128), ;
Option3.Name = "Option3", ;
Option4.FontBold = .T., ;
Option4.FontName = "楷体_GB2312", ;
Option4.FontSize = 14, ;
Option4.Caption = "修改系统密码", ;
Option4.Height = 24, ;
Option4.Left = 19, ;
Option4.Top = 100, ;
Option4.Width = 154, ;
Option4.AutoSize = .T., ;
Option4.ForeColor = RGB(255,0,128), ;
Option4.Name = "Option4", ;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -