eu tenho esse código
With SerialPort1
.Write("AT" & vbCrLf)
Threading.Thread.Sleep(1000)
.Write("AT+CMGF=1" & vbCrLf)
Threading.Thread.Sleep(1000)
.Write("AT+CMGS=" & Chr(34) & txtnumber.Text & Chr(34) & vbCrLf)
.Write(txtmessage.Text & Chr(26))
Threading.Thread.Sleep(1000)
End With
digamos que no txtmessage.Text
eu queira colocar tipo mensagem[i].Text
com uma lista de Array.
Exemplo:
Private Sub menssagem(txtmessage, TextBox1, TextBox2, TextBox3, TextBox4, TextBox5, TextBox6, TextBox7, TextBox8)
Dim menssagem(8) As Integer
End Sub
no total são 9 TextBox
que eu quero que sejam sorteadas para seguir com a função.
Outra coisa, no SerialPort1
é possivel eu inserir uma lista de array também? E se o SerialPort12
, digamos assim, ela esteja sem resposta, tem como dar um Next para o proximo da lista de array?