using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.IO;

namespace MyDLL
{
    public class ClassDLL
    {
        public static int GetData()
        {
            Random rand = new Random();
            return rand.Next(0, 10);
        }
    }
}

Dim Value
Set Value = CreateObject("MyDLL.ClassDLL") 
WScript.Echo Value.GetData

MsgBox(Value.GetData)

WScript.Quit