上传用户:zhpu1995
上传日期:2013-09-06
资源大小:61151k
文件大小:146k
源码类别:

企业管理

开发平台:

Visual Basic

  1. VERSION 5.00
  2. Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "mscomctl.ocx"
  3. Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
  4. Begin VB.Form Kpgl_jbcz 
  5.    AutoRedraw      =   -1  'True
  6.    BorderStyle     =   3  'Fixed Dialog
  7.    Caption         =   "卡片基本操作"
  8.    ClientHeight    =   7080
  9.    ClientLeft      =   45
  10.    ClientTop       =   330
  11.    ClientWidth     =   9510
  12.    HelpContextID   =   503001
  13.    Icon            =   "资产卡片基本操作.frx":0000
  14.    KeyPreview      =   -1  'True
  15.    LinkTopic       =   "Form1"
  16.    MaxButton       =   0   'False
  17.    MinButton       =   0   'False
  18.    ScaleHeight     =   7080
  19.    ScaleWidth      =   9510
  20.    ShowInTaskbar   =   0   'False
  21.    StartUpPosition =   2  '屏幕中心
  22.    Begin TabDlg.SSTab SSTab1 
  23.       Height          =   6435
  24.       Left            =   45
  25.       TabIndex        =   53
  26.       Top             =   600
  27.       Width           =   9405
  28.       _ExtentX        =   16589
  29.       _ExtentY        =   11351
  30.       _Version        =   393216
  31.       Style           =   1
  32.       Tabs            =   2
  33.       TabsPerRow      =   2
  34.       TabHeight       =   520
  35.       BackColor       =   -2147483648
  36.       TabCaption(0)   =   "基本信息"
  37.       TabPicture(0)   =   "资产卡片基本操作.frx":1042
  38.       Tab(0).ControlEnabled=   -1  'True
  39.       Tab(0).Control(0)=   "Label30"
  40.       Tab(0).Control(0).Enabled=   0   'False
  41.       Tab(0).Control(1)=   "Label34"
  42.       Tab(0).Control(1).Enabled=   0   'False
  43.       Tab(0).Control(2)=   "Label50"
  44.       Tab(0).Control(2).Enabled=   0   'False
  45.       Tab(0).Control(3)=   "Label51"
  46.       Tab(0).Control(3).Enabled=   0   'False
  47.       Tab(0).Control(4)=   "Label54"
  48.       Tab(0).Control(4).Enabled=   0   'False
  49.       Tab(0).Control(5)=   "Label55"
  50.       Tab(0).Control(5).Enabled=   0   'False
  51.       Tab(0).Control(6)=   "Line8"
  52.       Tab(0).Control(6).Enabled=   0   'False
  53.       Tab(0).Control(7)=   "Line7"
  54.       Tab(0).Control(7).Enabled=   0   'False
  55.       Tab(0).Control(8)=   "Line12"
  56.       Tab(0).Control(8).Enabled=   0   'False
  57.       Tab(0).Control(9)=   "Line11"
  58.       Tab(0).Control(9).Enabled=   0   'False
  59.       Tab(0).Control(10)=   "Label43"
  60.       Tab(0).Control(10).Enabled=   0   'False
  61.       Tab(0).Control(11)=   "Label42"
  62.       Tab(0).Control(11).Enabled=   0   'False
  63.       Tab(0).Control(12)=   "Label39"
  64.       Tab(0).Control(12).Enabled=   0   'False
  65.       Tab(0).Control(13)=   "Label38"
  66.       Tab(0).Control(13).Enabled=   0   'False
  67.       Tab(0).Control(14)=   "Label37"
  68.       Tab(0).Control(14).Enabled=   0   'False
  69.       Tab(0).Control(15)=   "Label36"
  70.       Tab(0).Control(15).Enabled=   0   'False
  71.       Tab(0).Control(16)=   "Label35"
  72.       Tab(0).Control(16).Enabled=   0   'False
  73.       Tab(0).Control(17)=   "Label33"
  74.       Tab(0).Control(17).Enabled=   0   'False
  75.       Tab(0).Control(18)=   "Label32"
  76.       Tab(0).Control(18).Enabled=   0   'False
  77.       Tab(0).Control(19)=   "Label31"
  78.       Tab(0).Control(19).Enabled=   0   'False
  79.       Tab(0).Control(20)=   "Lbl_FactValue"
  80.       Tab(0).Control(20).Enabled=   0   'False
  81.       Tab(0).Control(21)=   "Label29"
  82.       Tab(0).Control(21).Enabled=   0   'False
  83.       Tab(0).Control(22)=   "Lbl_Operator"
  84.       Tab(0).Control(22).Enabled=   0   'False
  85.       Tab(0).Control(23)=   "Label27"
  86.       Tab(0).Control(23).Enabled=   0   'False
  87.       Tab(0).Control(24)=   "Label26"
  88.       Tab(0).Control(24).Enabled=   0   'False
  89.       Tab(0).Control(25)=   "Label25"
  90.       Tab(0).Control(25).Enabled=   0   'False
  91.       Tab(0).Control(26)=   "Label24"
  92.       Tab(0).Control(26).Enabled=   0   'False
  93.       Tab(0).Control(27)=   "Label23"
  94.       Tab(0).Control(27).Enabled=   0   'False
  95.       Tab(0).Control(28)=   "Label22"
  96.       Tab(0).Control(28).Enabled=   0   'False
  97.       Tab(0).Control(29)=   "Label21"
  98.       Tab(0).Control(29).Enabled=   0   'False
  99.       Tab(0).Control(30)=   "Line6"
  100.       Tab(0).Control(30).Enabled=   0   'False
  101.       Tab(0).Control(31)=   "Line5"
  102.       Tab(0).Control(31).Enabled=   0   'False
  103.       Tab(0).Control(32)=   "Label19"
  104.       Tab(0).Control(32).Enabled=   0   'False
  105.       Tab(0).Control(33)=   "Label18"
  106.       Tab(0).Control(33).Enabled=   0   'False
  107.       Tab(0).Control(34)=   "Label17"
  108.       Tab(0).Control(34).Enabled=   0   'False
  109.       Tab(0).Control(35)=   "Label16"
  110.       Tab(0).Control(35).Enabled=   0   'False
  111.       Tab(0).Control(36)=   "Line4"
  112.       Tab(0).Control(36).Enabled=   0   'False
  113.       Tab(0).Control(37)=   "Line3"
  114.       Tab(0).Control(37).Enabled=   0   'False
  115.       Tab(0).Control(38)=   "Label15"
  116.       Tab(0).Control(38).Enabled=   0   'False
  117.       Tab(0).Control(39)=   "Label14"
  118.       Tab(0).Control(39).Enabled=   0   'False
  119.       Tab(0).Control(40)=   "Label13"
  120.       Tab(0).Control(40).Enabled=   0   'False
  121.       Tab(0).Control(41)=   "Label12"
  122.       Tab(0).Control(41).Enabled=   0   'False
  123.       Tab(0).Control(42)=   "Label11"
  124.       Tab(0).Control(42).Enabled=   0   'False
  125.       Tab(0).Control(43)=   "Label10"
  126.       Tab(0).Control(43).Enabled=   0   'False
  127.       Tab(0).Control(44)=   "Label9"
  128.       Tab(0).Control(44).Enabled=   0   'False
  129.       Tab(0).Control(45)=   "Label8"
  130.       Tab(0).Control(45).Enabled=   0   'False
  131.       Tab(0).Control(46)=   "Line2"
  132.       Tab(0).Control(46).Enabled=   0   'False
  133.       Tab(0).Control(47)=   "Line1"
  134.       Tab(0).Control(47).Enabled=   0   'False
  135.       Tab(0).Control(48)=   "Label7"
  136.       Tab(0).Control(48).Enabled=   0   'False
  137.       Tab(0).Control(49)=   "Lbl_Period"
  138.       Tab(0).Control(49).Enabled=   0   'False
  139.       Tab(0).Control(50)=   "Label5"
  140.       Tab(0).Control(50).Enabled=   0   'False
  141.       Tab(0).Control(51)=   "Lbl_Year"
  142.       Tab(0).Control(51).Enabled=   0   'False
  143.       Tab(0).Control(52)=   "Label3"
  144.       Tab(0).Control(52).Enabled=   0   'False
  145.       Tab(0).Control(53)=   "Lbl_Num"
  146.       Tab(0).Control(53).Enabled=   0   'False
  147.       Tab(0).Control(54)=   "Label1"
  148.       Tab(0).Control(54).Enabled=   0   'False
  149.       Tab(0).Control(55)=   "lrtext(11)"
  150.       Tab(0).Control(55).Enabled=   0   'False
  151.       Tab(0).Control(56)=   "lrtext(19)"
  152.       Tab(0).Control(56).Enabled=   0   'False
  153.       Tab(0).Control(57)=   "lrtext(8)"
  154.       Tab(0).Control(57).Enabled=   0   'False
  155.       Tab(0).Control(58)=   "lrtext(9)"
  156.       Tab(0).Control(58).Enabled=   0   'False
  157.       Tab(0).Control(59)=   "lrtext(10)"
  158.       Tab(0).Control(59).Enabled=   0   'False
  159.       Tab(0).Control(60)=   "lrtext(26)"
  160.       Tab(0).Control(60).Enabled=   0   'False
  161.       Tab(0).Control(61)=   "lrtext(16)"
  162.       Tab(0).Control(61).Enabled=   0   'False
  163.       Tab(0).Control(62)=   "lrtext(1)"
  164.       Tab(0).Control(62).Enabled=   0   'False
  165.       Tab(0).Control(63)=   "ydcommand(1)"
  166.       Tab(0).Control(63).Enabled=   0   'False
  167.       Tab(0).Control(64)=   "lrtext(31)"
  168.       Tab(0).Control(64).Enabled=   0   'False
  169.       Tab(0).Control(65)=   "lrtext(30)"
  170.       Tab(0).Control(65).Enabled=   0   'False
  171.       Tab(0).Control(66)=   "lrtext(32)"
  172.       Tab(0).Control(66).Enabled=   0   'False
  173.       Tab(0).Control(67)=   "lrtext(29)"
  174.       Tab(0).Control(67).Enabled=   0   'False
  175.       Tab(0).Control(68)=   "lrtext(27)"
  176.       Tab(0).Control(68).Enabled=   0   'False
  177.       Tab(0).Control(69)=   "lrtext(28)"
  178.       Tab(0).Control(69).Enabled=   0   'False
  179.       Tab(0).Control(70)=   "lrtext(25)"
  180.       Tab(0).Control(70).Enabled=   0   'False
  181.       Tab(0).Control(71)=   "lrtext(24)"
  182.       Tab(0).Control(71).Enabled=   0   'False
  183.       Tab(0).Control(72)=   "lrtext(21)"
  184.       Tab(0).Control(72).Enabled=   0   'False
  185.       Tab(0).Control(73)=   "lrtext(23)"
  186.       Tab(0).Control(73).Enabled=   0   'False
  187.       Tab(0).Control(74)=   "lrtext(22)"
  188.       Tab(0).Control(74).Enabled=   0   'False
  189.       Tab(0).Control(75)=   "lrtext(20)"
  190.       Tab(0).Control(75).Enabled=   0   'False
  191.       Tab(0).Control(76)=   "lrtext(12)"
  192.       Tab(0).Control(76).Enabled=   0   'False
  193.       Tab(0).Control(77)=   "lrtext(7)"
  194.       Tab(0).Control(77).Enabled=   0   'False
  195.       Tab(0).Control(78)=   "lrtext(18)"
  196.       Tab(0).Control(78).Enabled=   0   'False
  197.       Tab(0).Control(79)=   "lrtext(5)"
  198.       Tab(0).Control(79).Enabled=   0   'False
  199.       Tab(0).Control(80)=   "lrtext(6)"
  200.       Tab(0).Control(80).Enabled=   0   'False
  201.       Tab(0).Control(81)=   "lrtext(3)"
  202.       Tab(0).Control(81).Enabled=   0   'False
  203.       Tab(0).Control(82)=   "lrtext(15)"
  204.       Tab(0).Control(82).Enabled=   0   'False
  205.       Tab(0).Control(83)=   "lrtext(4)"
  206.       Tab(0).Control(83).Enabled=   0   'False
  207.       Tab(0).Control(84)=   "ydcommand(0)"
  208.       Tab(0).Control(84).Enabled=   0   'False
  209.       Tab(0).Control(85)=   "lrtext(0)"
  210.       Tab(0).Control(85).Enabled=   0   'False
  211.       Tab(0).Control(86)=   "lrtext(17)"
  212.       Tab(0).Control(86).Enabled=   0   'False
  213.       Tab(0).Control(87)=   "lrtext(14)"
  214.       Tab(0).Control(87).Enabled=   0   'False
  215.       Tab(0).Control(88)=   "lrtext(2)"
  216.       Tab(0).Control(88).Enabled=   0   'False
  217.       Tab(0).Control(89)=   "lrtext(13)"
  218.       Tab(0).Control(89).Enabled=   0   'False
  219.       Tab(0).Control(90)=   "ydcommand(2)"
  220.       Tab(0).Control(90).Enabled=   0   'False
  221.       Tab(0).Control(91)=   "Com_DeprMethod"
  222.       Tab(0).Control(91).Enabled=   0   'False
  223.       Tab(0).Control(92)=   "Com_Type"
  224.       Tab(0).Control(92).Enabled=   0   'False
  225.       Tab(0).Control(93)=   "ydcommand(3)"
  226.       Tab(0).Control(93).Enabled=   0   'False
  227.       Tab(0).Control(94)=   "ydcommand(4)"
  228.       Tab(0).Control(94).Enabled=   0   'False
  229.       Tab(0).Control(95)=   "ydcommand(5)"
  230.       Tab(0).Control(95).Enabled=   0   'False
  231.       Tab(0).Control(96)=   "ydcommand(6)"
  232.       Tab(0).Control(96).Enabled=   0   'False
  233.       Tab(0).Control(97)=   "ydcommand(7)"
  234.       Tab(0).Control(97).Enabled=   0   'False
  235.       Tab(0).Control(98)=   "ydcommand(8)"
  236.       Tab(0).Control(98).Enabled=   0   'False
  237.       Tab(0).Control(99)=   "ydcommand(9)"
  238.       Tab(0).Control(99).Enabled=   0   'False
  239.       Tab(0).Control(100)=   "ydcommand(10)"
  240.       Tab(0).Control(100).Enabled=   0   'False
  241.       Tab(0).Control(101)=   "ydcommand(11)"
  242.       Tab(0).Control(101).Enabled=   0   'False
  243.       Tab(0).Control(102)=   "ydcommand(12)"
  244.       Tab(0).Control(102).Enabled=   0   'False
  245.       Tab(0).ControlCount=   103
  246.       TabCaption(1)   =   "辅助信息"
  247.       TabPicture(1)   =   "资产卡片基本操作.frx":105E
  248.       Tab(1).ControlEnabled=   0   'False
  249.       Tab(1).Control(0)=   "Lblzdy(41)"
  250.       Tab(1).Control(1)=   "Lblzdy(42)"
  251.       Tab(1).Control(2)=   "Lblzdy(37)"
  252.       Tab(1).Control(3)=   "Lblzdy(38)"
  253.       Tab(1).Control(4)=   "Lblzdy(39)"
  254.       Tab(1).Control(5)=   "Lblzdy(40)"
  255.       Tab(1).Control(6)=   "Line10"
  256.       Tab(1).Control(7)=   "Line9"
  257.       Tab(1).Control(8)=   "Lblzdy(33)"
  258.       Tab(1).Control(9)=   "Lblzdy(34)"
  259.       Tab(1).Control(10)=   "Lblzdy(35)"
  260.       Tab(1).Control(11)=   "Lblzdy(36)"
  261.       Tab(1).Control(12)=   "Lblzdy(46)"
  262.       Tab(1).Control(13)=   "Lblzdy(45)"
  263.       Tab(1).Control(14)=   "Lblzdy(44)"
  264.       Tab(1).Control(15)=   "Lblzdy(43)"
  265.       Tab(1).Control(16)=   "Lblzdy(50)"
  266.       Tab(1).Control(17)=   "Lblzdy(49)"
  267.       Tab(1).Control(18)=   "Lblzdy(48)"
  268.       Tab(1).Control(19)=   "Lblzdy(47)"
  269.       Tab(1).Control(20)=   "Lblzdy(52)"
  270.       Tab(1).Control(21)=   "Lblzdy(51)"
  271.       Tab(1).Control(22)=   "Command10"
  272.       Tab(1).Control(23)=   "Command8"
  273.       Tab(1).Control(24)=   "Command6"
  274.       Tab(1).Control(25)=   "Command4"
  275.       Tab(1).Control(26)=   "Command2"
  276.       Tab(1).Control(27)=   "Command9"
  277.       Tab(1).Control(28)=   "Command7"
  278.       Tab(1).Control(29)=   "Command5"
  279.       Tab(1).Control(30)=   "Command3"
  280.       Tab(1).Control(31)=   "Command1"
  281.       Tab(1).Control(32)=   "lrtext(41)"
  282.       Tab(1).Control(33)=   "lrtext(42)"
  283.       Tab(1).Control(34)=   "lrtext(37)"
  284.       Tab(1).Control(35)=   "lrtext(38)"
  285.       Tab(1).Control(36)=   "lrtext(39)"
  286.       Tab(1).Control(37)=   "lrtext(40)"
  287.       Tab(1).Control(38)=   "lrtext(33)"
  288.       Tab(1).Control(39)=   "lrtext(34)"
  289.       Tab(1).Control(40)=   "lrtext(35)"
  290.       Tab(1).Control(41)=   "lrtext(36)"
  291.       Tab(1).Control(42)=   "lrtext(46)"
  292.       Tab(1).Control(43)=   "lrtext(45)"
  293.       Tab(1).Control(44)=   "lrtext(44)"
  294.       Tab(1).Control(45)=   "lrtext(43)"
  295.       Tab(1).Control(46)=   "lrtext(50)"
  296.       Tab(1).Control(47)=   "lrtext(49)"
  297.       Tab(1).Control(48)=   "lrtext(48)"
  298.       Tab(1).Control(49)=   "lrtext(47)"
  299.       Tab(1).Control(50)=   "lrtext(52)"
  300.       Tab(1).Control(51)=   "lrtext(51)"
  301.       Tab(1).Control(52)=   "Command11"
  302.       Tab(1).Control(53)=   "Command12"
  303.       Tab(1).Control(54)=   "Command13"
  304.       Tab(1).Control(55)=   "Command14"
  305.       Tab(1).Control(56)=   "Command15"
  306.       Tab(1).Control(57)=   "Command16"
  307.       Tab(1).Control(58)=   "Command17"
  308.       Tab(1).Control(59)=   "Command18"
  309.       Tab(1).Control(60)=   "Command19"
  310.       Tab(1).Control(61)=   "Command20"
  311.       Tab(1).ControlCount=   62
  312.       Begin VB.CommandButton ydcommand 
  313.          Height          =   300
  314.          Index           =   12
  315.          Left            =   2895
  316.          Picture         =   "资产卡片基本操作.frx":107A
  317.          Style           =   1  'Graphical
  318.          TabIndex        =   156
  319.          Top             =   4590
  320.          Width           =   300
  321.       End
  322.       Begin VB.CommandButton ydcommand 
  323.          Height          =   300
  324.          Index           =   11
  325.          Left            =   3915
  326.          Picture         =   "资产卡片基本操作.frx":1404
  327.          Style           =   1  'Graphical
  328.          TabIndex        =   155
  329.          Top             =   4155
  330.          Width           =   300
  331.       End
  332.       Begin VB.CommandButton ydcommand 
  333.          Height          =   300
  334.          Index           =   10
  335.          Left            =   8175
  336.          Picture         =   "资产卡片基本操作.frx":178E
  337.          Style           =   1  'Graphical
  338.          TabIndex        =   154
  339.          Top             =   3810
  340.          Width           =   300
  341.       End
  342.       Begin VB.CommandButton ydcommand 
  343.          Height          =   300
  344.          Index           =   9
  345.          Left            =   8175
  346.          Picture         =   "资产卡片基本操作.frx":1B18
  347.          Style           =   1  'Graphical
  348.          TabIndex        =   153
  349.          Top             =   3480
  350.          Width           =   300
  351.       End
  352.       Begin VB.CommandButton ydcommand 
  353.          Height          =   300
  354.          Index           =   8
  355.          Left            =   3915
  356.          Picture         =   "资产卡片基本操作.frx":1EA2
  357.          Style           =   1  'Graphical
  358.          TabIndex        =   152
  359.          Top             =   3480
  360.          Width           =   300
  361.       End
  362.       Begin VB.CommandButton ydcommand 
  363.          Height          =   300
  364.          Index           =   7
  365.          Left            =   3915
  366.          Picture         =   "资产卡片基本操作.frx":222C
  367.          Style           =   1  'Graphical
  368.          TabIndex        =   151
  369.          Top             =   3022
  370.          Width           =   300
  371.       End
  372.       Begin VB.CommandButton ydcommand 
  373.          Height          =   300
  374.          Index           =   6
  375.          Left            =   8175
  376.          Picture         =   "资产卡片基本操作.frx":25B6
  377.          Style           =   1  'Graphical
  378.          TabIndex        =   150
  379.          Top             =   2700
  380.          Width           =   300
  381.       End
  382.       Begin VB.CommandButton ydcommand 
  383.          Height          =   300
  384.          Index           =   5
  385.          Left            =   3915
  386.          Picture         =   "资产卡片基本操作.frx":2940
  387.          Style           =   1  'Graphical
  388.          TabIndex        =   149
  389.          Top             =   2692
  390.          Width           =   300
  391.       End
  392.       Begin VB.CommandButton ydcommand 
  393.          Height          =   300
  394.          Index           =   4
  395.          Left            =   8175
  396.          Picture         =   "资产卡片基本操作.frx":2CCA
  397.          Style           =   1  'Graphical
  398.          TabIndex        =   148
  399.          Top             =   1567
  400.          Width           =   300
  401.       End
  402.       Begin VB.CommandButton ydcommand 
  403.          Height          =   300
  404.          Index           =   3
  405.          Left            =   8175
  406.          Picture         =   "资产卡片基本操作.frx":3054
  407.          Style           =   1  'Graphical
  408.          TabIndex        =   147
  409.          Top             =   1207
  410.          Width           =   300
  411.       End
  412.       Begin VB.ComboBox Com_Type 
  413.          Height          =   300
  414.          ItemData        =   "资产卡片基本操作.frx":33DE
  415.          Left            =   7320
  416.          List            =   "资产卡片基本操作.frx":33E8
  417.          Style           =   2  'Dropdown List
  418.          TabIndex        =   146
  419.          Top             =   390
  420.          Width           =   1725
  421.       End
  422.       Begin VB.CommandButton Command20 
  423.          Height          =   300
  424.          Left            =   -66690
  425.          TabIndex        =   134
  426.          Top             =   4980
  427.          Visible         =   0   'False
  428.          Width           =   300
  429.       End
  430.       Begin VB.CommandButton Command19 
  431.          Height          =   300
  432.          Left            =   -66690
  433.          TabIndex        =   133
  434.          Top             =   4570
  435.          Visible         =   0   'False
  436.          Width           =   300
  437.       End
  438.       Begin VB.CommandButton Command18 
  439.          Height          =   300
  440.          Left            =   -66690
  441.          TabIndex        =   132
  442.          Top             =   4160
  443.          Visible         =   0   'False
  444.          Width           =   300
  445.       End
  446.       Begin VB.CommandButton Command17 
  447.          Height          =   300
  448.          Left            =   -66690
  449.          TabIndex        =   131
  450.          Top             =   3750
  451.          Visible         =   0   'False
  452.          Width           =   300
  453.       End
  454.       Begin VB.CommandButton Command16 
  455.          Height          =   300
  456.          Left            =   -66690
  457.          Style           =   1  'Graphical
  458.          TabIndex        =   130
  459.          Top             =   3340
  460.          Visible         =   0   'False
  461.          Width           =   300
  462.       End
  463.       Begin VB.CommandButton Command15 
  464.          Height          =   300
  465.          Left            =   -70980
  466.          TabIndex        =   129
  467.          Top             =   4980
  468.          Visible         =   0   'False
  469.          Width           =   300
  470.       End
  471.       Begin VB.CommandButton Command14 
  472.          Height          =   300
  473.          Left            =   -70980
  474.          TabIndex        =   128
  475.          Top             =   4570
  476.          Visible         =   0   'False
  477.          Width           =   300
  478.       End
  479.       Begin VB.CommandButton Command13 
  480.          Height          =   300
  481.          Left            =   -70980
  482.          TabIndex        =   127
  483.          Top             =   4160
  484.          Visible         =   0   'False
  485.          Width           =   300
  486.       End
  487.       Begin VB.CommandButton Command12 
  488.          Height          =   300
  489.          Left            =   -70980
  490.          TabIndex        =   126
  491.          Top             =   3750
  492.          Visible         =   0   'False
  493.          Width           =   300
  494.       End
  495.       Begin VB.CommandButton Command11 
  496.          Height          =   300
  497.          Left            =   -70980
  498.          TabIndex        =   125
  499.          Top             =   3340
  500.          Visible         =   0   'False
  501.          Width           =   300
  502.       End
  503.       Begin VB.TextBox lrtext 
  504.          Height          =   285
  505.          Index           =   51
  506.          Left            =   -73350
  507.          TabIndex        =   51
  508.          Top             =   4980
  509.          Visible         =   0   'False
  510.          Width           =   2355
  511.       End
  512.       Begin VB.TextBox lrtext 
  513.          Height          =   300
  514.          Index           =   52
  515.          Left            =   -69240
  516.          TabIndex        =   52
  517.          Top             =   4980
  518.          Visible         =   0   'False
  519.          Width           =   2535
  520.       End
  521.       Begin VB.TextBox lrtext 
  522.          Height          =   285
  523.          Index           =   47
  524.          Left            =   -73350
  525.          TabIndex        =   47
  526.          Top             =   4160
  527.          Visible         =   0   'False
  528.          Width           =   2355
  529.       End
  530.       Begin VB.TextBox lrtext 
  531.          Height          =   300
  532.          Index           =   48
  533.          Left            =   -69240
  534.          TabIndex        =   48
  535.          Top             =   4170
  536.          Visible         =   0   'False
  537.          Width           =   2535
  538.       End
  539.       Begin VB.TextBox lrtext 
  540.          Height          =   285
  541.          Index           =   49
  542.          Left            =   -73350
  543.          TabIndex        =   49
  544.          Top             =   4570
  545.          Visible         =   0   'False
  546.          Width           =   2355
  547.       End
  548.       Begin VB.TextBox lrtext 
  549.          CausesValidation=   0   'False
  550.          Height          =   300
  551.          Index           =   50
  552.          Left            =   -69240
  553.          TabIndex        =   50
  554.          Top             =   4575
  555.          Visible         =   0   'False
  556.          Width           =   2535
  557.       End
  558.       Begin VB.TextBox lrtext 
  559.          Height          =   285
  560.          Index           =   43
  561.          Left            =   -73350
  562.          TabIndex        =   43
  563.          Top             =   3340
  564.          Visible         =   0   'False
  565.          Width           =   2355
  566.       End
  567.       Begin VB.TextBox lrtext 
  568.          Height          =   300
  569.          Index           =   44
  570.          Left            =   -69240
  571.          TabIndex        =   44
  572.          Top             =   3360
  573.          Visible         =   0   'False
  574.          Width           =   2535
  575.       End
  576.       Begin VB.TextBox lrtext 
  577.          Height          =   285
  578.          Index           =   45
  579.          Left            =   -73350
  580.          TabIndex        =   45
  581.          Top             =   3750
  582.          Visible         =   0   'False
  583.          Width           =   2355
  584.       End
  585.       Begin VB.TextBox lrtext 
  586.          CausesValidation=   0   'False
  587.          Height          =   300
  588.          Index           =   46
  589.          Left            =   -69240
  590.          TabIndex        =   46
  591.          Top             =   3765
  592.          Visible         =   0   'False
  593.          Width           =   2535
  594.       End
  595.       Begin VB.ComboBox Com_DeprMethod 
  596.          Height          =   300
  597.          ItemData        =   "资产卡片基本操作.frx":3408
  598.          Left            =   1650
  599.          List            =   "资产卡片基本操作.frx":3421
  600.          Style           =   2  'Dropdown List
  601.          TabIndex        =   16
  602.          Top             =   3810
  603.          Width           =   2565
  604.       End
  605.       Begin VB.CommandButton ydcommand 
  606.          Height          =   300
  607.          Index           =   2
  608.          Left            =   8175
  609.          Picture         =   "资产卡片基本操作.frx":34A3
  610.          Style           =   1  'Graphical
  611.          TabIndex        =   123
  612.          Top             =   862
  613.          Width           =   300
  614.       End
  615.       Begin VB.TextBox lrtext 
  616.          Height          =   285
  617.          Index           =   13
  618.          Left            =   1650
  619.          TabIndex        =   0
  620.          Top             =   870
  621.          Width           =   1605
  622.       End
  623.       Begin VB.TextBox lrtext 
  624.          Height          =   285
  625.          Index           =   2
  626.          Left            =   4650
  627.          TabIndex        =   1
  628.          Top             =   870
  629.          Width           =   3525
  630.       End
  631.       Begin VB.TextBox lrtext 
  632.          Alignment       =   1  'Right Justify
  633.          Height          =   285
  634.          Index           =   14
  635.          Left            =   1650
  636.          TabIndex        =   2
  637.          Top             =   1215
  638.          Width           =   1605
  639.       End
  640.       Begin VB.TextBox lrtext 
  641.          Height          =   285
  642.          Index           =   17
  643.          Left            =   4650
  644.          TabIndex        =   9
  645.          Top             =   2250
  646.          Width           =   3825
  647.       End
  648.       Begin VB.TextBox lrtext 
  649.          Height          =   285
  650.          Index           =   0
  651.          Left            =   1650
  652.          TabIndex        =   6
  653.          Top             =   1920
  654.          Width           =   1335
  655.       End
  656.       Begin VB.CommandButton ydcommand 
  657.          Height          =   300
  658.          Index           =   0
  659.          Left            =   2970
  660.          Picture         =   "资产卡片基本操作.frx":382D
  661.          Style           =   1  'Graphical
  662.          TabIndex        =   66
  663.          Top             =   1912
  664.          Width           =   300
  665.       End
  666.       Begin VB.TextBox lrtext 
  667.          Height          =   285
  668.          Index           =   4
  669.          Left            =   4650
  670.          TabIndex        =   5
  671.          Top             =   1575
  672.          Width           =   3525
  673.       End
  674.       Begin VB.TextBox lrtext 
  675.          Alignment       =   1  'Right Justify
  676.          Height          =   285
  677.          Index           =   15
  678.          Left            =   1650
  679.          TabIndex        =   4
  680.          Top             =   1575
  681.          Width           =   1605
  682.       End
  683.       Begin VB.TextBox lrtext 
  684.          Height          =   285
  685.          Index           =   3
  686.          Left            =   4650
  687.          TabIndex        =   3
  688.          Top             =   1215
  689.          Width           =   3525
  690.       End
  691.       Begin VB.TextBox lrtext 
  692.          Height          =   300
  693.          Index           =   6
  694.          Left            =   5760
  695.          TabIndex        =   11
  696.          Top             =   2700
  697.          Width           =   2415
  698.       End
  699.       Begin VB.TextBox lrtext 
  700.          Height          =   285
  701.          Index           =   5
  702.          Left            =   1650
  703.          TabIndex        =   10
  704.          Top             =   2700
  705.          Width           =   2265
  706.       End
  707.       Begin VB.TextBox lrtext 
  708.          Height          =   300
  709.          Index           =   18
  710.          Left            =   5760
  711.          TabIndex        =   13
  712.          Top             =   3030
  713.          Width           =   2715
  714.       End
  715.       Begin VB.TextBox lrtext 
  716.          Height          =   285
  717.          Index           =   7
  718.          Left            =   1650
  719.          TabIndex        =   12
  720.          Top             =   3030
  721.          Width           =   2265
  722.       End
  723.       Begin VB.TextBox lrtext 
  724.          Height          =   285
  725.          Index           =   12
  726.          Left            =   1650
  727.          TabIndex        =   20
  728.          Top             =   4590
  729.          Width           =   1245
  730.       End
  731.       Begin VB.TextBox lrtext 
  732.          Alignment       =   1  'Right Justify
  733.          Height          =   285
  734.          Index           =   20
  735.          Left            =   4290
  736.          TabIndex        =   21
  737.          Top             =   4590
  738.          Width           =   1545
  739.       End
  740.       Begin VB.TextBox lrtext 
  741.          Alignment       =   1  'Right Justify
  742.          Height          =   285
  743.          Index           =   22
  744.          Left            =   4290
  745.          TabIndex        =   24
  746.          Top             =   4925
  747.          Width           =   1545
  748.       End
  749.       Begin VB.TextBox lrtext 
  750.          Alignment       =   1  'Right Justify
  751.          Height          =   285
  752.          Index           =   23
  753.          Left            =   1650
  754.          TabIndex        =   26
  755.          Top             =   5260
  756.          Width           =   1545
  757.       End
  758.       Begin VB.TextBox lrtext 
  759.          Alignment       =   1  'Right Justify
  760.          Height          =   285
  761.          Index           =   21
  762.          Left            =   6930
  763.          TabIndex        =   22
  764.          Top             =   4590
  765.          Width           =   1545
  766.       End
  767.       Begin VB.TextBox lrtext 
  768.          Alignment       =   1  'Right Justify
  769.          CausesValidation=   0   'False
  770.          Height          =   285
  771.          Index           =   24
  772.          Left            =   1650
  773.          TabIndex        =   23
  774.          Top             =   4925
  775.          Width           =   1545
  776.       End
  777.       Begin VB.TextBox lrtext 
  778.          Alignment       =   1  'Right Justify
  779.          Height          =   285
  780.          Index           =   25
  781.          Left            =   6930
  782.          TabIndex        =   25
  783.          Top             =   4925
  784.          Width           =   1545
  785.       End
  786.       Begin VB.TextBox lrtext 
  787.          Alignment       =   1  'Right Justify
  788.          Height          =   285
  789.          Index           =   28
  790.          Left            =   4290
  791.          TabIndex        =   27
  792.          Top             =   5260
  793.          Width           =   1545
  794.       End
  795.       Begin VB.TextBox lrtext 
  796.          Alignment       =   1  'Right Justify
  797.          Height          =   285
  798.          Index           =   27
  799.          Left            =   1650
  800.          TabIndex        =   28
  801.          Top             =   5595
  802.          Width           =   1545
  803.       End
  804.       Begin VB.TextBox lrtext 
  805.          Alignment       =   1  'Right Justify
  806.          BackColor       =   &H80000000&
  807.          CausesValidation=   0   'False
  808.          Height          =   285
  809.          Index           =   29
  810.          Left            =   6930
  811.          TabIndex        =   65
  812.          Top             =   5595
  813.          Width           =   1545
  814.       End
  815.       Begin VB.TextBox lrtext 
  816.          Alignment       =   1  'Right Justify
  817.          CausesValidation=   0   'False
  818.          Height          =   285
  819.          Index           =   32
  820.          Left            =   6930
  821.          TabIndex        =   32
  822.          Top             =   6045
  823.          Width           =   1545
  824.       End
  825.       Begin VB.TextBox lrtext 
  826.          Alignment       =   1  'Right Justify
  827.          Height          =   285
  828.          Index           =   30
  829.          Left            =   1650
  830.          TabIndex        =   30
  831.          Top             =   6045
  832.          Width           =   1545
  833.       End
  834.       Begin VB.TextBox lrtext 
  835.          Alignment       =   1  'Right Justify
  836.          Height          =   285
  837.          Index           =   31
  838.          Left            =   4290
  839.          TabIndex        =   31
  840.          Top             =   6045
  841.          Width           =   1545
  842.       End
  843.       Begin VB.CommandButton ydcommand 
  844.          Height          =   300
  845.          Index           =   1
  846.          Left            =   2970
  847.          Picture         =   "资产卡片基本操作.frx":3BB7
  848.          Style           =   1  'Graphical
  849.          TabIndex        =   64
  850.          Top             =   2272
  851.          Width           =   300
  852.       End
  853.       Begin VB.TextBox lrtext 
  854.          Height          =   285
  855.          Index           =   1
  856.          Left            =   1650
  857.          TabIndex        =   8
  858.          Top             =   2280
  859.          Width           =   1335
  860.       End
  861.       Begin VB.TextBox lrtext 
  862.          Height          =   285
  863.          Index           =   16
  864.          Left            =   4650
  865.          TabIndex        =   7
  866.          Top             =   1920
  867.          Width           =   3825
  868.       End
  869.       Begin VB.TextBox lrtext 
  870.          Alignment       =   1  'Right Justify
  871.          Height          =   285
  872.          Index           =   26
  873.          Left            =   4290
  874.          TabIndex        =   29
  875.          Top             =   5595
  876.          Width           =   1545
  877.       End
  878.       Begin VB.TextBox lrtext 
  879.          CausesValidation=   0   'False
  880.          Height          =   300
  881.          Index           =   36
  882.          Left            =   -69240
  883.          TabIndex        =   36
  884.          Top             =   1695
  885.          Visible         =   0   'False
  886.          Width           =   2535
  887.       End
  888.       Begin VB.TextBox lrtext 
  889.          Height          =   285
  890.          Index           =   35
  891.          Left            =   -73350
  892.          TabIndex        =   35
  893.          Top             =   1700
  894.          Visible         =   0   'False
  895.          Width           =   2355
  896.       End
  897.       Begin VB.TextBox lrtext 
  898.          Height          =   300
  899.          Index           =   34
  900.          Left            =   -69240
  901.          TabIndex        =   34
  902.          Top             =   1290
  903.          Visible         =   0   'False
  904.          Width           =   2535
  905.       End
  906.       Begin VB.TextBox lrtext 
  907.          Height          =   285
  908.          Index           =   33
  909.          Left            =   -73350
  910.          TabIndex        =   33
  911.          Top             =   1290
  912.          Visible         =   0   'False
  913.          Width           =   2355
  914.       End
  915.       Begin VB.TextBox lrtext 
  916.          CausesValidation=   0   'False
  917.          Height          =   300
  918.          Index           =   40
  919.          Left            =   -69240
  920.          TabIndex        =   40
  921.          Top             =   2505
  922.          Visible         =   0   'False
  923.          Width           =   2535
  924.       End
  925.       Begin VB.TextBox lrtext 
  926.          Height          =   285
  927.          Index           =   39
  928.          Left            =   -73350
  929.          TabIndex        =   39
  930.          Top             =   2520
  931.          Visible         =   0   'False
  932.          Width           =   2355
  933.       End
  934.       Begin VB.TextBox lrtext 
  935.          Height          =   300
  936.          Index           =   38
  937.          Left            =   -69240
  938.          TabIndex        =   38
  939.          Top             =   2100
  940.          Visible         =   0   'False
  941.          Width           =   2535
  942.       End
  943.       Begin VB.TextBox lrtext 
  944.          Height          =   285
  945.          Index           =   37
  946.          Left            =   -73350
  947.          TabIndex        =   37
  948.          Top             =   2110
  949.          Visible         =   0   'False
  950.          Width           =   2355
  951.       End
  952.       Begin VB.TextBox lrtext 
  953.          Height          =   300
  954.          Index           =   42
  955.          Left            =   -69240
  956.          TabIndex        =   42
  957.          Top             =   2910
  958.          Visible         =   0   'False
  959.          Width           =   2535
  960.       End
  961.       Begin VB.TextBox lrtext 
  962.          Height          =   285
  963.          Index           =   41
  964.          Left            =   -73350
  965.          TabIndex        =   41
  966.          Top             =   2930
  967.          Visible         =   0   'False
  968.          Width           =   2355
  969.       End
  970.       Begin VB.CommandButton Command1 
  971.          Height          =   300
  972.          Left            =   -70980
  973.          TabIndex        =   63
  974.          Top             =   1290
  975.          Visible         =   0   'False
  976.          Width           =   300
  977.       End
  978.       Begin VB.CommandButton Command3 
  979.          Height          =   300
  980.          Left            =   -70980
  981.          TabIndex        =   62
  982.          Top             =   1700
  983.          Visible         =   0   'False
  984.          Width           =   300
  985.       End
  986.       Begin VB.CommandButton Command5 
  987.          Height          =   300
  988.          Left            =   -70980
  989.          TabIndex        =   61
  990.          Top             =   2110
  991.          Visible         =   0   'False
  992.          Width           =   300
  993.       End
  994.       Begin VB.CommandButton Command7 
  995.          Height          =   300
  996.          Left            =   -70980
  997.          TabIndex        =   60
  998.          Top             =   2520
  999.          Visible         =   0   'False
  1000.          Width           =   300
  1001.       End
  1002.       Begin VB.CommandButton Command9 
  1003.          Height          =   300
  1004.          Left            =   -70980
  1005.          TabIndex        =   59
  1006.          Top             =   2930
  1007.          Visible         =   0   'False
  1008.          Width           =   300
  1009.       End
  1010.       Begin VB.CommandButton Command2 
  1011.          Height          =   300
  1012.          Left            =   -66690
  1013.          Style           =   1  'Graphical
  1014.          TabIndex        =   58
  1015.          Top             =   1290
  1016.          Visible         =   0   'False
  1017.          Width           =   300
  1018.       End
  1019.       Begin VB.CommandButton Command4 
  1020.          Height          =   300
  1021.          Left            =   -66690
  1022.          TabIndex        =   57
  1023.          Top             =   1700
  1024.          Visible         =   0   'False
  1025.          Width           =   300
  1026.       End
  1027.       Begin VB.CommandButton Command6 
  1028.          Height          =   300
  1029.          Left            =   -66690
  1030.          TabIndex        =   56
  1031.          Top             =   2110
  1032.          Visible         =   0   'False
  1033.          Width           =   300
  1034.       End
  1035.       Begin VB.CommandButton Command8 
  1036.          Height          =   300
  1037.          Left            =   -66690
  1038.          TabIndex        =   55
  1039.          Top             =   2520
  1040.          Visible         =   0   'False
  1041.          Width           =   300
  1042.       End
  1043.       Begin VB.CommandButton Command10 
  1044.          Height          =   300
  1045.          Left            =   -66690
  1046.          TabIndex        =   54
  1047.          Top             =   2930
  1048.          Visible         =   0   'False
  1049.          Width           =   300
  1050.       End
  1051.       Begin VB.TextBox lrtext 
  1052.          Height          =   300
  1053.          Index           =   10
  1054.          Left            =   5760
  1055.          TabIndex        =   17
  1056.          Top             =   3810
  1057.          Width           =   2415
  1058.       End
  1059.       Begin VB.TextBox lrtext 
  1060.          Height          =   300
  1061.          Index           =   9
  1062.          Left            =   5760
  1063.          TabIndex        =   15
  1064.          Top             =   3480
  1065.          Width           =   2415
  1066.       End
  1067.       Begin VB.TextBox lrtext 
  1068.          Height          =   285
  1069.          Index           =   8
  1070.          Left            =   1650
  1071.          TabIndex        =   14
  1072.          Top             =   3495
  1073.          Width           =   2265
  1074.       End
  1075.       Begin VB.TextBox lrtext 
  1076.          Alignment       =   1  'Right Justify
  1077.          CausesValidation=   0   'False
  1078.          Height          =   300
  1079.          Index           =   19
  1080.          Left            =   5760
  1081.          TabIndex        =   19
  1082.          Top             =   4155
  1083.          Width           =   2715
  1084.       End
  1085.       Begin VB.TextBox lrtext 
  1086.          Height          =   285
  1087.          Index           =   11
  1088.          Left            =   1650
  1089.          TabIndex        =   18
  1090.          Top             =   4170
  1091.          Width           =   2265
  1092.       End
  1093.       Begin MSComctlLib.ImageList ImageList1 
  1094.          Left            =   4080
  1095.          Top             =   -600
  1096.          _ExtentX        =   1005
  1097.          _ExtentY        =   1005
  1098.          BackColor       =   -2147483643
  1099.          ImageWidth      =   16
  1100.          ImageHeight     =   16
  1101.          MaskColor       =   12632256
  1102.          _Version        =   393216
  1103.          BeginProperty Images {2C247F25-8591-11D1-B16A-00C0F0283628} 
  1104.             NumListImages   =   11
  1105.             BeginProperty ListImage1 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  1106.                Picture         =   "资产卡片基本操作.frx":3F41
  1107.                Key             =   "xg"
  1108.             EndProperty
  1109.             BeginProperty ListImage2 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  1110.                Picture         =   "资产卡片基本操作.frx":42DB
  1111.                Key             =   "bc"
  1112.             EndProperty
  1113.             BeginProperty ListImage3 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  1114.                Picture         =   "资产卡片基本操作.frx":4675
  1115.                Key             =   "fq"
  1116.             EndProperty
  1117.             BeginProperty ListImage4 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  1118.                Picture         =   "资产卡片基本操作.frx":4A0F
  1119.                Key             =   "bz"
  1120.             EndProperty
  1121.             BeginProperty ListImage5 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  1122.                Picture         =   "资产卡片基本操作.frx":4DA9
  1123.                Key             =   "tc"
  1124.             EndProperty
  1125.             BeginProperty ListImage6 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  1126.                Picture         =   "资产卡片基本操作.frx":5143
  1127.                Key             =   "first"
  1128.             EndProperty
  1129.             BeginProperty ListImage7 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  1130.                Picture         =   "资产卡片基本操作.frx":54DD
  1131.                Key             =   "prev"
  1132.             EndProperty
  1133.             BeginProperty ListImage8 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  1134.                Picture         =   "资产卡片基本操作.frx":5877
  1135.                Key             =   "next"
  1136.             EndProperty
  1137.             BeginProperty ListImage9 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  1138.                Picture         =   "资产卡片基本操作.frx":5C11
  1139.                Key             =   "last"
  1140.             EndProperty
  1141.             BeginProperty ListImage10 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  1142.                Picture         =   "资产卡片基本操作.frx":5FAB
  1143.                Key             =   "xz"
  1144.             EndProperty
  1145.             BeginProperty ListImage11 {2C247F27-8591-11D1-B16A-00C0F0283628} 
  1146.                Picture         =   "资产卡片基本操作.frx":6345
  1147.                Key             =   "sc"
  1148.             EndProperty
  1149.          EndProperty
  1150.       End
  1151.       Begin VB.TextBox zttext 
  1152.          Height          =   195
  1153.          Left            =   8220
  1154.          TabIndex        =   124
  1155.          Top             =   -330
  1156.          Visible         =   0   'False
  1157.          Width           =   345
  1158.       End
  1159.       Begin VB.TextBox Num_text 
  1160.          Height          =   225
  1161.          Left            =   8430
  1162.          TabIndex        =   145
  1163.          Top             =   -390
  1164.          Visible         =   0   'False
  1165.          Width           =   975
  1166.       End
  1167.       Begin VB.Label Lblzdy 
  1168.          AutoSize        =   -1  'True
  1169.          Caption         =   "自定义19:"
  1170.          Height          =   180
  1171.          Index           =   51
  1172.          Left            =   -74220
  1173.          TabIndex        =   144
  1174.          Top             =   5040
  1175.          Visible         =   0   'False
  1176.          Width           =   810
  1177.       End
  1178.       Begin VB.Label Lblzdy 
  1179.          AutoSize        =   -1  'True
  1180.          Caption         =   "自定义20:"
  1181.          Height          =   180
  1182.          Index           =   52
  1183.          Left            =   -70110
  1184.          TabIndex        =   143
  1185.          Top             =   5070
  1186.          Visible         =   0   'False
  1187.          Width           =   810
  1188.       End
  1189.       Begin VB.Label Lblzdy 
  1190.          AutoSize        =   -1  'True
  1191.          Caption         =   "自定义15:"
  1192.          Height          =   180
  1193.          Index           =   47
  1194.          Left            =   -74220
  1195.          TabIndex        =   142
  1196.          Top             =   4215
  1197.          Visible         =   0   'False
  1198.          Width           =   810
  1199.       End
  1200.       Begin VB.Label Lblzdy 
  1201.          AutoSize        =   -1  'True
  1202.          Caption         =   "自定义16:"
  1203.          Height          =   180
  1204.          Index           =   48
  1205.          Left            =   -70110
  1206.          TabIndex        =   141
  1207.          Top             =   4245
  1208.          Visible         =   0   'False
  1209.          Width           =   810
  1210.       End
  1211.       Begin VB.Label Lblzdy 
  1212.          AutoSize        =   -1  'True
  1213.          Caption         =   "自定义17:"
  1214.          Height          =   180
  1215.          Index           =   49
  1216.          Left            =   -74220
  1217.          TabIndex        =   140
  1218.          Top             =   4635
  1219.          Visible         =   0   'False
  1220.          Width           =   810
  1221.       End
  1222.       Begin VB.Label Lblzdy 
  1223.          AutoSize        =   -1  'True
  1224.          Caption         =   "自定义18:"
  1225.          Height          =   180
  1226.          Index           =   50
  1227.          Left            =   -70110
  1228.          TabIndex        =   139
  1229.          Top             =   4665
  1230.          Visible         =   0   'False
  1231.          Width           =   810
  1232.       End
  1233.       Begin VB.Label Lblzdy 
  1234.          AutoSize        =   -1  'True
  1235.          Caption         =   "自定义11:"
  1236.          Height          =   180
  1237.          Index           =   43
  1238.          Left            =   -74220
  1239.          TabIndex        =   138
  1240.          Top             =   3405
  1241.          Visible         =   0   'False
  1242.          Width           =   810
  1243.       End
  1244.       Begin VB.Label Lblzdy 
  1245.          AutoSize        =   -1  'True
  1246.          Caption         =   "自定义12:"
  1247.          Height          =   180
  1248.          Index           =   44
  1249.          Left            =   -70110
  1250.          TabIndex        =   137
  1251.          Top             =   3435
  1252.          Visible         =   0   'False
  1253.          Width           =   810
  1254.       End
  1255.       Begin VB.Label Lblzdy 
  1256.          AutoSize        =   -1  'True
  1257.          Caption         =   "自定义13:"
  1258.          Height          =   180
  1259.          Index           =   45
  1260.          Left            =   -74220
  1261.          TabIndex        =   136
  1262.          Top             =   3810
  1263.          Visible         =   0   'False
  1264.          Width           =   810
  1265.       End
  1266.       Begin VB.Label Lblzdy 
  1267.          AutoSize        =   -1  'True
  1268.          Caption         =   "自定义14:"
  1269.          Height          =   180
  1270.          Index           =   46
  1271.          Left            =   -70110
  1272.          TabIndex        =   135
  1273.          Top             =   3840
  1274.          Visible         =   0   'False
  1275.          Width           =   810
  1276.       End
  1277.       Begin VB.Label Label1 
  1278.          AutoSize        =   -1  'True
  1279.          Caption         =   "卡片编号:"
  1280.          Height          =   180
  1281.          Left            =   210
  1282.          TabIndex        =   121
  1283.          Top             =   450
  1284.          Width           =   810
  1285.       End
  1286.       Begin VB.Label Lbl_Num 
  1287.          BorderStyle     =   1  'Fixed Single
  1288.          Caption         =   "000001"
  1289.          Height          =   240
  1290.          Left            =   1140
  1291.          TabIndex        =   120
  1292.          Top             =   420
  1293.          Width           =   630
  1294.       End
  1295.       Begin VB.Label Label3 
  1296.          AutoSize        =   -1  'True
  1297.          Caption         =   "会计年度:"
  1298.          Height          =   180
  1299.          Left            =   1950
  1300.          TabIndex        =   119
  1301.          Top             =   480
  1302.          Width           =   810
  1303.       End
  1304.       Begin VB.Label Lbl_Year 
  1305.          AutoSize        =   -1  'True
  1306.          BorderStyle     =   1  'Fixed Single
  1307.          Height          =   240
  1308.          Left            =   2850
  1309.          TabIndex        =   118
  1310.          Top             =   420
  1311.          Width           =   480
  1312.       End
  1313.       Begin VB.Label Label5 
  1314.          AutoSize        =   -1  'True
  1315.          Caption         =   "会计期间:"
  1316.          Height          =   180
  1317.          Left            =   3390
  1318.          TabIndex        =   117
  1319.          Top             =   450
  1320.          Width           =   810
  1321.       End
  1322.       Begin VB.Label Lbl_Period 
  1323.          AutoSize        =   -1  'True
  1324.          BorderStyle     =   1  'Fixed Single
  1325.          Height          =   240
  1326.          Left            =   4290
  1327.          TabIndex        =   116
  1328.          Top             =   420
  1329.          Width           =   240
  1330.       End
  1331.       Begin VB.Label Label7 
  1332.          AutoSize        =   -1  'True
  1333.          Caption         =   "卡片类型:"
  1334.          Height          =   180
  1335.          Left            =   6420
  1336.          TabIndex        =   115
  1337.          Top             =   450
  1338.          Width           =   810
  1339.       End
  1340.       Begin VB.Line Line1 
  1341.          X1              =   330
  1342.          X2              =   8910
  1343.          Y1              =   750
  1344.          Y2              =   750
  1345.       End
  1346.       Begin VB.Line Line2 
  1347.          BorderColor     =   &H80000005&
  1348.          X1              =   360
  1349.          X2              =   8940
  1350.          Y1              =   780
  1351.          Y2              =   780
  1352.       End
  1353.       Begin VB.Label Label8 
  1354.          AutoSize        =   -1  'True
  1355.          Caption         =   "资产编号:"
  1356.          Height          =   180
  1357.          Left            =   780
  1358.          TabIndex        =   114
  1359.          Top             =   930
  1360.          Width           =   810
  1361.       End
  1362.       Begin VB.Label Label9 
  1363.          AutoSize        =   -1  'True
  1364.          Caption         =   "资产名称:"
  1365.          Height          =   180
  1366.          Left            =   3780
  1367.          TabIndex        =   113
  1368.          Top             =   930
  1369.          Width           =   810
  1370.       End
  1371.       Begin VB.Label Label10 
  1372.          AutoSize        =   -1  'True
  1373.          Caption         =   "资产数量:"
  1374.          Height          =   180
  1375.          Left            =   780
  1376.          TabIndex        =   112
  1377.          Top             =   1260
  1378.          Width           =   810
  1379.       End
  1380.       Begin VB.Label Label11 
  1381.          AutoSize        =   -1  'True
  1382.          Caption         =   "规格型号:"
  1383.          Height          =   180
  1384.          Left            =   3780
  1385.          TabIndex        =   111
  1386.          Top             =   2010
  1387.          Width           =   810
  1388.       End
  1389.       Begin VB.Label Label12 
  1390.          AutoSize        =   -1  'True
  1391.          Caption         =   "使用日期:"
  1392.          Height          =   180
  1393.          Left            =   780
  1394.          TabIndex        =   110
  1395.          Top             =   1980
  1396.          Width           =   810
  1397.       End
  1398.       Begin VB.Label Label13 
  1399.          AutoSize        =   -1  'True
  1400.          Caption         =   "计量单位:"
  1401.          Height          =   180
  1402.          Left            =   3780
  1403.          TabIndex        =   109
  1404.          Top             =   1620
  1405.          Width           =   810
  1406.       End
  1407.       Begin VB.Label Label14 
  1408.          AutoSize        =   -1  'True
  1409.          Caption         =   "使用年限:"
  1410.          Height          =   180
  1411.          Left            =   780
  1412.          TabIndex        =   108
  1413.          Top             =   1620
  1414.          Width           =   810
  1415.       End
  1416.       Begin VB.Label Label15 
  1417.          AutoSize        =   -1  'True
  1418.          Caption         =   "资产类别:"
  1419.          Height          =   180
  1420.          Left            =   3780
  1421.          TabIndex        =   107
  1422.          Top             =   1290
  1423.          Width           =   810
  1424.       End
  1425.       Begin VB.Line Line3 
  1426.          BorderColor     =   &H80000005&
  1427.          X1              =   330
  1428.          X2              =   8940
  1429.          Y1              =   2640
  1430.          Y2              =   2640
  1431.       End
  1432.       Begin VB.Line Line4 
  1433.          X1              =   300
  1434.          X2              =   8880
  1435.          Y1              =   2610
  1436.          Y2              =   2610
  1437.       End
  1438.       Begin VB.Label Label16 
  1439.          AutoSize        =   -1  'True
  1440.          Caption         =   "设备位号:"
  1441.          Height          =   180
  1442.          Left            =   4890
  1443.          TabIndex        =   106
  1444.          Top             =   3090
  1445.          Width           =   810
  1446.       End
  1447.       Begin VB.Label Label17 
  1448.          AutoSize        =   -1  'True
  1449.          Caption         =   "所属部门:"
  1450.          Height          =   180
  1451.          Left            =   780
  1452.          TabIndex        =   105
  1453.          Top             =   2760
  1454.          Width           =   810
  1455.       End
  1456.       Begin VB.Label Label18 
  1457.          AutoSize        =   -1  'True
  1458.          Caption         =   "增加方式:"
  1459.          Height          =   180
  1460.          Left            =   4890
  1461.          TabIndex        =   104
  1462.          Top             =   2790
  1463.          Width           =   810
  1464.       End
  1465.       Begin VB.Label Label19 
  1466.          AutoSize        =   -1  'True
  1467.          Caption         =   "使用状况:"
  1468.          Height          =   180
  1469.          Left            =   780
  1470.          TabIndex        =   103
  1471.          Top             =   3090
  1472.          Width           =   810
  1473.       End
  1474.       Begin VB.Line Line5 
  1475.          X1              =   300
  1476.          X2              =   8880
  1477.          Y1              =   4500
  1478.          Y2              =   4500
  1479.       End
  1480.       Begin VB.Line Line6 
  1481.          BorderColor     =   &H80000005&
  1482.          X1              =   330
  1483.          X2              =   8970
  1484.          Y1              =   4530
  1485.          Y2              =   4530
  1486.       End
  1487.       Begin VB.Label Label21 
  1488.          AutoSize        =   -1  'True
  1489.          Caption         =   "货币种类:"
  1490.          Height          =   180
  1491.          Left            =   780
  1492.          TabIndex        =   102
  1493.          Top             =   4650
  1494.          Width           =   810
  1495.       End
  1496.       Begin VB.Label Label22 
  1497.          AutoSize        =   -1  'True
  1498.          Caption         =   "货币汇率:"
  1499.          Height          =   180
  1500.          Left            =   3390
  1501.          TabIndex        =   101
  1502.          Top             =   4650
  1503.          Width           =   810
  1504.       End
  1505.       Begin VB.Label Label23 
  1506.          AutoSize        =   -1  'True
  1507.          Caption         =   "资产原值:"
  1508.          Height          =   180
  1509.          Left            =   3390
  1510.          TabIndex        =   100
  1511.          Top             =   4980
  1512.          Width           =   810
  1513.       End
  1514.       Begin VB.Label Label24 
  1515.          AutoSize        =   -1  'True
  1516.          Caption         =   "累计折旧:"
  1517.          Height          =   180
  1518.          Left            =   780
  1519.          TabIndex        =   99
  1520.          Top             =   5310
  1521.          Width           =   810
  1522.       End
  1523.       Begin VB.Label Label25 
  1524.          AutoSize        =   -1  'True
  1525.          Caption         =   "外币金额:"
  1526.          Height          =   180
  1527.          Left            =   6060
  1528.          TabIndex        =   98
  1529.          Top             =   4680
  1530.          Width           =   810
  1531.       End
  1532.       Begin VB.Label Label26 
  1533.          AutoSize        =   -1  'True
  1534.          Caption         =   "本位币值:"
  1535.          Height          =   180
  1536.          Left            =   780
  1537.          TabIndex        =   97
  1538.          Top             =   4980
  1539.          Width           =   810
  1540.       End
  1541.       Begin VB.Label Label27 
  1542.          AutoSize        =   -1  'True
  1543.          Caption         =   "净 资 产:"
  1544.          Height          =   180
  1545.          Left            =   6060
  1546.          TabIndex        =   96
  1547.          Top             =   5320
  1548.          Width           =   810
  1549.       End
  1550.       Begin VB.Label Lbl_Operator 
  1551.          BorderStyle     =   1  'Fixed Single
  1552.          Height          =   240
  1553.          Left            =   5370
  1554.          TabIndex        =   95
  1555.          Top             =   420
  1556.          Width           =   960
  1557.       End
  1558.       Begin VB.Label Label29 
  1559.          AutoSize        =   -1  'True
  1560.          Caption         =   "操作员:"
  1561.          Height          =   180
  1562.          Left            =   4650
  1563.          TabIndex        =   94
  1564.          Top             =   480
  1565.          Width           =   630
  1566.       End
  1567.       Begin VB.Label Lbl_FactValue 
  1568.          Alignment       =   1  'Right Justify
  1569.          BorderStyle     =   1  'Fixed Single
  1570.          Height          =   285
  1571.          Left            =   6930
  1572.          TabIndex        =   93
  1573.          Top             =   5260
  1574.          Width           =   1545
  1575.       End
  1576.       Begin VB.Label Label31 
  1577.          AutoSize        =   -1  'True
  1578.          Caption         =   "折旧月数:"
  1579.          Height          =   180
  1580.          Left            =   6060
  1581.          TabIndex        =   92
  1582.          Top             =   5000
  1583.          Width           =   810
  1584.       End
  1585.       Begin VB.Label Label32 
  1586.          AutoSize        =   -1  'True
  1587.          Caption         =   "净残值率:"
  1588.          Height          =   180
  1589.          Left            =   3390
  1590.          TabIndex        =   91
  1591.          Top             =   5310
  1592.          Width           =   810
  1593.       End
  1594.       Begin VB.Label Label33 
  1595.          AutoSize        =   -1  'True
  1596.          Caption         =   "月折旧率:"
  1597.          Height          =   180
  1598.          Left            =   780
  1599.          TabIndex        =   90
  1600.          Top             =   5640
  1601.          Width           =   810
  1602.       End
  1603.       Begin VB.Label Label35 
  1604.          AutoSize        =   -1  'True
  1605.          Caption         =   "累计工作量:"
  1606.          Height          =   180
  1607.          Left            =   5910
  1608.          TabIndex        =   89
  1609.          Top             =   6090
  1610.          Width           =   990
  1611.       End
  1612.       Begin VB.Label Label36 
  1613.          AutoSize        =   -1  'True
  1614.          Caption         =   "工作总量:"
  1615.          Height          =   180
  1616.          Left            =   780
  1617.          TabIndex        =   88
  1618.          Top             =   6090
  1619.          Width           =   810
  1620.       End
  1621.       Begin VB.Label Label37 
  1622.          AutoSize        =   -1  'True
  1623.          Caption         =   "工作量单位:"
  1624.          Height          =   180
  1625.          Left            =   3240
  1626.          TabIndex        =   87
  1627.          Top             =   6090
  1628.          Width           =   990
  1629.       End
  1630.       Begin VB.Label Label38 
  1631.          AutoSize        =   -1  'True
  1632.          Caption         =   "记帐日期:"
  1633.          Height          =   180
  1634.          Left            =   780
  1635.          TabIndex        =   86
  1636.          Top             =   2310
  1637.          Width           =   810
  1638.       End
  1639.       Begin VB.Label Label39 
  1640.          AutoSize        =   -1  'True
  1641.          Caption         =   "生 产 商:"
  1642.          Height          =   180
  1643.          Left            =   3780
  1644.          TabIndex        =   85
  1645.          Top             =   2310
  1646.          Width           =   810
  1647.       End
  1648.       Begin VB.Label Label42 
  1649.          AutoSize        =   -1  'True
  1650.          Caption         =   "净 残 值:"
  1651.          Height          =   180
  1652.          Left            =   6060
  1653.          TabIndex        =   84
  1654.          Top             =   5640
  1655.          Width           =   810
  1656.       End
  1657.       Begin VB.Label Label43 
  1658.          AutoSize        =   -1  'True
  1659.          Caption         =   "月折旧额:"
  1660.          Height          =   180
  1661.          Left            =   3390
  1662.          TabIndex        =   83
  1663.          Top             =   5640
  1664.          Width           =   810
  1665.       End
  1666.       Begin VB.Label Lblzdy 
  1667.          AutoSize        =   -1  'True
  1668.          Caption         =   "自定义4:"
  1669.          Height          =   180
  1670.          Index           =   36
  1671.          Left            =   -70110
  1672.          TabIndex        =   82
  1673.          Top             =   1790
  1674.          Visible         =   0   'False
  1675.          Width           =   810
  1676.       End
  1677.       Begin VB.Label Lblzdy 
  1678.          AutoSize        =   -1  'True
  1679.          Caption         =   "自定义3:"
  1680.          Height          =   180
  1681.          Index           =   35
  1682.          Left            =   -74220
  1683.          TabIndex        =   81
  1684.          Top             =   1760
  1685.          Visible         =   0   'False
  1686.          Width           =   810
  1687.       End
  1688.       Begin VB.Label Lblzdy 
  1689.          AutoSize        =   -1  'True
  1690.          Caption         =   "自定义2:"
  1691.          Height          =   180
  1692.          Index           =   34
  1693.          Left            =   -70110
  1694.          TabIndex        =   80
  1695.          Top             =   1380
  1696.          Visible         =   0   'False
  1697.          Width           =   810
  1698.       End
  1699.       Begin VB.Label Lblzdy 
  1700.          AutoSize        =   -1  'True
  1701.          Caption         =   "自定义1:"
  1702.          Height          =   180
  1703.          Index           =   33
  1704.          Left            =   -74220
  1705.          TabIndex        =   79
  1706.          Top             =   1350
  1707.          Visible         =   0   'False
  1708.          Width           =   810
  1709.       End
  1710.       Begin VB.Line Line9 
  1711.          BorderColor     =   &H80000005&
  1712.          X1              =   -74580
  1713.          X2              =   -66000
  1714.          Y1              =   840
  1715.          Y2              =   840
  1716.       End
  1717.       Begin VB.Line Line10 
  1718.          X1              =   -74610
  1719.          X2              =   -66030
  1720.          Y1              =   810
  1721.          Y2              =   810
  1722.       End
  1723.       Begin VB.Label Lblzdy 
  1724.          AutoSize        =   -1  'True
  1725.          Caption         =   "自定义8:"
  1726.          Height          =   180
  1727.          Index           =   40
  1728.          Left            =   -70110
  1729.          TabIndex        =   78
  1730.          Top             =   2610
  1731.          Visible         =   0   'False
  1732.          Width           =   810
  1733.       End
  1734.       Begin VB.Label Lblzdy 
  1735.          AutoSize        =   -1  'True
  1736.          Caption         =   "自定义7:"
  1737.          Height          =   180
  1738.          Index           =   39
  1739.          Left            =   -74220
  1740.          TabIndex        =   77
  1741.          Top             =   2580
  1742.          Visible         =   0   'False
  1743.          Width           =   810
  1744.       End
  1745.       Begin VB.Label Lblzdy 
  1746.          AutoSize        =   -1  'True
  1747.          Caption         =   "自定义6:"
  1748.          Height          =   180
  1749.          Index           =   38
  1750.          Left            =   -70110
  1751.          TabIndex        =   76
  1752.          Top             =   2200
  1753.          Visible         =   0   'False
  1754.          Width           =   810
  1755.       End
  1756.       Begin VB.Label Lblzdy 
  1757.          AutoSize        =   -1  'True
  1758.          Caption         =   "自定义5:"
  1759.          Height          =   180
  1760.          Index           =   37
  1761.          Left            =   -74220
  1762.          TabIndex        =   75
  1763.          Top             =   2170
  1764.          Visible         =   0   'False
  1765.          Width           =   810
  1766.       End
  1767.       Begin VB.Label Lblzdy 
  1768.          AutoSize        =   -1  'True
  1769.          Caption         =   "自定义10:"
  1770.          Height          =   180
  1771.          Index           =   42
  1772.          Left            =   -70110
  1773.          TabIndex        =   74
  1774.          Top             =   3020
  1775.          Visible         =   0   'False
  1776.          Width           =   810
  1777.       End
  1778.       Begin VB.Label Lblzdy 
  1779.          AutoSize        =   -1  'True
  1780.          Caption         =   "自定义9:"
  1781.          Height          =   180
  1782.          Index           =   41
  1783.          Left            =   -74220
  1784.          TabIndex        =   73
  1785.          Top             =   2990
  1786.          Visible         =   0   'False
  1787.          Width           =   810
  1788.       End
  1789.       Begin VB.Line Line11 
  1790.          X1              =   330
  1791.          X2              =   8910
  1792.          Y1              =   5940
  1793.          Y2              =   5940
  1794.       End
  1795.       Begin VB.Line Line12 
  1796.          BorderColor     =   &H80000005&
  1797.          X1              =   360
  1798.          X2              =   9000
  1799.          Y1              =   5970
  1800.          Y2              =   5970
  1801.       End
  1802.       Begin VB.Line Line7 
  1803.          BorderColor     =   &H80000005&
  1804.          X1              =   300
  1805.          X2              =   8940
  1806.          Y1              =   3420
  1807.          Y2              =   3420
  1808.       End
  1809.       Begin VB.Line Line8 
  1810.          X1              =   270
  1811.          X2              =   8850
  1812.          Y1              =   3390
  1813.          Y2              =   3390
  1814.       End
  1815.       Begin VB.Label Label55 
  1816.          AutoSize        =   -1  'True
  1817.          Caption         =   "折旧方法:"
  1818.          Height          =   180
  1819.          Left            =   780
  1820.          TabIndex        =   72
  1821.          Top             =   3870
  1822.          Width           =   810
  1823.       End
  1824.       Begin VB.Label Label54 
  1825.          AutoSize        =   -1  'True
  1826.          Caption         =   "折旧费用科目:"
  1827.          Height          =   180
  1828.          Left            =   4530
  1829.          TabIndex        =   71
  1830.          Top             =   3870
  1831.          Width           =   1170
  1832.       End
  1833.       Begin VB.Label Label51 
  1834.          AutoSize        =   -1  'True
  1835.          Caption         =   "累计折旧科目:"
  1836.          Height          =   180
  1837.          Left            =   4530
  1838.          TabIndex        =   70
  1839.          Top             =   3540
  1840.          Width           =   1170
  1841.       End
  1842.       Begin VB.Label Label50 
  1843.          AutoSize        =   -1  'True
  1844.          Caption         =   "资产科目:"
  1845.          Height          =   180
  1846.          Left            =   780
  1847.          TabIndex        =   69
  1848.          Top             =   3540
  1849.          Width           =   810
  1850.       End
  1851.       Begin VB.Label Label34 
  1852.          AutoSize        =   -1  'True
  1853.          Caption         =   "凭 证 号:"
  1854.          Height          =   180
  1855.          Left            =   4890
  1856.          TabIndex        =   68
  1857.          Top             =   4215
  1858.          Width           =   810
  1859.       End
  1860.       Begin VB.Label Label30 
  1861.          AutoSize        =   -1  'True
  1862.          Caption         =   "凭证类别:"
  1863.          Height          =   180
  1864.          Left            =   780
  1865.          TabIndex        =   67
  1866.          Top             =   4215
  1867.          Width           =   810
  1868.       End
  1869.    End
  1870.    Begin MSComctlLib.Toolbar SzToolbar 
  1871.       Align           =   1  'Align Top
  1872.       Height          =   555