新网创想网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
主要是对SerialPort控件的编程和数据库的读取,
成都创新互联"三网合一"的企业建站思路。企业可建设拥有电脑版、微信版、手机版的企业网站。实现跨屏营销,产品发布一步更新,电脑网络+移动网络一网打尽,满足企业的营销需求!成都创新互联具备承接各种类型的做网站、成都网站建设项目的能力。经过十载的努力的开拓,为不同行业的企事业单位提供了优质的服务,并获得了客户的一致好评。
在数据库读取方面可以用 DataSet ,BindingSource , TableAdapter 等数据绑定控件,
SerialPort控件的具体读写方法建议你看MSDN,大概是:
Private Sub 关闭和启动串口()
Try
If 串口.IsOpen Then
串口.Close()
End If
串口.Open()
Catch ex As Exception
''''
End Try
End Sub
Private Sub 串口的读与写()
......
Dim 发送字节() As Byte, 返回字节 As Byte
Try
'例如要发送字节: 6D
发送字节 = BitConverter.GetBytes(CByte("H6D"))
串口.Write(发送字节, 0, 1)
......
'例如读串口返回的字节
返回字节 = 串口.ReadByte
Catch ex As Exception
''''
End Try
......
End Sub
'等等
VB.NET里用GDI+画指示灯其实很简单,稍微查一点资料就能找到gdi+语句的用法的。用GDI+可以画很多种图形,圆形半圆形自然不在话下。如果有很多指示灯在一起的话,改起来也很方便。
当然如果嫌GDI+麻烦可以用label控件,把autosize关掉,将尺寸调小一点,然后利用backcolor调背景颜色作为指示灯,只不过是方形的。
如果指示灯很多而且频繁换颜色的话建议用GDI+,因为GDI+效率高一些
SCON = 0x50; //REN=1允许串行接受状态,串口工作模式1 TMOD|= 0x20; 试下这个程序,PC发什么,它就回送什么,收到数据,点亮P2.0的LED。
通过使用VB的Timer控件,程序员可以轻松的在窗体上实现闪烁文字的效果。本文将演示如何为Label控件加上闪烁效果,这种方法同样适用于其它多种控件。以下代码可以完成检验ForeColor属性的任务: Private Sub Timer1_Timer() If Label1.ForeColor = Label1.BackColor Then Label1.ForeColor = vbBlack Else Label1.ForeColor = Label1.BackColor End If End Sub 另外,你也可以让文字采用不同的颜色,比如交替采用红色和绿色: Private Sub Timer1_Timer() If Label1.ForeColor = vbRed Then Label1.ForeColor = vbGreen Else Label1.ForeColor = vbRed End If End Sub 当你停止文字闪烁时,还要确定文字的状态是可见的并且采用了合适的色彩。