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

📄 test_dy11.frm

📁 This is a test ModBus comm s pragam in "STB-311".
💻 FRM
📖 第 1 页 / 共 4 页
字号:
VERSION 5.00
Begin VB.Form TEST_DY 
   BorderStyle     =   1  'Fixed Single
   Caption         =   "单元测试"
   ClientHeight    =   10875
   ClientLeft      =   1065
   ClientTop       =   210
   ClientWidth     =   13500
   BeginProperty Font 
      Name            =   "宋体"
      Size            =   12
      Charset         =   134
      Weight          =   400
      Underline       =   0   'False
      Italic          =   0   'False
      Strikethrough   =   0   'False
   EndProperty
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   10875
   ScaleWidth      =   13500
   Begin VB.TextBox Text7 
      Height          =   4785
      Left            =   8160
      MultiLine       =   -1  'True
      ScrollBars      =   2  'Vertical
      TabIndex        =   80
      Top             =   6000
      Width           =   5325
   End
   Begin VB.Timer Timer3 
      Interval        =   1000
      Left            =   11160
      Top             =   2400
   End
   Begin VB.Timer Timer2 
      Enabled         =   0   'False
      Interval        =   1000
      Left            =   12600
      Top             =   1200
   End
   Begin VB.CommandButton Command6 
      Caption         =   "波特率确认"
      Height          =   405
      Left            =   9720
      TabIndex        =   56
      Top             =   5520
      Width           =   1515
   End
   Begin VB.ComboBox Combo4 
      Height          =   360
      ItemData        =   "test_dy11.frx":0000
      Left            =   5880
      List            =   "test_dy11.frx":0010
      TabIndex        =   55
      Text            =   "Combo4"
      Top             =   5550
      Width           =   3765
   End
   Begin VB.ListBox List1 
      Height          =   1500
      Left            =   1200
      TabIndex        =   16
      Top             =   480
      Width           =   12375
   End
   Begin VB.ComboBox Combo3 
      Height          =   360
      ItemData        =   "test_dy11.frx":0044
      Left            =   4380
      List            =   "test_dy11.frx":005A
      Style           =   2  'Dropdown List
      TabIndex        =   15
      Top             =   5220
      Width           =   1575
   End
   Begin VB.ComboBox Combo2 
      Height          =   360
      ItemData        =   "test_dy11.frx":008B
      Left            =   2790
      List            =   "test_dy11.frx":00A1
      TabIndex        =   14
      Text            =   "Combo2"
      Top             =   5220
      Width           =   1515
   End
   Begin VB.PictureBox UpDown2 
      Height          =   375
      Left            =   6600
      ScaleHeight     =   315
      ScaleWidth      =   210
      TabIndex        =   11
      Top             =   4770
      Width           =   270
   End
   Begin VB.ComboBox Combo1 
      Height          =   360
      ItemData        =   "test_dy11.frx":00BD
      Left            =   2790
      List            =   "test_dy11.frx":00DF
      Style           =   2  'Dropdown List
      TabIndex        =   9
      Top             =   5640
      Width           =   1515
   End
   Begin VB.CheckBox Check1 
      Caption         =   "累加显示"
      Height          =   315
      Left            =   3120
      TabIndex        =   8
      Top             =   60
      Width           =   1485
   End
   Begin VB.PictureBox UpDown1 
      Height          =   375
      Left            =   3780
      ScaleHeight     =   315
      ScaleWidth      =   210
      TabIndex        =   7
      Top             =   4800
      Width           =   270
   End
   Begin VB.TextBox Text3 
      Height          =   345
      Left            =   2790
      TabIndex        =   1
      Text            =   "1"
      Top             =   4800
      Width           =   975
   End
   Begin VB.TextBox Text2 
      Height          =   2385
      Left            =   1200
      MultiLine       =   -1  'True
      ScrollBars      =   2  'Vertical
      TabIndex        =   0
      Top             =   2040
      Width           =   9645
   End
   Begin VB.PictureBox MSComm1 
      Height          =   480
      Left            =   0
      ScaleHeight     =   420
      ScaleWidth      =   1140
      TabIndex        =   86
      Top             =   2850
      Width           =   1200
   End
   Begin VB.Timer Timer1 
      Enabled         =   0   'False
      Interval        =   100
      Left            =   30
      Top             =   3810
   End
   Begin VB.PictureBox ImageList1 
      BackColor       =   &H80000005&
      Height          =   480
      Left            =   60
      ScaleHeight     =   420
      ScaleWidth      =   1140
      TabIndex        =   87
      Top             =   4380
      Width           =   1200
   End
   Begin VB.PictureBox Toolbar1 
      Align           =   1  'Align Top
      Height          =   420
      Left            =   0
      ScaleHeight     =   360
      ScaleWidth      =   13440
      TabIndex        =   13
      Top             =   0
      Width           =   13500
   End
   Begin VB.PictureBox SSTab1 
      Height          =   4875
      Left            =   30
      ScaleHeight     =   4815
      ScaleWidth      =   7995
      TabIndex        =   18
      Top             =   5970
      Width           =   8055
      Begin VB.CommandButton Command13 
         Caption         =   "CRC校验"
         Height          =   345
         Left            =   3480
         TabIndex        =   85
         Top             =   4020
         Width           =   1785
      End
      Begin VB.TextBox Text11 
         Height          =   360
         Left            =   5040
         TabIndex        =   83
         Text            =   "A000"
         Top             =   480
         Width           =   1035
      End
      Begin VB.CommandButton Command8 
         Caption         =   "Command8"
         Height          =   375
         Left            =   5880
         TabIndex        =   81
         Top             =   3360
         Width           =   1815
      End
      Begin VB.PictureBox UpDown4 
         Height          =   360
         Left            =   3991
         ScaleHeight     =   300
         ScaleWidth      =   195
         TabIndex        =   78
         Top             =   960
         Width           =   255
      End
      Begin VB.CommandButton Command30 
         Caption         =   "对  时"
         Height          =   375
         Left            =   -73800
         TabIndex        =   77
         Top             =   3840
         Width           =   1635
      End
      Begin VB.CommandButton Command29 
         Caption         =   "数据复归"
         Height          =   405
         Left            =   -74520
         TabIndex        =   76
         Top             =   3360
         Width           =   1725
      End
      Begin VB.CommandButton Command28 
         Caption         =   "取事件"
         Height          =   375
         Left            =   -72600
         TabIndex        =   75
         Top             =   3360
         Width           =   1695
      End
      Begin VB.CommandButton Command25 
         Caption         =   "复归"
         Height          =   375
         Left            =   -72570
         TabIndex        =   74
         Top             =   1260
         Width           =   1935
      End
      Begin VB.CommandButton Command27 
         Caption         =   "读遥信"
         Height          =   375
         Left            =   -72630
         TabIndex        =   72
         Top             =   720
         Width           =   1995
      End
      Begin VB.Frame Frame1 
         Caption         =   "控制操作"
         Height          =   1545
         Index           =   0
         Left            =   -74790
         TabIndex        =   69
         Top             =   1770
         Width           =   4065
         Begin VB.CommandButton Command26 
            Caption         =   "预分"
            Height          =   405
            Left            =   2160
            TabIndex        =   73
            Top             =   390
            Width           =   1365
         End
         Begin VB.CommandButton Command24 
            Caption         =   "执行"
            Height          =   435
            Left            =   1200
            TabIndex        =   71
            Top             =   930
            Width           =   1365
         End
         Begin VB.CommandButton Command23 
            Caption         =   "预合"
            Height          =   405
            Left            =   300
            TabIndex        =   70
            Top             =   390
            Width           =   1365
         End
      End
      Begin VB.CommandButton Command22 
         Caption         =   "读定值"
         Height          =   375
         Left            =   -74730
         TabIndex        =   68
         Top             =   1260
         Width           =   2025
      End
      Begin VB.CommandButton Command21 
         Caption         =   "读测量值"
         Height          =   375
         Left            =   -74760
         TabIndex        =   67
         Top             =   720
         Width           =   1995
      End
      Begin VB.CommandButton Command20 
         Caption         =   "读遥信"
         Height          =   345
         Left            =   4200
         TabIndex        =   66
         Top             =   3360
         Width           =   1245
      End
      Begin VB.CommandButton Command19 
         Caption         =   "读测量"
         Height          =   345
         Left            =   2760
         TabIndex        =   65
         Top             =   3360
         Width           =   1125
      End
      Begin VB.CommandButton Command18 
         Caption         =   "读投退值"
         Height          =   345
         Left            =   2730
         TabIndex        =   64
         Top             =   2940
         Width           =   1305
      End
      Begin VB.CommandButton Command17 
         Caption         =   "修改定值"
         Height          =   375
         Left            =   2700
         TabIndex        =   63
         Top             =   2490
         Width           =   1335
      End
      Begin VB.CommandButton Command16 
         Caption         =   "读定值"
         Height          =   345
         Left            =   2670
         TabIndex        =   62
         Top             =   2040
         Width           =   1335
      End
      Begin VB.CommandButton Command12 
         Caption         =   "SOE"
         Height          =   345
         Left            =   180
         TabIndex        =   61
         Top             =   3300
         Width           =   1425
      End
      Begin VB.CommandButton Command11 
         Caption         =   "直流(遥信)"
         Height          =   315
         Left            =   6420
         TabIndex        =   60
         Top             =   2520
         Width           =   1575
      End
      Begin VB.CommandButton Command7 
         Caption         =   "直流3"
         Height          =   315
         Left            =   6420
         TabIndex        =   59
         Top             =   2160
         Width           =   1605
      End
      Begin VB.TextBox Text6 
         Height          =   495
         Left            =   1830
         TabIndex        =   57
         Text            =   "1"
         Top             =   1440
         Width           =   825
      End
      Begin VB.CommandButton Command5 
         Caption         =   "直流(遥测)"
         Height          =   315
         Left            =   6420
         TabIndex        =   54
         Top             =   1800
         Width           =   1605
      End
      Begin VB.CommandButton Command4 
         Caption         =   "直流(检测)"
         Height          =   375
         Left            =   6450
         TabIndex        =   53
         Top             =   1380
         Width           =   1605
      End
      Begin VB.CommandButton Command15 
         Caption         =   "对时"
         Height          =   375
         Left            =   4260
         TabIndex        =   50
         Top             =   2550
         Width           =   1185
      End
      Begin VB.CommandButton Command14 
         Caption         =   "复位"
         Height          =   375
         Left            =   4200
         TabIndex        =   49
         Top             =   2010
         Width           =   1185
      End
      Begin VB.CommandButton Command1 
         Caption         =   "发送命令"
         Height          =   375
         Left            =   150
         TabIndex        =   45
         Top             =   2040
         Width           =   1365
      End
      Begin VB.CommandButton Command9 
         Caption         =   "分闸"
         Height          =   345
         Left            =   150
         TabIndex        =   44
         Top             =   2460
         Width           =   1365
      End
      Begin VB.CommandButton Command10 
         Caption         =   "合闸"
         Height          =   375
         Left            =   180
         TabIndex        =   43
         Top             =   2850
         Width           =   1365
      End
      Begin VB.TextBox Text8 
         Height          =   360
         Left            =   2040
         TabIndex        =   42
         Text            =   "C866"
         Top             =   480
         Width           =   1035
      End
      Begin VB.TextBox Text9 
         Height          =   360
         Left            =   3360
         TabIndex        =   41
         Text            =   "D"
         Top             =   960
         Width           =   630
      End
      Begin VB.TextBox Text10 
         Height          =   375
         Left            =   5220
         TabIndex        =   40
         Text            =   "2"
         Top             =   1530
         Width           =   945
      End
      Begin VB.CommandButton Command3 
         Caption         =   "整  定"
         Height          =   375
         Left            =   -68760
         TabIndex        =   25
         Top             =   1410
         Width           =   1095
      End
      Begin VB.TextBox Text1 
         BorderStyle     =   0  'None
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   10.5
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   285
         Left            =   -70200
         TabIndex        =   24
         Text            =   "Text1"
         Top             =   1200
         Visible         =   0   'False
         Width           =   1185
      End
      Begin VB.CommandButton Command2 
         Caption         =   "定值下传"
         Height          =   375
         Left            =   -67920
         TabIndex        =   23
         Top             =   2490
         Width           =   1215
      End
      Begin VB.TextBox Text4 
         Height          =   375
         Left            =   -69330
         TabIndex        =   21
         Top             =   2700
         Width           =   855
      End
      Begin VB.TextBox Text5 
         Height          =   360
         Left            =   -69330
         TabIndex        =   19
         Top             =   3120
         Width           =   765
      End
      Begin VB.PictureBox UpDown3 
         Height          =   375
         Left            =   -68550
         ScaleHeight     =   315
         ScaleWidth      =   210
         TabIndex        =   20
         Top             =   3120
         Width           =   270

⌨️ 快捷键说明

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