Comments by Member 12292743 (Top 43 by date)

okay finally ive got something in the textbox! however i want it to be the case that each time you press the connect button a new reading appears. At the moment, I select the comport, press the connect button, a reading appears, then I have to press the disconnect button and then repeat for my second reading.

Also the previous reading does not get replaced by the current reading, in fact they appear alongside each other in the textbox, which is not what I want

what do you reckon it should be initialised as? what data type?

urgrnt - hopefully will see something meaningful to me in the textbox in a (roughly) couple of hours time?

When copying the code over and checking the question for submission, I think I introduced that mistake. But in my code, all q's are lower case.

So thats not it I'm afraid

is it possible for you to show me an example of what you mean?

sorry to be a pain guys, but i have implemented your suggestion and still nothing happens.

I noticed something strange, i put a breakpoint in the scrolldata function and when and step through and go line by line, an error message appears on this line:

SerialPort1.Write(outData, 0, 1)

telling me the port is closed.

I tried inserting SerialPort1.open() before but another error message appeared saying that the port was already open?

What do I do

how do i check if BytesToRead has the right value?

if i am right about the reading of more than 1 byte, how do i implement that into my code

but nothing changes in tbRx in which I want a temp value to be seen

also there is a discrepancy between what i want to write (bytes) and what i want to read( also bytes). How do I go about fixing that?

also there is a discrepancy between what i want to write (bytes) and what i want to read( also bytes). How do I go about fixing that?

will try to understand the fundamentals of debugging, thanks

ahh right that makes sense, thanks

yeah i typed the code in, dont ask why, it is "IsOpen" in the actual editor

haha no problem

its the comment in btn Connect sub

2 errors have appeared now.

Private Sub frmMain_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

‘When our form loads, auto detect all serial ports in the system and populate the cmbPort Combo box.

myPort = IO.Ports.SerialPort.GetPortNames() ‘Get all com ports available
cmbBaud.Items.Add(9600) ‘Populate the cmbBaud Combo box to common baud rates used

cmbBaud.Items.Add(19200)
cmbBaud.Items.Add(38400)
cmbBaud.Items.Add(57600)


For i = 0 To UBound(myPort)
cmbPort.Items.Add(myPort(i))
Next

cmbPort.Text = cmbPort.Items.Item(0) ‘Set cmbPort text to the first COM port detected
cmbBaud.Text = cmbBaud.Items.Item(0) ‘Set cmbBaud text to the first Baud rate on the list

btnDisconnect.Enabled = False ‘Initially Disconnect Button is Disabled

End Sub

Option strict on disallows late binding (port(i) has been highlighted


SECOND ERROR

Private Sub ReceivedText(ByVal [text] As String)
‘compares the ID of the creating Thread to the ID of the calling Thread
If Me.rtbReceived.InvokeRequired Then
Dim x As New SetTextCallback(AddressOf ReceivedText)
Me.Invoke(x, New Object() {(text)})
Else
Me.rtbReceived.Text &= [text]
End If
End Sub

ReceivedText has been underlined and this error message is shown
Option Strict on doesnt allow narrowing in implicit type conversions between PRivate Sub receievedtext(text as String) and delegate delegate Sub SetTextCallback(text as Byte)

sorry I meant to say hex not integer

yeah haha i doubt it, havent compiled. WHat do I need to add/change?

So would this work??


Imports System.IO.Ports
Public Class Form1

Dim ComPort As New SerialPort("COM1", 9600, Parity.None, 8, 1)

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

ComPort.Open()

End Sub

Private Sub cmdSend_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdSend.Click
Dim sendArray() As Byte = New Byte() {&H01, &H0, &H0, &H0, &H0, &H0, &H0, &H0}

ComPort.Write(sendArray, 0, 8)

End Sub

Public Function Read (
buffer As Byte(),
offset As Integer,
count As Integer
) As Integer

End Class

awesome, one more question. How do I get the data recieved from the port to be written in a textbox?

okay i understand. However how do I go about writing the function to receive hex?

is the cmdSend Sub looking okay?

yeah i've edited the question

Many thanks

I've put up a link to info about the sensor (it's a list of commands)

I've put up a link to info about the sensor (it's a list of commands)

I've put up a link to info about the sensor (it's a list of commands)

Okay a different question

Which of those are related to databases

Don't use DEFINE when you don't have to. Use constants instead or better yet enumeration.

Wow many thanks for your reply. I know other users aren't supposed to do my work for my nor did I expect them to do it, but I appreciate you going out of your way to do it. Thanks

What is the reason behind using the shift operator when skipping bits 'N>>=1'?

Oh my bad I was mixing up two problems.

One number as opposed to an array of numbers

Okay so I read up on bit masking and it's starting to make sense.

Let's look at a simpler problem: how would I find the largest binary gap for one number?

I appreciate your help btw

How does one apply a mask to a value?