📄 frmwizard.frm
字号:
VERSION 5.00
Begin VB.Form frmWizard
BorderStyle = 4 'Fixed ToolWindow
Caption = "图表生成向导"
ClientHeight = 4545
ClientLeft = 45
ClientTop = 270
ClientWidth = 7410
Icon = "frmWizard.frx":0000
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 4545
ScaleWidth = 7410
ShowInTaskbar = 0 'False
StartUpPosition = 1 '所有者中心
Begin VB.CommandButton cmdCancel
Caption = "取消(&C)"
Height = 375
Left = 2820
TabIndex = 4
Top = 4050
Width = 1215
End
Begin VB.CommandButton cmdNext
Caption = "下一步(&N)"
Default = -1 'True
Height = 375
Left = 5820
TabIndex = 2
Top = 4050
Width = 1215
End
Begin VB.CommandButton cmdBack
Caption = "上一步(&B)"
Height = 375
Left = 4485
TabIndex = 1
Top = 4050
Width = 1215
End
Begin VB.CommandButton cmdFinish
Caption = "完成(&F)"
Height = 375
Left = 5820
TabIndex = 3
Top = 4050
Width = 1215
End
Begin VB.PictureBox pbStep
BorderStyle = 0 'None
Height = 3735
Index = 2
Left = 0
ScaleHeight = 249
ScaleMode = 3 'Pixel
ScaleWidth = 495
TabIndex = 27
Top = 0
Width = 7425
Begin VB.Frame fra
ClipControls = 0 'False
Height = 1155
Index = 3
Left = 2910
TabIndex = 35
Top = 2220
Width = 3705
Begin VB.OptionButton optChartType
Caption = "饼图"
Height = 285
Index = 5
Left = 2670
TabIndex = 43
Tag = "14"
Top = 660
Width = 1005
End
Begin VB.OptionButton optChartType
Caption = "组合图"
Height = 285
Index = 4
Left = 1410
TabIndex = 42
Tag = "9"
Top = 660
Width = 1005
End
Begin VB.OptionButton optChartType
Caption = "阶梯图"
Height = 285
Index = 3
Left = 150
TabIndex = 41
Tag = "7"
Top = 660
Width = 1005
End
Begin VB.OptionButton optChartType
Caption = "面积图"
Height = 285
Index = 2
Left = 2670
TabIndex = 40
Tag = "5"
Top = 330
Width = 1005
End
Begin VB.OptionButton optChartType
Caption = "直方图"
Height = 285
Index = 1
Left = 1410
TabIndex = 39
Tag = "1"
Top = 330
Width = 1005
End
Begin VB.OptionButton optChartType
Caption = "折线图"
Height = 285
Index = 0
Left = 150
TabIndex = 38
Tag = "3"
Top = 330
Value = -1 'True
Width = 1005
End
End
Begin VB.Frame fra
ClipControls = 0 'False
Height = 525
Index = 2
Left = 3450
TabIndex = 34
Top = 1650
Width = 2625
Begin VB.OptionButton optView
Caption = "三维视图"
Height = 285
Index = 1
Left = 1395
TabIndex = 37
Tag = "3d"
Top = 180
Width = 1125
End
Begin VB.OptionButton optView
Caption = "二维视图"
Height = 285
Index = 0
Left = 240
TabIndex = 36
Tag = "2d"
Top = 180
Value = -1 'True
Width = 1125
End
End
Begin VB.Image imgStep
BorderStyle = 1 'Fixed Single
Height = 3450
Index = 2
Left = 150
Picture = "frmWizard.frx":0442
Stretch = -1 'True
Top = 210
Width = 1800
End
Begin VB.Label lbl
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "第三步："
BeginProperty Font
Name = "楷体_GB2312"
Size = 18
Charset = 134
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
Height = 360
Index = 5
Left = 2160
TabIndex = 29
Top = 360
Width = 1515
End
Begin VB.Label lbl
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "请选择要生成的图表类型"
BeginProperty Font
Name = "宋体"
Size = 21.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
Height = 435
Index = 4
Left = 2310
TabIndex = 28
Top = 960
Width = 4785
End
End
Begin VB.PictureBox pbStep
BorderStyle = 0 'None
Height = 3735
Index = 0
Left = 0
ScaleHeight = 249
ScaleMode = 3 'Pixel
ScaleWidth = 495
TabIndex = 0
Top = 0
Width = 7425
Begin VB.Frame fra
Height = 735
Index = 1
Left = 2130
TabIndex = 6
Top = 2070
Width = 4995
Begin VB.CheckBox chkModify
Caption = "计划数据"
Height = 315
Index = 0
Left = 120
TabIndex = 48
Top = 270
Width = 1065
End
Begin VB.CheckBox chkModify
Caption = "实际数据"
Height = 315
Index = 1
Left = 1350
TabIndex = 47
Top = 270
Width = 1065
End
Begin VB.CheckBox chkModify
Caption = "预测数据"
Height = 315
Index = 2
Left = 2580
TabIndex = 46
Top = 270
Width = 1065
End
Begin VB.CheckBox chkModify
Caption = "全部数据"
Height = 315
Index = 3
Left = 3810
Style = 1 'Graphical
TabIndex = 45
Top = 270
Width = 1065
End
Begin VB.OptionButton optModify
Caption = "全部数据"
Height = 285
Index = 3
Left = 3750
TabIndex = 32
Top = 1200
Width = 1245
End
Begin VB.OptionButton optModify
Caption = "预测数据"
Height = 285
Index = 2
Left = 2535
TabIndex = 9
Top = 1200
Visible = 0 'False
Width = 1065
End
Begin VB.OptionButton optModify
Caption = "实际数据"
Height = 285
Index = 1
Left = 1305
TabIndex = 8
Top = 1200
Visible = 0 'False
Width = 1245
End
Begin VB.OptionButton optModify
Caption = "计划数据"
Height = 285
Index = 0
Left = 90
TabIndex = 7
Top = 1200
Value = -1 'True
Visible = 0 'False
Width = 1245
End
End
Begin VB.Label lbl
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "请选择要抽取的数据类型"
BeginProperty Font
Name = "宋体"
Size = 21.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 435
Index = 1
Left = 2310
TabIndex = 10
Top = 960
Width = 4905
End
Begin VB.Label lbl
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "第一步："
BeginProperty Font
Name = "楷体_GB2312"
Size = 18
Charset = 134
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 360
Index = 0
Left = 2160
TabIndex = 5
Top = 360
Width = 1515
End
Begin VB.Image imgStep
BorderStyle = 1 'Fixed Single
Height = 3450
Index = 0
Left = 180
Picture = "frmWizard.frx":902B
Stretch = -1 'True
Top = 210
Width = 1800
End
End
Begin VB.PictureBox pbStep
BorderStyle = 0 'None
Height = 3735
Index = 1
Left = 0
ScaleHeight = 249
ScaleMode = 3 'Pixel
ScaleWidth = 495
TabIndex = 11
Top = 0
Width = 7425
Begin VB.Frame fra
Height = 1125
Index = 0
Left = 2130
TabIndex = 12
Top = 2070
Width = 5115
Begin VB.CheckBox chkMonth
Caption = "全选"
Height = 495
Index = 12
Left = 4500
Style = 1 'Graphical
TabIndex = 33
Top = 360
Width = 345
End
Begin VB.CheckBox chkMonth
Caption = "十二月"
Height = 225
Index = 11
Left = 3420
TabIndex = 26
Tag = "12"
Top = 780
Width = 855
End
Begin VB.CheckBox chkMonth
Caption = "十一月"
Height = 225
Index = 10
Left = 3420
TabIndex = 25
Tag = "11"
Top = 480
Width = 855
End
Begin VB.CheckBox chkMonth
Caption = "十 月"
Height = 225
Index = 9
Left = 3420
TabIndex = 24
Tag = "10"
Top = 195
Width = 855
End
Begin VB.CheckBox chkMonth
Caption = "九 月"
Height = 225
Index = 8
Left = 2340
TabIndex = 23
Tag = "9"
Top = 798
Width = 855
End
Begin VB.CheckBox chkMonth
Caption = "八 月"
Height = 225
Index = 7
Left = 2340
TabIndex = 22
Tag = "8"
Top = 504
Width = 855
End
Begin VB.CheckBox chkMonth
Caption = "七 月"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -