Visual Basic 6 z pic mikrokontrolera

K

kotsam

Guest
Hi All,

Czy ktoś może mi powiedzieć jak mogę wysłać ASCII kod języka Visual Basic do pic mikrokontrolera, przy użyciu rs232 MAX232 z com1, np. chcę wysłać '0 'to pic które d'48', jak to zrobićdziękuje wszystkim

 
Cześć.

Check this out:

http://www.rentron.com/VisualBasic.htm<img src="http://www.edaboard.com/images/smiles/icon_biggrin.gif" alt="Very Happy" border="0" /><img src="http://www.edaboard.com/images/smiles/icon_biggrin.gif" alt="Very Happy" border="0" /><img src="http://www.edaboard.com/images/smiles/icon_biggrin.gif" alt="Very Happy" border="0" />
 
Tak, widziałem tej stronie ...ale jak widać to wysyłając polecenia tuż danych ...
Chodzi o to, aby użyć kodu ASCII

 
Najpierw musisz skonfigurować PIC UART łączący port szeregowy komputera.Następnie, wykorzystując MSComm kontroli ActivX w VB można wysłać cokolwiek chcesz do zarządu PIC.

 
Cześć wam wszystkim

pierwsze dziękuję za odpowiedź,

niech się np. do zrozumienia, że lepiej, aby utworzyć przycisk polecenia w języku Visual Basic i pozwala stwierdzić, czy i nacisnąć ten przycisk it's gonna wysłać znak "0", która jest d'48 '(ACSII KOD) do pic pierwszy mam do skonfigurować MScomm

Zrobiłem to, o ile:

Option Explicit

Private Sub cboBaud_Click ()

On Error GoTo BaudErr

Jeśli MSComm1.PortOpen Następnie
MSComm1.PortOpen = False
End If
MSComm1.Settings = cboBaud.Text & ", n, 8,1"
MSComm1.PortOpen = True

BaudErr:

If Err <> 0 Then
MsgBox Error $ (Err)
End If

End Sub

tak teraz problem, jak mam zamiar wysłać d'48 'to pic,

dzięki

 
do pisania znaków, który chcesz wysłać, tylko zrobić to:mscomm1.output = '0 '

ów wszystko co musisz zrobić

i do odczytu bufora
Dim x As String
x = mscomm1.input

Jeśli masz więcej problemów, przejdź do MSDN i szukać kontroli mscomm

 
mam pytanie to to polecenie mscomm1.output = '0 'wyśle d'48' do Serail portu lub tylko charakter

 
to jest ten sam, 0 znaków po przecinku jest równa 48 lub szesnastkowym 30, wystarczy spojrzeć na kod ASCII!.

 

Welcome to EDABoard.com

Sponsor

Back
Top