xianmumingxi.frm

用于三次采油技术的经济评价

VERSION 5.00
Begin VB.Form xianmumingxi 
   BorderStyle     =   1  'Fixed Single
   Caption         =   "项目明细"
   ClientHeight    =   2355
   ClientLeft      =   45
   ClientTop       =   420
   ClientWidth     =   12105
   BeginProperty Font 
      Name            =   "宋体"
      Size            =   12
      Charset         =   134
      Weight          =   400
      Underline       =   0   'False
      Italic          =   0   'False
      Strikethrough   =   0   'False
   EndProperty
   Icon            =   "xianmumingxi.frx":0000
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   2355
   ScaleWidth      =   12105
   StartUpPosition =   3  '窗口缺省
   Begin VB.TextBox Text2 
      Appearance      =   0  'Flat
      BackColor       =   &H00C0FFFF&
      BeginProperty Font 
         Name            =   "宋体"
         Size            =   10.5
         Charset         =   134
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H00FF0000&
      Height          =   2055
      Left            =   120
      MultiLine       =   -1  'True
      ScrollBars      =   2  'Vertical
      TabIndex        =   0
      Text            =   "xianmumingxi.frx":08CA
      Top             =   120
      Width           =   11055
   End
End
Attribute VB_Name = "xianmumingxi"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub Form_Load()
'Me.Show
Select Case loadtab_bz
Case 1
Me.Cls
Me.Width = frminvest.Width
Me.Top = frminvest.Height + 1000
Me.Left = frminvest.Left
Text2.Width = Me.Width - 200
huanhang = Chr(13) + Chr(10)

Text2.Text = "工程费用:" + huanhang + "包括建设工程、设备购置费、安装费用、勘探费用、新钻完井费、净化工程费等。海上石油项目，还包括海管和海工结构费、环保救生费、生产油轮或储油轮费、人工岛外平台与海底管线费、通信仪表费等，请预先计算完成。也可采用单位生产能力投资估算法、生产规模指数法、比例估算法、工程系数法、投资费用分配法等。"
Text2.Text = Text2.Text + huanhang
Text2.Text = Text2.Text + huanhang + "流动资金:"
Text2.Text = Text2.Text + huanhang + "流动资金估算可以采用按分项详细估算法和扩大指标法进行估算。" + huanhang + "(1)详细估算法: 流动资金 = 流动资产 - 流动负债；流动资产 = 应收帐款 + 存货 + 现金；应收帐款 = 年经营成本 / 周转次数；存货 = 外购材料＋燃料＋动力 + 在产品 + 产成品；流动外债 = 应付帐款。        " + huanhang + "(2)扩大指标法：按正常年经营成本25-30%，或固定资产投资的1-5%估算。"

Case 2
Me.Cls
Me.Width = frmeco.Width
Me.Top = frmeco.Height + 1000
Me.Left = frmeco.Left
Text2.Width = Me.Width - 200
huanhang = Chr(13) + Chr(10)

Text2.Text = "               通用参考参数                   "
Text2.Text = Text2.Text + huanhang + "1.基本预备费率：基本预备费为工程费用的12－15％，考虑价差预备费，此处默认为18％。"

Text2.Text = Text2.Text + huanhang + "2.成本估算：材料费、燃料费、动力费、工资费、修理费、油田维护费、污水处理费、储量使用费均按照项目实际情况取值。而职工福利费默认为工资总额的15％；修理费取折旧费的50％；折旧费按照直线折旧法，默认残值为5％，年限为6年；销售费按照销售收入的1％取值。"
Text2.Text = Text2.Text + huanhang + "3.其它开采费用：项目不同包含内容不同，如热力采油还包括热采费，海上项目三次采油则包括化学药剂费、平台操作费、海上供应费、直升飞机费、后勤费等。"
Text2.Text = Text2.Text + huanhang + "4.税收费率：增值税为价外税，原油增值税率为17％；城建税以增值税为基础，取7％；教育费附加以增值税为基础，税率默认为3％；资源税：默认为30元/吨。矿产资源补偿费为销售收入的1％。所得税国家统一征收，税率33％；油商品率统一为97％。"

End Select

End Sub