STM32 ISP串口烧录 VB源码（二）关键代码

Option Explicit
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Declare Function timeGetTime Lib "winmm.dll"() As Long

在程序最开始。

一、主要参数

Dim i As Long
Dim bin() As Byte
Dim BINLEN As Long
Dim Slen As Long
Dim str As String
Dim BAnk As Long          '总共有多少块
Dim ConStstus As Boolean  '连接状态
Dim Sendbuff() As Byte    '发送缓存
Dim Recvbuff(256) As Byte '接收缓存
Dim Binfile() As Byte     '文件缓存

二、一般操作代码

Private Sub CmdClear_Click() '清空操作Textdata = ""
End Sub

Private Sub Command2_Click()   '刷新端口
Dim G As Integer
Dim Index As Integer
if Index = 0 ThenOn Error Resume Next    '出现错误For G=1 To 9            '添加通讯选择MSComm1.CommPort = GMSComm1.PortOpen = trueIf MSComm1.PortOpen = true ThenComPortlist.AddItem "COM" & Trim$(G)End IfMSComm1.PortOpen = FalseNext GComPortlist.ListIndex = 0
End If
End Sub

Public Sub waittime(delay As Single)
Dim starttime As Single
starttime=Timer
Do Until (Timer-starttime)>delay
DoEvents
Loop
End Sub

Private Sub Command1_Click()  '退出操作If MSComm1.PortOpen=True Then MSComm1.PortOpen=FalseUnload Form1End
End Sub

三、核心程序

STM32 ISP串口烧录 VB源码（二）关键代码相关推荐

STM32 ISP串口烧录 VB源码（一）Frame中主要控件及属性说明
一.软件外观: 二.Frame中主要控件及其属性列表 Frame主要控件及其属性列表控件名称控件类型控件属性属性值说明 ComPortlist list ComboBox 端口列表提示选择 ...
STM32 IAP 串口在线升级源码详解
本博文基于本人修改的代码进行编写如需代码, 请到[代码下载](https://download.csdn.net/download/qq_36257571/10695681)自行下载. 详细内容不做过 ...
27.串口通信实验源码讲解
串口通信实验源码讲解笔记基于正点原子官方视频视频连接https://www.bilibili.com/video/BV1Wx411d7wT?p=71&spm_id_from=333.100 ...
获取网关IP和MAC 的VB源码
'窗体上加入控件command1,然后复制下面代码,运行,按command1即可. Option Explicit Private Declare Function OpenProcess Lib & ...
分享Python采集99个VB源码，总有一款适合您
分享Python采集99个VB源码,总有一款适合您 Python采集的99个VB源码下载链接:https://pan.baidu.com/s/1Ljs41rWn_WxvGqFWCkmGsA?pwd=1 ...
阅读react-redux源码(二) - createConnect、match函数的实现
阅读react-redux源码 - 零阅读react-redux源码 - 一阅读react-redux源码(二) - createConnect.match函数的实现上一节看了Provider组 ...
VB 源码删除重复行程序函数
代码如下: '通过VB脚本改写而成,可以直接使用放入程序中可以直接使用 '删除重复行程序 ' 'foutPathName 为待删除的文本文件.注:输入文件不能有空行,别外扩展名必需为.TXT ' ...
NetShopForge网上商店程序(VB)源码—讨论-发布
我前天在51aspx上发布了NetShopForge网上商店程序(VB)源码,大家可以看看.代码还算工整,有什么建议和疑问大家可以和我联系,QQ:10982610 MSN:rippleyong@hot ...
抖音seo源码短视频seo源码二次开发，怎么使用抖音seo源码，视频seo源码私有化部署？
抖音seo源码短视频seo源码二次开发,怎么使用抖音seo源码,短视频seo源码私有化部署? 抖音seo源码短视频seo源码二次开发,怎么使用抖音seo源码,短视频seo源码私有化部署到本地.首先 ...

STM32 ISP串口烧录 VB源码（二）关键代码

一、主要参数

STM32 ISP串口烧录 VB源码（二）关键代码相关推荐

最新文章

热门文章