arduino与上位机VB串口通信

用pc控制LED灯
注意红色的LED灯，熄灭的
亮了，程序界面，注意要开启串口才能控制
注意，我的arduino板子占用com3,所以mscomm也要用3口，不要弄错了，这里走过弯路，隔天才发现的，（彩色小点PS加上的，方便
理解）。

下面是源码，方便复制：
--------------------------------------------------------
'vb写的上位机程序
Private Sub Command1_Click()
Comm3.PortOpen = True
End Sub
Private Sub Command2_Click()
Comm3.PortOpen = False
End Sub
Private Sub Command3_Click()
Comm3.Output = "a" '用a表示开灯
End Sub
Private Sub Command4_Click()
Comm3.Output = "b" '用b表示灭灯
End Sub
-----------------------------------------
//arduino程序
//通过电脑开关LED灯(LED灯负极连在arduino uno r3板数字3口，正极串一个1K 电阻后连板子5V电源正极
//
int led1=3; //把LED连在Arduino数字端口3
//初始化
void setup()
{
Serial.begin(9600); //启动串行通讯，波特率为9600b/s pinMode(led1,OUTPUT);
digitalWrite(led1,HIGH); //熄灭LED灯
}
//主程序
void loop()
{
char val;//定义变量val，用于暂存上位机发送来的字符
if(Serial.available()>0)//如果上位机发送来了字符
{
val=Serial.read(); //读取上位机发来的字符，并保存到val Serial.println(val); //显示接受到的字符
if(val=='a')//如果上位机发送字符'a'，
{
digitalWrite(led1,LOW); //点亮LED灯}
if(val=='b')//如果上位机发送字符'b'，
{
digitalWrite(led1,HIGH);//熄灭LED1 }
}
delay(100);//延时100ms
}。