⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 form1.frm

📁 AD5933评估板下位机程序(keil C)和上位机程序(VB)
💻 FRM
📖 第 1 页 / 共 2 页
字号:
      Left            =   3000
      TabIndex        =   30
      Top             =   1320
      Width           =   2175
      Begin VB.OptionButton Option6 
         Caption         =   "Range 4:0.2vp-p"
         Height          =   195
         Left            =   120
         TabIndex        =   10
         Top             =   1680
         Width           =   1815
      End
      Begin VB.OptionButton Option5 
         Caption         =   "Range3:0.4vp-p"
         Height          =   195
         Left            =   120
         TabIndex        =   9
         Top             =   1320
         Width           =   1695
      End
      Begin VB.OptionButton Option4 
         Caption         =   "Range2:1vp-p"
         Height          =   195
         Left            =   120
         TabIndex        =   8
         Top             =   960
         Width           =   1575
      End
      Begin VB.OptionButton Option3 
         Caption         =   "Range1:2vp-p"
         Height          =   255
         Left            =   120
         TabIndex        =   7
         Top             =   600
         Width           =   1575
      End
   End
   Begin VB.TextBox Text5 
      Alignment       =   2  'Center
      Height          =   375
      Left            =   7920
      TabIndex        =   21
      Text            =   "5.13427021632825E-10"
      Top             =   4320
      Width           =   2175
   End
   Begin VB.CommandButton Command6 
      Caption         =   "Calculate Gain Factor"
      Enabled         =   0   'False
      Height          =   495
      Left            =   7800
      TabIndex        =   25
      Top             =   3480
      Width           =   2415
   End
   Begin VB.Frame Frame1 
      Caption         =   "PGA Control"
      ForeColor       =   &H000000FF&
      Height          =   1215
      Left            =   3000
      TabIndex        =   28
      Top             =   3720
      Width           =   2175
      Begin VB.OptionButton Option2 
         Caption         =   "Gain = X5"
         Height          =   375
         Left            =   120
         TabIndex        =   6
         Top             =   600
         Width           =   1455
      End
      Begin VB.OptionButton Option1 
         Caption         =   "Gain = X1"
         Height          =   255
         Left            =   120
         TabIndex        =   5
         Top             =   360
         Width           =   1455
      End
   End
   Begin VB.CommandButton Command2 
      Caption         =   "Program Device Registers"
      Height          =   495
      Left            =   7680
      MaskColor       =   &H00E0E0E0&
      TabIndex        =   24
      Top             =   120
      Width           =   2655
   End
   Begin VB.TextBox Text4 
      Height          =   375
      Left            =   240
      MaxLength       =   3
      TabIndex        =   3
      Text            =   "15"
      Top             =   3600
      Width           =   2535
   End
   Begin VB.TextBox Text3 
      Height          =   375
      Left            =   240
      MaxLength       =   3
      TabIndex        =   2
      Text            =   "100"
      Top             =   2640
      Width           =   2535
   End
   Begin VB.TextBox Text2 
      Height          =   375
      Left            =   240
      MaxLength       =   8
      TabIndex        =   1
      Text            =   "2"
      Top             =   1920
      Width           =   2535
   End
   Begin VB.TextBox Text1 
      Height          =   375
      Left            =   240
      MaxLength       =   8
      TabIndex        =   0
      Text            =   "30000"
      Top             =   1200
      Width           =   2535
   End
   Begin VB.Frame Frame2 
      Caption         =   "Calibration Gain Factor "
      ForeColor       =   &H000000FF&
      Height          =   2775
      Left            =   7680
      TabIndex        =   29
      Top             =   2160
      Width           =   2655
      Begin VB.OptionButton Option8 
         Caption         =   "Multi-Point Frequency calibration"
         Height          =   495
         Left            =   120
         TabIndex        =   39
         Top             =   720
         Width           =   2175
      End
      Begin VB.OptionButton Option7 
         Caption         =   "Mid-Point Frequency calibration"
         Height          =   375
         Left            =   120
         TabIndex        =   38
         Top             =   360
         Value           =   -1  'True
         Width           =   2415
      End
      Begin VB.Label Label20 
         Alignment       =   2  'Center
         Caption         =   "Calculated Gain Factor"
         ForeColor       =   &H00FF0000&
         Height          =   255
         Left            =   120
         TabIndex        =   35
         Top             =   1920
         Width           =   2295
      End
   End
   Begin VB.Frame Frame4 
      Caption         =   " Internal Temperature"
      ForeColor       =   &H000000FF&
      Height          =   1455
      Left            =   10560
      TabIndex        =   40
      Top             =   120
      Width           =   2775
      Begin VB.CommandButton Command5 
         Caption         =   "Measure"
         Height          =   495
         Left            =   120
         TabIndex        =   41
         Top             =   240
         Width           =   2415
      End
      Begin VB.Label Label10 
         Caption         =   "Current Device Temperature"
         ForeColor       =   &H00FF0000&
         Height          =   255
         Left            =   120
         TabIndex        =   57
         Top             =   840
         Width           =   2415
      End
      Begin VB.Label Label9 
         Caption         =   "Degrees Celcius"
         Height          =   255
         Left            =   1200
         TabIndex        =   56
         Top             =   1080
         Width           =   1455
      End
      Begin VB.Label Label8 
         Caption         =   "25.00000"
         ForeColor       =   &H00000000&
         Height          =   195
         Left            =   120
         TabIndex        =   42
         Top             =   1080
         Width           =   1050
      End
   End
   Begin VB.Frame Frame7 
      Caption         =   "Start Sweep"
      ForeColor       =   &H000000FF&
      Height          =   3375
      Left            =   10560
      TabIndex        =   47
      Top             =   1560
      Width           =   2775
   End
   Begin VB.Frame Frame8 
      Caption         =   "Sweep Parameters"
      ForeColor       =   &H000000FF&
      Height          =   4215
      Left            =   120
      TabIndex        =   48
      Top             =   720
      Width           =   2775
      Begin VB.Label Label7 
         Caption         =   "MCLK,Ref Clock Frequency"
         Height          =   255
         Left            =   120
         TabIndex        =   54
         Top             =   3360
         Width           =   2535
      End
      Begin VB.Label Label4 
         Caption         =   "Number of Settling Time Cycles"
         Height          =   375
         Left            =   120
         TabIndex        =   53
         Top             =   2400
         Width           =   2415
      End
      Begin VB.Label Label3 
         Caption         =   "Number of Increments (9 Bit)"
         Height          =   375
         Left            =   120
         TabIndex        =   52
         Top             =   1680
         Width           =   2535
      End
      Begin VB.Label Label1 
         Caption         =   "Delta Frequency (Hz)"
         Height          =   255
         Left            =   120
         TabIndex        =   50
         Top             =   960
         Width           =   2535
      End
      Begin VB.Label Label6 
         Caption         =   "Start Frequency (Hz)"
         Height          =   255
         Left            =   120
         TabIndex        =   49
         Top             =   240
         Width           =   2295
      End
   End
   Begin TabDlg.SSTab SSTab1 
      Height          =   4935
      Left            =   120
      TabIndex        =   58
      Top             =   5040
      Width           =   13215
      _ExtentX        =   23310
      _ExtentY        =   8705
      _Version        =   393216
      Tabs            =   2
      TabsPerRow      =   2
      TabHeight       =   520
      TabCaption(0)   =   "Absolute Impedance | Z |"
      TabPicture(0)   =   "Form1.frx":08CA
      Tab(0).ControlEnabled=   -1  'True
      Tab(0).Control(0)=   "Strip1"
      Tab(0).Control(0).Enabled=   0   'False
      Tab(0).ControlCount=   1
      TabCaption(1)   =   "Impedance Phase  

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -