Sample Calibration Program
5-38
TDS5000B Series Service Manual
Listing
VERSION 5.00
Object = ”{DFEB0DA3-D648-11D4-9C5F-EA48B7E9393D}#1.0#0”; ”tvc.ocx”
Begin VB.Form frmMain
AutoRedraw = -1 ’True
Caption = ”Calibrator for TDS5000B”
ClientHeight = 4884
ClientLeft = 48
ClientTop = 324
ClientWidth = 8184
LinkTopic = ”Form1”
ScaleHeight = 4884
ScaleWidth = 8184
StartUpPosition = 3 ’Windows Default
Begin TVCLib.Tvc TvcWaveTek
Left = 3600
Top = 2760
_Version = 65536
_ExtentX = 847
_ExtentY = 847
_StockProps = 0
VisaDescriptor = ”GPIB0::1::INSTR”
Timeout = 10000
End
Begin TVCLib.Tvc TvcScope
Left = 2400
Top = 2760
_Version = 65536
_ExtentX = 847
_ExtentY = 847
_StockProps = 0
VisaDescriptor = ”GPIB0::1::INSTR”
Timeout = 10000
End
Begin VB.CommandButton cmdPlay
Caption = ”Start Calibration”
Enabled = 0 ’False
Height = 492
Left = 600
TabIndex = 5
ToolTipText = ”Start Calibration”
Top = 4080
Width = 1572
End