Omskrive til VB.net

Hej

Er der en der kan omskrive denne funktion til VB.net?

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;

namespace LagerBeholdning
{
    public partial class Main : Form
    {
        public Main()
        {
            InitializeComponent();
        }

        public string HentBeholdning(string bruger, string password, params string[] vvsNumbers)
        {
            SaniService.PrisRequestSaninummer[] prisRequestSaninummer = new SaniService.PrisRequestSaninummer[vvsNumbers.Length];
            for (int i = 0; i < vvsNumbers.Length; i++)
            {
                prisRequestSaninummer[i] = new SaniService.PrisRequestSaninummer();
                prisRequestSaninummer[i].Nummer = vvsNumbers[i].Trim();
            }

            SaniService.PrisRequest prisRequest = new SaniService.PrisRequest();
            prisRequest.Bruger = bruger;
            prisRequest.Password = password;
            prisRequest.Saninummer = prisRequestSaninummer;

            SaniService.SaniWebservice saniWebservice = new SaniService.SaniWebservice();

            SaniService.PrisResponse prisResponse = saniWebservice.PrisOgBeholdning(prisRequest);
            string message = "";
            if (prisResponse != null)
            {
                if (prisResponse.Fejl != null)
                {
                    message = "Fejl: " + prisResponse.Fejl;
                }
                else
                {
                    foreach (SaniService.PrisResponseSaninummer prisResponseSaninummer in prisResponse.Saninummer)
                    {
                        message += prisResponseSaninummer.Nummer + " Beholdning: " + prisResponseSaninummer.Beholdning + "\n";
                    }
                }

                message = message.TrimEnd('\n');
            }
            else
            {
                message = "Fejl";
            }
            return message;
        }

        private void button1_Click(object sender, EventArgs e)
        {
            this.Cursor = Cursors.WaitCursor;
            this.richTextBox1.Text = HentBeholdning(userName.Text, password.Text, textBox3.Text.Split(','));
            this.Cursor = Cursors.Default;
        }
    }
}