Zliczanie liczb tablicy

[viamrimar]

Podpowie ktos jak napisać cos takiego w vb.net:

private static void Main(string[] args)
{
int[] table1 = { 1, 2, 3, 4, 1, 2, 3, 4, 1, 2, 3, 4, 1, 2, 3, 4, };
int[] table2 = {1, 2, 3, 4, 5, 6, 7, 8, 9, 9, 9};
var merge = table1.Concat(table2).ToArray();
var dist = merge.Distinct();
 
foreach (var i in dist)
{
var iloc = merge.Count(x => x.Equals(i));
Console.WriteLine(i + " : " + iloc);
}
Console.ReadKey();
} 

[piotrek693206]

Proszę :

Private Shared Sub Main(args As String())
    Dim table1 As Integer() = {1, 2, 3, 4, 1, 2, _
        3, 4, 1, 2, 3, 4, _
        1, 2, 3, 4}
    Dim table2 As Integer() = {1, 2, 3, 4, 5, 6, _
        7, 8, 9, 9, 9}
    Dim merge = table1.Concat(table2).ToArray()
    Dim dist = merge.Distinct()

    For Each i As var In dist
        Dim iloc = merge.Count(Function(x) x.Equals(i))
        Console.WriteLine(Convert.ToString(i) & " : " & Convert.ToString(iloc))
    Next
    Console.ReadKey()
End Sub

[viamrimar]

Jak zrobic by przeszlo cos takiego?

  Dim merge = da.Concat(db.ToArray(), dc.ToArray())

czyli porownanie z tablicy da z tablicami db i dc?

[viamrimar]

Mam taki kod ktory wykonuje juz to co chce ale jest w c, pomogl by ktos to zmienic na vb.net

#include <iostream>
#include <map>
using namespace std;

int main()
{
    map<int, int> val;
    int t_1[] = {35,30,30}, t_2[] = {20,20,30}, t_3[] = {35,30,50};
    for (int i = 0; i < 3; i++)
    {
        val[t_1[i]]++;
        val[t_2[i]]++;
        val[t_3[i]]++;
    }
    for (map<int, int>::iterator i = val.begin(); i != val.end(); i++)
        cout << i->first << ':' << i->second << endl;
    return 0;
}