chart.frm

来自「这个是完整的数据库商品管理系统,有完整的源代码,本人测试过了,非常好用.里面还有」· FRM 代码 · 共 40 行

VERSION 5.00
Object = "{65E121D4-0C60-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCHRT20.OCX"
Begin VB.Form frmChart 
   BorderStyle     =   3  'Fixed Dialog
   Caption         =   "库存数量"
   ClientHeight    =   6420
   ClientLeft      =   45
   ClientTop       =   330
   ClientWidth     =   8625
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   6420
   ScaleWidth      =   8625
   ShowInTaskbar   =   0   'False
   StartUpPosition =   3  '窗口缺省
   Begin MSChart20Lib.MSChart charReport 
      Height          =   6015
      Left            =   120
      OleObjectBlob   =   "Chart.frx":0000
      TabIndex        =   0
      Top             =   120
      Width           =   8175
   End
End
Attribute VB_Name = "frmChart"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit

Private Sub Form_Resize()
    '当窗体的大小发生变化时，要使得MS Chart控件的大小随着窗体而变化
    charReport.Left = 0
    charReport.Top = 0
    charReport.Height = Me.ScaleHeight
    charReport.Width = Me.ScaleWidth
End Sub