Микроконтролери и електроника
http://mcu-bg.com/mcu_site/

Как да визуализирам дани в VB 6.0 през COM Port
http://mcu-bg.com/mcu_site/viewtopic.php?f=16&t=13277		 Страница 1 от 1
Автор:  BugMan [ Пон Окт 20, 2014 10:57 pm ]
Заглавие:  Как да визуализирам дани в VB 6.0 през COM Port
Здравейте, и преди съм писал в този форум и съм получавал адекватни и точни отговори след много блъскане на главата реших да се допитам до вас. Така въпроса ми е как да визуализирам данни в VB 6.0 идващи от един pic16f1829 минаващи през FT232Rl асинхронен мод 8n1 9600 през Virtual Port и до Vb 6.0. Изпращам 16 битово число по този начин от Pica EUSART_Write(rpm_value>>8); EUSART_Write(rpm_value); към Vb 6.0 чета от порта но ми изкарва произволни знаци който подозирам че са ASCI но опитах какъв ли не начин да ги преопразувам до десетични числа и не успявам. Използвах една cmd конзола да видя дали даните ми идват правилно и да те идват каквито ги очаквам пример 0001 0101 и се менят постояно като нарастват с увеличаване на една променива.
Автор:  goose [ Вто Окт 21, 2014 6:57 am ]
Заглавие:  Re: Как да визуализирам дани в VB 6.0 през COM Port
Mainstream Support for Microsoft Visual Basic 6.0 ended on March 31, 2005. Extended support ended in March 2008.
Не се занимавай с мъртъв софтуер - мини към нещо поддържано
Автор:  stefan63 [ Вто Окт 21, 2014 7:35 am ]
Заглавие:  Re: Как да визуализирам дани в VB 6.0 през COM Port
Много ти е объркан въпросът. Ако питаш как да го направиш непременно във VB6 - нямам идея :-) . Ако питаш как да си визуализираш данните - ей това може да ти свърши работа
http://www.fast-product-development.com ... -plot.html
Автор:  CarBeta [ Вто Окт 21, 2014 9:04 am ]
Заглавие:  Re: Как да визуализирам дани в VB 6.0 през COM Port
Код:
Private Sub comm_OnComm()
If comm.CommEvent <> comEvReceive Then Exit Sub

  sInput = comm.Input
;тук ти е кода, който визуализира данните където трябва

End Sub


comm ти е съответния порт, който ще четеш.
Буфера ти е един байт.
Данните са "CHAR".
Ако искаш HEX -> sInput = Hex(Asc(comm.Input))
Автор:  DanielDimov [ Вто Окт 21, 2014 9:13 am ]
Заглавие:  Re: Как да визуализирам дани в VB 6.0 през COM Port
Аз не бих използвал comm control - нестабилно и капризно...

Използвал съм ето това: http://www.thescarms.com/Downloads/CommIO.zip - работи желязно.
Автор:  BugMan [ Чет Окт 23, 2014 7:57 pm ]
Заглавие:  Re: Как да визуализирам дани в VB 6.0 през COM Port
Супер вече пиша на Visual Studio 2013 и пак немога да преобразувам Asci to dec :D ако някои може да помогне моля,
ето това е кода:
Private Sub ReceivedText(ByVal [text] As String) 'input from ReadExisting
If Me.RichTextBox2.InvokeRequired Then
Dim x As New SetTextCallback(AddressOf ReceivedText)
Me.Invoke(x, New Object() {(text)})
Else
Me.RichTextBox2.Text &= [text] 'append text
End If
End Sub
Автор:  Cekins [ Чет Окт 23, 2014 8:27 pm ]
Заглавие:  Re: Как да визуализирам дани в VB 6.0 през COM Port
Добре де - няма ли хелп? Гугъл също знае тва онова. Всички знаят как се преобразува char към int. В повечето случаи е : a=int(b) , с вариации в синтаксиса...
Страница 1 от 1 Часовете са според зоната UTC + 1 час [ DST ]
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/