a = (":010612000020C70D0A")'这里肯定有问题
在尼金平等地区，都构建了全面的区域性战略布局，加强发展的系统性、市场前瞻性、产品创新能力，以专注、极致的服务理念，为客户提供成都做网站、成都网站设计 网站设计制作按需网站策划,公司网站建设,企业网站建设,高端网站设计,成都全网营销推广,外贸网站建设,尼金平网站建设费用合理。
括号必须在引号里面，不然编译不过的
你的问题是没有发送确认符，一般串口指令末尾都有换行确认符vbCr，下位机接收到vbCr后才认为是一条完整指令，改成下面的试验
Dim a As String = ":010612000020C70D0A" vbCr
可以的，把项目的类型设成类库，将所有的函数用Public修饰附封装在类里面，生成dll文件。这样别人就可以在别人项目属性的引用页里面添加对你的dll文件的引用，然后导入命名空间，直接使用了。
比如说，在一个项目里：
NameSpace Controller
Public Class ControlMachine
Public Sub Boot()
End Sub
Public Sub Shutdown()
End Sub
End Class
End NameSpace
进入另一个项目的项目属性，进入引用页，添加到那个dll文件的引用。在代码中：
Imports Controller '加在代码文档的最顶端
使用：
Dim controller As New ControlMachine
controller.Boot()
controller.Shutdown()
希望你能了解，不懂再追问
1、发送数据需要协议支持
自己设计一个协议，协议是什么，是两个通信段之间的约定。比如我说，我打一个奥特曼的手势表示已经看到美女了，这就是一个协议。协议完成将bit转换为对应的含义。
2、需要编程技术的支持
你怎样获取数据，将数据如何处理，怎样保存。这个需要你自己的技术支持，这里的回答没法帮你。花钱报个班吧，如果你还在上大学，那么选个选修课好好听课。下课多做小程序，就会学会了。
Do
System.Windows.Forms.Application.DoEvents()
Loop Until AxMSComm1.InBufferCount 0
死循环。