资讯

精准传达 • 有效沟通

从品牌网站建设到网络营销策划,从策略到执行的一站式服务

vb.net與單片機 单片机可以用vb编写程序吗

求VB.NET通过将textboxz中的数据转化为16进制数通过串口发送到单片机的程序

Private Sub hexSend()

创新互联是一家专注于成都网站设计、成都做网站和四川服务器托管的网络公司,有着丰富的建站经验和案例。

On Error Resume Next

Dim outputLen As Integer

Dim outData As String

Dim SendArr() As Byte

Dim TemporarySave As String

Dim dataCount As Integer

Dim i As Integer

outData = UCase(Replace(txtSend.Text, Space(1), Space(0)))

outData = UCase(outData)

outputLen = Len(outData)

For i = 0 To outputLen-1

TemporarySave = Mid(outData, i + 1, 1)

If (Asc(TemporarySave) = 48 And Asc(TemporarySave) = 57) Or (Asc(TemporarySave) = 65 And Asc(TemporarySave) = 70) Then

dataCount = dataCount + 1

Else

Exit For

Exit Sub

End If

Next

If dataCount Mod 2 0 Then

dataCount = dataCount - 1

End If

outData = Microsoft.VisualBasic.Left(outData, dataCount)

ReDim SendArr(dataCount / 2 - 1)

For i = 0 To dataCount / 2 - 1

SendArr(i) = Val("h" + Mid(outData, i * 2+1, 2))

Next

SerialPort1.Write(SendArr, 0, 1)

End Sub

修改几处就好用了。

vb.net程序可以在单片机上运行吗?

绝对不行!基于x86处理器构架的程序,是不能在不是x86构架的单片机上运行的。

STC8A8K64S4A12单片机程序

这个可以有,是51的,用到STC8A8K64S4A12上应该不成问题。

#include STC89.H

unsigned char tmp;

sbit shebei1=P1^0;//定义控制设备的IO口

sbit shebei2=P1^1;

sbit shebei3=P1^2;

sbit shebei4=P1^3;

sbit shebei5=P1^4;

sbit shebei6=P1^5;

void main()

{

TMOD = 0x20; // 定时器1工作于8位自动重载模式, 用于产生波特率

TH1 = 0xFD; // 波特率9600

TL1 = 0xFD;

SCON = 0x50; // 设定串行口工作方式

PCON = 0xef; // 波特率不倍增

TR1 = 1; // 启动定时器1

IE = 0x0; // 禁止任何中断

while(1)

{

if(RI) // 是否有数据到来

{

RI = 0;// 清接收标志

tmp = SBUF; // 暂存接收到的数据

switch(tmp )

{

case 0x22:shebei1=0;break;//关设备1

case 0x33:shebei1=1;break;//开设备1

case 0x44:shebei2=0;break;

case 0x55:shebei2=1;break;

case 0x66:shebei3=0;break;

case 0x77:shebei3=1;break;

case 0x88:shebei4=0;break;

case 0x99:shebei4=1;break;

// case 0xaa:shebei5=0;break;

// case 0xbb:shebei5=1;break;

// case 0xcc:shebei6=0;break;

// case 0xdd:shebei6=1;break;

case 0x17:shebei5=0;break;

case 0x18:shebei5=1;break;

case 0x19:shebei6=0;break;

case 0x20:shebei6=1;break;

}

}

}

}

void delayms(unsigned char ms)

// 延时子程序

{

unsigned char i;

while(ms--)

{

for(i = 0; i 120; i++);

}

}

visual basic 和visual basic .NET有什么区别

一个需要.net框架,一个不需要,学单片机就不要 vb.net了,vb.net一般都用于企业级软件的开发,随着C#的普及,用 vb.net的也越来越少了。单纯用好vb脚本也很不错


分享文章:vb.net與單片機 单片机可以用vb编写程序吗
分享地址:http://cdkjz.cn/article/dooohsi.html
多年建站经验

多一份参考,总有益处

联系快上网,免费获得专属《策划方案》及报价

咨询相关问题或预约面谈,可以通过以下方式与我们联系

业务热线:400-028-6601 / 大客户专线   成都:13518219792   座机:028-86922220