?? testtrendgraph_form1.frm
字號(hào):
VERSION 5.00
Object = "{90502D37-8777-11D3-8A75-00A024D2FE82}#1.0#0"; "OPCTrend.ocx"
Begin VB.Form OPCTrendTestForm
BorderStyle = 3 'Fixed Dialog
Caption = "實(shí)驗(yàn)"
ClientHeight = 4032
ClientLeft = 1680
ClientTop = 1800
ClientWidth = 6420
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 4032
ScaleWidth = 6420
ShowInTaskbar = 0 'False
Begin OPCTrend.TrendGraph TrendGraph1
Height = 3735
Left = 120
TabIndex = 5
Top = 120
Width = 4695
_ExtentX = 8276
_ExtentY = 6583
AutoLink = -1 'True
End
Begin VB.CommandButton cmdRange
Caption = "應(yīng)用(&A):"
Height = 495
Left = 4920
TabIndex = 4
Top = 3360
Width = 1455
End
Begin VB.TextBox txtRangeY
Height = 270
Left = 5040
TabIndex = 3
Top = 2880
Width = 1095
End
Begin VB.TextBox txtRangeX
Height = 270
Left = 5040
TabIndex = 1
Top = 2160
Width = 1095
End
Begin VB.Label lblRengeY
Caption = "Y軸(&Y):"
Height = 255
Left = 5040
TabIndex = 2
Top = 2640
Width = 1095
End
Begin VB.Label lblRengeX
Caption = "X軸(&X):"
Height = 255
Left = 5040
TabIndex = 0
Top = 1920
Width = 1095
End
End
Attribute VB_Name = "OPCTrendTestForm"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub cmdRange_Click()
TrendGraph1.RangeX = CDbl(txtRangeX.Text)
TrendGraph1.RangeY = CDbl(txtRangeY.Text)
End Sub
Private Sub Form_Load()
txtRangeX.Text = CStr(TrendGraph1.RangeX)
txtRangeY.Text = CStr(TrendGraph1.RangeY)
End Sub
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -