arduino e Visual Basic

International Português
1

estou usando esse código
agora mais só consego ler 1 entrada analógica como faço para ler as outras 15 entradas
vai o exemplo:
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick

SerialPort1.WriteLine(Chr(10))
Dim s As String
Dim a As String

Try
s = SerialPort1.ReadLine
TextBox1.Text = s
a = (s * 101.01)
VerticalProgressbar1.Value = a
Label1.Text = a

Catch ex As Exception

End Try

codigo arduino

int litros=0;

void setup()
{
Serial.begin(9600);
}
void loop()
{
if(Serial.read()==10)
{
litros=analogRead(A0);
litros=map(litros,0,1024,0,100);
String s=String (litros);
Serial.write(s[0]);
Serial.write(s[1]);
Serial.println();

2

Procura por algo chamado de protocolo de comunicação no fórum.

3

agora mais só consego ler 1 entrada analógica como faço para ler as outras 15 entradas

Em traços gerais crias um array que suporte todos os teus ints das entradas (ex int dataToSend[14]) e depois envias-lo todo pela Serie.No VB lês todos os bytes novamente para um array e separa-los para obteres os teus ints.
Nota que no VB um int são 4 bytes e no arduino um int são 2 bytes!
Como o Bubulindo te disse procura no fórum sobre protocolos de comunicação, pois para alem do que te disse convém colocares um carácter marcador de inicio e de fim nos dados que envias, de modo a saberes onde começam os dados e onde acabam.
Um bom material de estudo podes consultar aqui:

4

ok conseguir mais agora apareceu outro problema
não consigo fazer com que o Arduíno consiga ler
os comandos que mando com o vb
exemplo
escrevo na porta serial "a"
ele entende e liga o LED
gostaria de fazer uma formula que ele
ler-se os números separados
e mim desce a posição que si encontram
exemplo
0,264,723,1129,1867

delay1-0
delay2-264
delay3-723
delay4-1129
delay5-1867

como posso faser isso
obrigado

5

Nao te apareceu outro problema...

O problema e exactamente o mesmo, mas no sentido inverso.

Provavelmente procuras por uma funcao chamada atoi().