登录
首页 » Visual Basic » CommTest485

CommTest485

于 2015-07-23 发布 文件大小:19KB
0 231
下载积分: 1 下载次数: 1

代码说明:

  测试com口程序Private Sub Form_Load() Dim I As Integer Dim Msg As String Me.Enabled = False Msg = 串行端口通讯测试 V & App.Major & . & App.Minor & App.Revision cboCommSettings.Text = GetSetting(App.EXEName, frmCommTest , CommSettings , 2400,N,8,1 ) Me.Show Me.Refresh With MSComm1 For I = 1 To 16 Me.Caption = Msg & - 测试通讯端口:COM & I & ... Me.Refresh Delay 100 On Error Resume Next .CommPort = I .Settings = 2400,N,8,1 .PortOpen = True .PortOpen = False If Err = 0 Then cboCommPort.AddItem COM & Trim(I) Next I End With cboCommPort.ListIndex = 0 optCommData(0).Value = True Me.Caption = Msg & (Programming by WJY) Me.Refresh If cboCommPort.ListCount = 0 Then MsgBox 程序检测不到可用的串行端口! Me.Enabled = True End Sub (test com port)

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • Wintab_Example
    使用wintab开发的例子,VB开发环境,经过验证可以(Wintab32.dll Demo in VB6 ReadMe notes ******************************************************* ******************************************************* A few notes on this before you play with it: 1) You cannot debug through much of the code! The reason for this is that the routine performs a Windows message hook for the window messages that normally go to the window. So when the user moves the mouse over a window, Windows generates all the messages and sends them to the window to respond. (examples are "MouseEnterWindow, MouseMove, MouseLeaveWindow"). Note these are different from the VB events which are similarly named but operate within VB, they are instead the actual messages Windows OS uses to respond. This is how windows does all of its GUI. Since a hook has been placed in the code, those messages go to the callback routine and thus get intercepted in the application. In debug, all code execution halts in the VB app. But windows keeps sending the messages to the cal)
    2013-10-19 12:59:12下载
    积分:1
  • dotaMapHook
    1.替换war3根目录下Games 联合开发网 - pudn.com
    2014-02-15 10:25:53下载
    积分:1
  • 2003819926451
    包过滤路由器与包过滤防火墙具有同一功能,如2。1。1部分所述。 The packet filter rout provide the same functionality as the packet filter firewall describe in section2.1.1. 代理防火墙比包过滤器防火墙易于保持更多的上下文 The proxy firewall maintain context more easily than the packet filter firewall. 防火墙计算机要求2张以太网卡,一个对外部世界的接口和一个对主POP网络的接口。 The firewall machine will require two ethernet card, one interface to the outside world and one to the master pop network. (The firewall machine will require two ethernet card, one interface to the outside world and one to the master pop network. )
    2009-10-08 17:45:44下载
    积分:1
  • Windows
    Windows程序设计,chm ,适合初级学习者(Windows programming, chm, suitable for primary learners)
    2009-10-23 20:04:58下载
    积分:1
  • developearcgis
    arcgis二次开发的总结,包括菜单控件的定制等.基础篇和提高篇(arcgis secondary development of a summary, including menu customization, and other controls. For the project and raise chapter)
    2007-01-15 10:27:26下载
    积分:1
  • CFarmMangement
    这是一个用MFC对话框连接数据库编写的源代码 (his is a source code written in MFC dialog box to connect to the )
    2014-12-11 20:32:32下载
    积分:1
  • Chicked
    Windows编程屏幕涂鸦程序.学习SDK编程的好代码。(Windows programming procedures screen graffiti. Learn good SDK programming code.)
    2009-03-11 15:21:11下载
    积分:1
  • chkver
    计算机启动日期和病毒提示VC++程序(computer virus launch date and suggested VC Program)
    2005-03-02 21:55:46下载
    积分:1
  • VC-ASM
    VC中使用内联汇编-对混合编程学习很实用(VC used in inline assembly- a very useful study of mixed programming)
    2009-09-04 09:04:54下载
    积分:1
  • 56736264
    动态改变控件尺寸,VB精选编程学习源码,很好的参考资料。(When running the VB control intelligent or selected learning programming source code, VB select learning programming source code, a good reference.)
    2013-11-24 23:15:03下载
    积分:1
  • 696516资源总数
  • 106658会员总数
  • 16今日下载