⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 frmfl.frm

📁 广翔税务代理版打印,能制作非常复杂的报表.
💻 FRM
📖 第 1 页 / 共 4 页
字号:
         LCID            =   2052
         SubFormatType   =   1
      EndProperty
      DataSource      =   "Data1"
      Height          =   270
      Left            =   6810
      TabIndex        =   77
      Top             =   3570
      Width           =   1320
   End
   Begin VB.TextBox Text35 
      Alignment       =   1  'Right Justify
      DataField       =   "GeneralInvoice_Tax"
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "0.00"
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   1
      EndProperty
      DataSource      =   "Data1"
      Height          =   270
      Left            =   6810
      TabIndex        =   76
      Top             =   3270
      Width           =   1320
   End
   Begin VB.TextBox Text34 
      Alignment       =   1  'Right Justify
      DataField       =   "TaxInvoice_Tax"
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "0.00"
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   1
      EndProperty
      DataSource      =   "Data1"
      Height          =   270
      Left            =   6810
      TabIndex        =   75
      Top             =   2970
      Width           =   1320
   End
   Begin VB.TextBox Text33 
      Alignment       =   1  'Right Justify
      BackColor       =   &H80000018&
      DataField       =   "TotalInvoice_Sum"
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "0.00"
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   1
      EndProperty
      DataSource      =   "Data1"
      Height          =   270
      Left            =   5370
      TabIndex        =   74
      Top             =   3870
      Width           =   1320
   End
   Begin VB.TextBox Text32 
      Alignment       =   1  'Right Justify
      DataField       =   "NonInvoice_Sum"
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "0.00"
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   1
      EndProperty
      DataSource      =   "Data1"
      Height          =   270
      Left            =   5370
      TabIndex        =   73
      Top             =   3570
      Width           =   1320
   End
   Begin VB.TextBox Text31 
      Alignment       =   1  'Right Justify
      DataField       =   "GeneralInvoice_Sum"
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "0.00"
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   1
      EndProperty
      DataSource      =   "Data1"
      Height          =   270
      Left            =   5370
      TabIndex        =   72
      Top             =   3270
      Width           =   1320
   End
   Begin VB.TextBox Text30 
      Alignment       =   1  'Right Justify
      DataField       =   "TaxInvoice_Sum"
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "0.00"
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   1
      EndProperty
      DataSource      =   "Data1"
      Height          =   270
      Left            =   5370
      TabIndex        =   71
      Top             =   2970
      Width           =   1320
   End
   Begin VB.TextBox Text29 
      Alignment       =   2  'Center
      Height          =   270
      Left            =   3945
      Locked          =   -1  'True
      TabIndex        =   70
      Text            =   "------"
      Top             =   3870
      Width           =   1320
   End
   Begin VB.TextBox Text28 
      Alignment       =   1  'Right Justify
      DataField       =   "NonInvoice_Num"
      DataSource      =   "Data1"
      Height          =   270
      Left            =   3945
      TabIndex        =   69
      Top             =   3570
      Width           =   1320
   End
   Begin VB.TextBox Text27 
      Alignment       =   1  'Right Justify
      DataField       =   "GeneralInvoice_Num"
      DataSource      =   "Data1"
      Height          =   270
      Left            =   3945
      TabIndex        =   68
      Top             =   3270
      Width           =   1320
   End
   Begin VB.TextBox Text26 
      Alignment       =   1  'Right Justify
      DataField       =   "TaxInvoice_Num"
      BeginProperty DataFormat 
         Type            =   0
         Format          =   "0.00"
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   0
      EndProperty
      DataSource      =   "Data1"
      Height          =   270
      Left            =   3945
      TabIndex        =   67
      Top             =   2970
      Width           =   1320
   End
   Begin VB.TextBox Text25 
      Alignment       =   1  'Right Justify
      DataField       =   "Payable_EndBalance"
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "0.00"
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   1
      EndProperty
      DataSource      =   "Data1"
      Height          =   270
      Left            =   6810
      TabIndex        =   66
      Top             =   2370
      Width           =   1320
   End
   Begin VB.TextBox Text24 
      Alignment       =   1  'Right Justify
      DataField       =   "Receivable_EndBalance"
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "0.00"
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   1
      EndProperty
      DataSource      =   "Data1"
      Height          =   270
      Left            =   6810
      TabIndex        =   65
      Top             =   2070
      Width           =   1320
   End
   Begin VB.TextBox Text23 
      Alignment       =   1  'Right Justify
      DataField       =   "Stock_EndBalance"
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "0.00"
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   1
      EndProperty
      DataSource      =   "Data1"
      Height          =   270
      Left            =   6810
      TabIndex        =   64
      Top             =   1770
      Width           =   1320
   End
   Begin VB.TextBox Text22 
      Alignment       =   2  'Center
      Height          =   270
      Left            =   6810
      Locked          =   -1  'True
      TabIndex        =   63
      Text            =   "------"
      Top             =   1470
      Width           =   1320
   End
   Begin VB.TextBox Text21 
      Alignment       =   1  'Right Justify
      DataField       =   "Cost_EndBalance"
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "0.00"
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   1
      EndProperty
      DataSource      =   "Data1"
      Height          =   270
      Left            =   6810
      TabIndex        =   62
      Top             =   1155
      Width           =   1320
   End
   Begin VB.TextBox Text20 
      Alignment       =   2  'Center
      Height          =   270
      Left            =   6810
      Locked          =   -1  'True
      TabIndex        =   61
      Text            =   "------"
      Top             =   870
      Width           =   1320
   End
   Begin VB.TextBox Text19 
      Alignment       =   1  'Right Justify
      DataField       =   "Payable_BeginBalance"
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "0.00"
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   1
      EndProperty
      DataSource      =   "Data1"
      Height          =   270
      Left            =   5370
      TabIndex        =   60
      Top             =   2370
      Width           =   1320
   End
   Begin VB.TextBox Text18 
      Alignment       =   1  'Right Justify
      DataField       =   "Receivable_BeginBalance"
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "0.00"
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   1
      EndProperty
      DataSource      =   "Data1"
      Height          =   270
      Left            =   5370
      TabIndex        =   59
      Top             =   2070
      Width           =   1320
   End
   Begin VB.TextBox Text17 
      Alignment       =   1  'Right Justify
      DataField       =   "Stock_BeginBalance"
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "0.00"
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   1
      EndProperty
      DataSource      =   "Data1"
      Height          =   270
      Left            =   5370
      TabIndex        =   58
      Top             =   1770
      Width           =   1320
   End
   Begin VB.TextBox Text16 
      Alignment       =   2  'Center
      Height          =   270
      Left            =   5370
      Locked          =   -1  'True
      TabIndex        =   57
      Text            =   "------"
      Top             =   1470
      Width           =   1320
   End
   Begin VB.TextBox Text15 
      Alignment       =   1  'Right Justify
      DataField       =   "Cost_BeginBalance"
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "0.00"
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   1
      EndProperty
      DataSource      =   "Data1"
      Height          =   270
      Left            =   5370
      TabIndex        =   56
      Top             =   1170
      Width           =   1320
   End
   Begin VB.TextBox Text14 
      Alignment       =   2  'Center
      Height          =   270
      Left            =   5370
      Locked          =   -1  'True
      TabIndex        =   55
      Text            =   "------"
      Top             =   870
      Width           =   1320
   End
   Begin VB.TextBox Text13 
      Alignment       =   2  'Center
      Height          =   270
      Left            =   3945
      Locked          =   -1  'True
      TabIndex        =   54
      Text            =   "------"
      Top             =   2370
      Width           =   1320
   End
   Begin VB.TextBox Text12 
      Alignment       =   2  'Center
      Height          =   270
      Left            =   3945
      Locked          =   -1  'True
      TabIndex        =   53
      Text            =   "------"
      Top             =   2070
      Width           =   1320
   End
   Begin VB.TextBox Text11 
      Alignment       =   2  'Center
      Height          =   270
      Left            =   3945
      Locked          =   -1  'True
      TabIndex        =   52
      Text            =   "------"
      Top             =   1770
      Width           =   1320
   End
   Begin VB.TextBox Text10 
      Alignment       =   1  'Right Justify
      DataField       =   "Profit_YearNumber"
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "0.00"
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0
         LCID            =   2052
         SubFormatType   =   1
      EndProperty
      DataSource      =   "Data1"
      Height          =   270
      Left            =   3945
      TabIndex        =   51
      Top             =   1470
      Width           =   1320
   End
   Begin VB.TextBox Text9 
      Alignment       =   1  'Right Justify
      DataField       =   "Cost_YearNumber"
      BeginProperty DataFormat 
         Type            =   1
         Format          =   "0.00"
         HaveTrueFalseNull=   0
         FirstDayOfWeek  =   0
         FirstWeekOfYear =   0

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -