Arduino Code
#include <SPI.h>         // needed for Arduino versions later than 0018
#include <Ethernet.h>
#include <EthernetUdp.h>         // UDP library from: bjoern@cs.stanford.edu 12/30/2008
#include <Adafruit_NeoPixel.h>

#define UDP_TX_PACKET_MAX_SIZE 400

// Enter a MAC address and IP address for your controller below.
// The IP address will be dependent on your local network:
byte mac[] = {
  0xDE, 0xAD, 0xBE, 0xEF, 0xFE, 0xEC
};
IPAddress ip(192, 168, 1, 177);

unsigned int localPort = 88;      // local port to listen on

// buffers for receiving and sending data
char packetBuffer[UDP_TX_PACKET_MAX_SIZE];  //buffer to hold incoming packet,
char  ReplyBuffer[] = "acknowledged";       // a string to send back

// An EthernetUDP instance to let us send and receive packets over UDP
EthernetUDP Udp;


int numLEDs = 120;
Adafruit_NeoPixel strip = Adafruit_NeoPixel(numLEDs, 6, NEO_GRB + NEO_KHZ800); //pin 6


void setup() {
  // start the Ethernet and UDP:
  Ethernet.begin(mac, ip);
  Udp.begin(localPort);
  
  strip.begin();
  strip.show(); // Initialize all pixels to 'off'
}

void loop() {
  // if there's data available, read a packet

  PORTD |= 1<<2;
  int packetSize = Udp.parsePacket();
  PORTD &= !(1<<2);
  
  if (packetSize) {
    
    PORTD |= 1<<3;

    // read the packet into packetBufffer
    Udp.read(packetBuffer, UDP_TX_PACKET_MAX_SIZE);
    int i = 0;
    int idx = 0;
    
    PORTD &= !(1<<3);
    
    PORTD |= 1<<4;
    
    do{
      idx = 3 * i;
      strip.setPixelColor(i, packetBuffer[idx], packetBuffer[idx+1], packetBuffer[idx+2]); //nummer, r, g, b
      i++;
    } while (i < numLEDs);
    
    PORTD &= !(1<<4);
    
    PORTD |= 1<<5;
    strip.show();
    PORTD &= !(1<<5);

  }
  //delay(1);
}

 

VB Code
Dim myUdpSender As New UdpClient(0)

Private Sub init()
	Dim IPAd As String = "192.168.178.177"
	myUdpSender.Connect(IPAd, 88)    REM Destination IP and Port
End Sub

Private Sub send()
	myUdpSender.Send(myArray, myArrayLength)
End Sub

 

Timing