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

📄 frmdatasimu.frm

📁 一个modbus的测试工具
💻 FRM
📖 第 1 页 / 共 5 页
字号:
VERSION 5.00
Begin VB.Form frmDataSimu 
   BorderStyle     =   1  'Fixed Single
   Caption         =   "数据仿真器"
   ClientHeight    =   5805
   ClientLeft      =   45
   ClientTop       =   330
   ClientWidth     =   9885
   BeginProperty Font 
      Name            =   "宋体"
      Size            =   9.75
      Charset         =   0
      Weight          =   400
      Underline       =   0   'False
      Italic          =   0   'False
      Strikethrough   =   0   'False
   EndProperty
   Icon            =   "frmDataSimu.frx":0000
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   5805
   ScaleWidth      =   9885
   StartUpPosition =   1  'CenterOwner
   Begin VB.CommandButton cmdExit 
      Cancel          =   -1  'True
      Caption         =   "退  出"
      Height          =   375
      Left            =   5400
      TabIndex        =   26
      Top             =   5280
      Width           =   1095
   End
   Begin VB.Timer tmrRefresh 
      Enabled         =   0   'False
      Interval        =   1000
      Left            =   2160
      Top             =   5280
   End
   Begin VB.Frame Frame1 
      Caption         =   "数据设置"
      Height          =   5535
      Left            =   120
      TabIndex        =   0
      Top             =   120
      Width           =   1815
      Begin VB.TextBox txtRefAddress 
         Height          =   285
         Left            =   240
         TabIndex        =   9
         Text            =   "0"
         Top             =   4440
         Width           =   1335
      End
      Begin VB.CommandButton cmdApply 
         Caption         =   "应  用"
         Height          =   375
         Left            =   360
         TabIndex        =   7
         Top             =   4920
         Width           =   1095
      End
      Begin VB.OptionButton optDataType 
         Caption         =   "Preset Registers"
         Height          =   495
         Index           =   5
         Left            =   240
         TabIndex        =   6
         Top             =   2880
         Width           =   1335
      End
      Begin VB.OptionButton optDataType 
         Caption         =   "Force Coils"
         Height          =   495
         Index           =   4
         Left            =   240
         TabIndex        =   5
         Top             =   2280
         Width           =   1335
      End
      Begin VB.OptionButton optDataType 
         Caption         =   "Input Registers"
         Height          =   495
         Index           =   3
         Left            =   240
         TabIndex        =   4
         Top             =   1680
         Width           =   1335
      End
      Begin VB.OptionButton optDataType 
         Caption         =   "Holding Registers"
         Height          =   495
         Index           =   2
         Left            =   240
         TabIndex        =   3
         Top             =   1080
         Width           =   1335
      End
      Begin VB.OptionButton optDataType 
         Caption         =   "Inputs"
         Height          =   255
         Index           =   1
         Left            =   240
         TabIndex        =   2
         Top             =   720
         Width           =   1335
      End
      Begin VB.OptionButton optDataType 
         Caption         =   "Coils"
         Height          =   255
         Index           =   0
         Left            =   240
         TabIndex        =   1
         Top             =   360
         Width           =   1335
      End
      Begin VB.Label Label1 
         AutoSize        =   -1  'True
         Caption         =   "首地址"
         Height          =   195
         Left            =   480
         TabIndex        =   8
         Top             =   4080
         Width           =   585
      End
   End
   Begin VB.Frame fraRegisters 
      Caption         =   "Holding Resgisters数据区"
      Height          =   5055
      Left            =   2040
      TabIndex        =   18
      Top             =   120
      Visible         =   0   'False
      Width           =   7695
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   83
         Left            =   6600
         TabIndex        =   222
         Top             =   4560
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   82
         Left            =   6600
         TabIndex        =   221
         Top             =   4200
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   81
         Left            =   6600
         TabIndex        =   220
         Top             =   3840
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   80
         Left            =   6600
         TabIndex        =   219
         Top             =   3480
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   79
         Left            =   6600
         TabIndex        =   218
         Top             =   3120
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   78
         Left            =   6600
         TabIndex        =   217
         Top             =   2760
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   77
         Left            =   6600
         TabIndex        =   216
         Top             =   2400
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   76
         Left            =   6600
         TabIndex        =   215
         Top             =   2040
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   75
         Left            =   6600
         TabIndex        =   214
         Top             =   1680
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   74
         Left            =   6600
         TabIndex        =   213
         Top             =   1320
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   73
         Left            =   6600
         TabIndex        =   212
         Top             =   960
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   72
         Left            =   6600
         TabIndex        =   211
         Top             =   600
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   71
         Left            =   5520
         TabIndex        =   210
         Top             =   4560
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   70
         Left            =   5520
         TabIndex        =   209
         Top             =   4200
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   69
         Left            =   5520
         TabIndex        =   208
         Top             =   3840
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   68
         Left            =   5520
         TabIndex        =   207
         Top             =   3480
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   67
         Left            =   5520
         TabIndex        =   206
         Top             =   3120
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   66
         Left            =   5520
         TabIndex        =   205
         Top             =   2760
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   65
         Left            =   5520
         TabIndex        =   204
         Top             =   2400
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   64
         Left            =   5520
         TabIndex        =   203
         Top             =   2040
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   63
         Left            =   5520
         TabIndex        =   202
         Top             =   1680
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   62
         Left            =   5520
         TabIndex        =   201
         Top             =   1320
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   61
         Left            =   5520
         TabIndex        =   200
         Top             =   960
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   60
         Left            =   5520
         TabIndex        =   199
         Top             =   600
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"
         Height          =   255
         Index           =   59
         Left            =   4440
         TabIndex        =   198
         Top             =   4560
         Width           =   975
      End
      Begin VB.Label lblRegData 
         BorderStyle     =   1  'Fixed Single
         Caption         =   "0"

⌨️ 快捷键说明

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