下面介绍几个使用VB6.0开发的计算机串口通讯程序，这些程序可以自动发送16进制字符，并接收这些字符。这些程序可以在链接：

链接: https://pan.baidu.com/s/1xAZzwzAHQSPZ6OUJjYV3Mw?pwd=rwdk 提取码: rwdk 复制这段内容后打开百度网盘手机App，操作更方便哦

https://pan.baidu.com/s/1-SMLa3UwbxArwY3QRNtswg

提取码：hdze 下载微云文件分享:ⅤB串囗下载地址:

https://pan.baidu.com/s/1PxUz7CXQP7hGBTIDc7kUog ;

提取码：2kcy

https://share.weiyun.com/5ok9T9o

VERSION 5.00

Object = “{648A5603-2C6E-101B-82B6-000000000014}#1.1#0”; “MSCOMM32.OCX”

Object = “{6B7E6392-850A-101B-AFC0-4210102A8DA7}#1.3#0”; “comctl32.ocx”

Begin VB.Form mn_form

BackColor = &H00404000&

BorderStyle = 1 'Fixed Single

ClientHeight = 9795

ClientLeft = 45

ClientTop = 615

ClientWidth = 12735

FillColor = &H00E0E0E0&

BeginProperty Font

Name = “宋体”

Size = 12

Charset = 134

Weight = 700

Underline = 0 'False

Italic = 0 'False

Strikethrough = 0 'False

EndProperty

LinkTopic = “Form1”

ScaleHeight = 9795

ScaleWidth = 12735

StartUpPosition = 2 '屏幕中心

WindowState = 2 'Maximized

Begin ComctlLib.Toolbar Toolbar1

Align = 1 'Align Top

Height = 480

Left = 0

TabIndex = 2

Top = 0

Width = 12735

_ExtentX = 22463

_ExtentY = 847

ButtonWidth = 714

ButtonHeight = 688

Appearance = 1

ImageList = “ImageList1”

_Version = 327682

BeginProperty Buttons {0713E452-850A-101B-AFC0-4210102A8DA7}

NumButtons = 8

BeginProperty Button1 {0713F354-850A-101B-AFC0-4210102A8DA7}

Object.ToolTipText = “校时”

Object.Tag = “”

ImageIndex = 1

EndProperty

BeginProperty Button2 {0713F354-850A-101B-AFC0-4210102A8DA7}

Object.ToolTipText = “轮询”

Object.Tag = “”

ImageIndex = 2

Style = 1

EndProperty

BeginProperty Button3 {0713F354-850A-101B-AFC0-4210102A8DA7}

Object.ToolTipText = “定值”

Object.Tag = “”

ImageIndex = 3

EndProperty

BeginProperty Button4 {0713F354-850A-101B-AFC0-4210102A8DA7}

Object.ToolTipText = “设定”

Object.Tag = “”

ImageIndex = 4

EndProperty

BeginProperty Button5 {0713F354-850A-101B-AFC0-4210102A8DA7}

Object.ToolTipText = “分闸”

Object.Tag = “”

ImageIndex = 5

EndProperty

BeginProperty Button6 {0713F354-850A-101B-AFC0-4210102A8DA7}

Object.ToolTipText = “合闸”

Object.Tag = “”

ImageIndex = 6

EndProperty

BeginProperty Button7 {0713F354-850A-101B-AFC0-4210102A8DA7}

Object.ToolTipText = “内存”

Object.Tag = “”

ImageIndex = 7

Style = 1

EndProperty

BeginProperty Button8 {0713F354-850A-101B-AFC0-4210102A8DA7}

Object.Tag = “”

Style = 3

MixedState = -1 'True

EndProperty

EndProperty

OLEDropMode = 1

Begin VB.Frame Frame1

Appearance = 0 'Flat

BorderStyle = 0 'None

ForeColor = &H80000008&

Height = 375

Left = 9480

TabIndex = 3

Top = 0

Width = 5895

Begin VB.TextBox RAM_addr1th

Alignment = 2 'Center

Appearance = 0 'Flat

ForeColor = &H00800000&

Height = 375

Left = 2400

TabIndex = 9

Text = “0”

Top = 0

Width = 735

End

Begin VB.VScrollBar RAM_VScroll1

Height = 375

Left = 3120

Max = 1216

SmallChange = 32

TabIndex = 8

Top = 0

Width = 255

End

Begin VB.VScrollBar SN_VScroll

Height = 375

Left = 4440

Max = 199

TabIndex = 7

Top = 0

value = 1

Width = 255

End

Begin VB.TextBox SN_Text

Alignment = 2 'Center

Appearance = 0 'Flat

ForeColor = &H00800000&

Height = 360

Left = 3960

TabIndex = 6

Text = “01”

Top = 0

Width = 495

End

Begin VB.ComboBox Combo1

Appearance = 0 'Flat

BeginProperty Font

Name = “System”

Size = 12

Charset = 134

Weight = 700

Underline = 0 'False

Italic = 0 'False

Strikethrough = 0 'False

EndProperty

ForeColor = &H00800000&

Height = 360

ItemData = “Star_M6.frx”:0000

Left = 4920

List = “Star_M6.frx”:000A

TabIndex = 4

Text = “COM1”

Top = 0

Width = 975

End

End

End

Begin VB.PictureBox disp_pic

BackColor = &H00161602&

ForeColor = &H0000FFFF&

Height = 5895

Left = 120

ScaleHeight = 5835

ScaleWidth = 10035

TabIndex = 10

Top = 3600

Width = 10095

End

Begin ComctlLib.StatusBar StatusBar1

Align = 2 'Align Bottom

Height = 255

Left = 0

TabIndex = 5

Top = 9540

Width = 12735

_ExtentX = 22463

_ExtentY = 450

版权声明：本文为CSDN博主「科技论坛」的原创文章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接及本声明。

原文链接：https://blog.csdn.net/zhangluan2019/article/details/109641529