you don't have to search all the internet, just look in these forums, everything is here. i might make a youtube video tutorial on how to set it up, good idea.
here's a way to receive data, it's an event that gets called when data arrives at the com port:
Sub EventHandler(sender As Object, e As System.IO.Ports.SerialDataReceivedEventArgs) Handles Arduino.DataReceived
Dim datareceived As Boolean = False
Dim recStr as String = ""
While Not datareceived
Dim recVal As Integer
recVal = Arduino.ReadByte()
If recVal = 10 Or recVal = 13 Then
datareceived = True
Else
recStr = recStr + Chr(recVal)
End If
End While
End Sub
at the end, recStr contains the string sent by Serial.println(), it MUST be println() and not print(), otherwise the receiving will get caught in endlessly receiving (untill you send ascii 10 or 13 (NL and CR))