Contact: aviboots(AT)netvision.net.il
41,301 questions
53,811 answers
573 users
Module Module1 Sub Main() Dim dic As New Dictionary(Of Integer, String) dic.Add(1, "VB.NET") dic.Add(2, "Java") dic.Add(5, "C++") dic.Add(9, "PHP") Console.WriteLine(dic.Count) End Sub End Module ' run: ' ' 4