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

📄 frm_sendget.frm

📁 mmodbus
💻 FRM
📖 第 1 页 / 共 2 页
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "MSCOMM32.OCX"
Begin VB.Form Frm_SendGet 
   BorderStyle     =   1  'Fixed Single
   ClientHeight    =   9165
   ClientLeft      =   45
   ClientTop       =   435
   ClientWidth     =   11820
   Icon            =   "Frm_SendGet.frx":0000
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   ScaleHeight     =   9165
   ScaleWidth      =   11820
   StartUpPosition =   2  '屏幕中心
   Begin VB.CommandButton Command4 
      Caption         =   "Command4"
      Height          =   375
      Left            =   7680
      TabIndex        =   22
      Top             =   1080
      Width           =   375
   End
   Begin VB.CommandButton Command3 
      Caption         =   "Command3"
      Height          =   255
      Left            =   11040
      TabIndex        =   21
      Top             =   960
      Width           =   615
   End
   Begin VB.CheckBox Check1 
      Caption         =   "Check1"
      Height          =   495
      Left            =   9960
      TabIndex        =   20
      Top             =   840
      Width           =   855
   End
   Begin VB.CommandButton Command2 
      Caption         =   "Command2"
      Height          =   495
      Left            =   6480
      TabIndex        =   19
      Top             =   960
      Width           =   975
   End
   Begin VB.CommandButton Command1 
      Caption         =   "Command1"
      Height          =   615
      Left            =   5280
      TabIndex        =   18
      Top             =   840
      Width           =   735
   End
   Begin VB.ComboBox Combo1 
      Height          =   300
      Left            =   1440
      TabIndex        =   17
      Top             =   1080
      Width           =   3615
   End
   Begin MSComctlLib.StatusBar StatusBar1 
      Align           =   2  'Align Bottom
      Height          =   375
      Left            =   0
      TabIndex        =   16
      Top             =   8790
      Width           =   11820
      _ExtentX        =   20849
      _ExtentY        =   661
      _Version        =   393216
      BeginProperty Panels {8E3867A5-8586-11D1-B16A-00C0F0283628} 
         NumPanels       =   3
         BeginProperty Panel1 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Object.Width           =   6597
            MinWidth        =   6597
         EndProperty
         BeginProperty Panel2 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Object.Width           =   6068
            MinWidth        =   6068
         EndProperty
         BeginProperty Panel3 {8E3867AB-8586-11D1-B16A-00C0F0283628} 
            Object.Width           =   7832
            MinWidth        =   7832
         EndProperty
      EndProperty
   End
   Begin VB.CommandButton Cmd_Clear 
      Caption         =   "清空"
      Height          =   375
      Left            =   9480
      TabIndex        =   15
      Top             =   1560
      Width           =   1455
   End
   Begin VB.CommandButton Cmd_ClearRecive 
      Caption         =   "清空接收列表"
      Height          =   375
      Left            =   6960
      TabIndex        =   14
      Top             =   360
      Width           =   1335
   End
   Begin VB.CommandButton Cmd_ClearSend 
      Caption         =   "清空发送列表"
      Height          =   375
      Left            =   5160
      TabIndex        =   13
      Top             =   360
      Width           =   1500
   End
   Begin VB.CommandButton Cmd_ColsePort 
      Caption         =   "关闭断口"
      Height          =   375
      Left            =   3360
      TabIndex        =   12
      Top             =   360
      Width           =   1500
   End
   Begin VB.CommandButton Cmd_OpenPort 
      Caption         =   "打开断口"
      Height          =   375
      Left            =   1680
      TabIndex        =   11
      Top             =   360
      Width           =   1500
   End
   Begin VB.Frame Frame2 
      Caption         =   "已接收内容:"
      Height          =   3135
      Left            =   120
      TabIndex        =   9
      Top             =   5640
      Width           =   11655
      Begin MSComctlLib.ListView ListView_Recive 
         Height          =   2655
         Left            =   120
         TabIndex        =   10
         Top             =   240
         Width           =   11415
         _ExtentX        =   20135
         _ExtentY        =   4683
         View            =   3
         LabelWrap       =   -1  'True
         HideSelection   =   -1  'True
         _Version        =   393217
         ForeColor       =   -2147483640
         BackColor       =   -2147483643
         BorderStyle     =   1
         Appearance      =   1
         NumItems        =   0
      End
   End
   Begin VB.CommandButton Cmd_Port 
      Caption         =   "断口配置"
      Height          =   375
      Left            =   0
      TabIndex        =   8
      Top             =   360
      Width           =   1500
   End
   Begin VB.Frame Frame1 
      Caption         =   "已发送内容:"
      Height          =   2655
      Left            =   120
      TabIndex        =   6
      Top             =   2760
      Width           =   11655
      Begin MSComctlLib.ListView ListView_Send 
         Height          =   2295
         Left            =   120
         TabIndex        =   7
         Top             =   240
         Width           =   11415
         _ExtentX        =   20135
         _ExtentY        =   4048
         View            =   3
         LabelWrap       =   -1  'True
         HideSelection   =   -1  'True
         _Version        =   393217
         ForeColor       =   -2147483640
         BackColor       =   -2147483643
         BorderStyle     =   1
         Appearance      =   1
         NumItems        =   0
      End
   End
   Begin VB.CommandButton Cmd_Send 
      Caption         =   "发送"
      Height          =   375
      Left            =   9480
      TabIndex        =   3
      Top             =   2040
      Width           =   1455
   End
   Begin VB.Timer Timer1 
      Left            =   9720
      Top             =   840
   End
   Begin VB.TextBox Text_send 
      Height          =   855
      Left            =   1440
      TabIndex        =   2
      Top             =   1560
      Width           =   7695
   End
   Begin VB.PictureBox pic 
      Appearance      =   0  'Flat
      BackColor       =   &H00808080&
      BorderStyle     =   0  'None
      ForeColor       =   &H80000008&
      Height          =   315
      Left            =   0
      ScaleHeight     =   315
      ScaleWidth      =   11745
      TabIndex        =   0
      Top             =   0
      Width           =   11745
      Begin VB.Label Label1 
         BackStyle       =   0  'Transparent
         Caption         =   "Modbus协议的数据传输"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   12
            Charset         =   134
            Weight          =   700
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         ForeColor       =   &H00FFFFFF&
         Height          =   255
         Left            =   4800
         TabIndex        =   1
         Top             =   0
         Width           =   3375
      End
   End
   Begin MSCommLib.MSComm MSComm1 
      Left            =   9000
      Top             =   840

⌨️ 快捷键说明

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