Übersicht - Suchen - Neueste 50 Beiträge - Neuer Beitrag - Login - Registrieren INFO - FAQ - CC2-Forum - CCPro-Forum

Re: VB.NET und CC Kategorie: Verschiedenes (von Christoph - 10.05.2004 14:47)

Als Antwort auf VB.NET und CC von Martin - 2.05.2004 14:48

Hallo Martin, Habe hier ein paar Programmfetzen in VB5 du brauchst nur das MSComm Steuerelement, schickst Bytes mit Chr()an die CC und von der CC Text an die serielle Schnittstelle. Denke, das geht genauso in VB.Net ?! Gruß Christoph > Habe in der Zwischenzeit etwas Ahnung von der Programmierung des CC und der Kommunikation mit > dem Hyperterminal. Nun bin ich daran meine ersten geh versuche mit vb.net zu machen. Hat jemand > von euch Erfahrung ob und wie ich über com 1 mit vb den CC ansteuern kann. Hat mir jemand vielleicht > einen Programmcode oder weis eine gute Page dazu? Bin für jeden Hinweis dankbar. '=========== 'START '=========== Private Sub Form_Load()     MSComm1.CommPort = 1     MSComm1.Settings = "9600,N,8,1"     MSComm1.InputLen = 0     .......... '=========== 'Port öffnen '=========== Private Sub pon()     If MSComm1.PortOpen = False Then     MSComm1.PortOpen = True             End If End Sub ......... '=========== 'Uhr stellen '=========== Private Sub cmdUhr_Click() pon MSComm1.InputLen = 0 MSComm1.Output = Chr(100) MSComm1.Output = Chr(Hour(Time)) MSComm1.Output = Chr(Minute(Time)) MSComm1.Output = Chr(Day(Date)) MSComm1.Output = Chr(Month(Date)) MSComm1.Output = Chr(Format(Date, "yy")) End Sub ........... '======== 'AUSLESEN '======== .......         Instring = MSComm1.Input         Outstring = Outstring & Instring         txt1.Text = Outstring ......         '=============== 'Port schliessen '=============== Private Sub poff()     If MSComm1.PortOpen = True Then     MSComm1.PortOpen = False     End If End Sub

Antwort schreiben

Bisherige Antworten: