Compare Dates present in two different Tables using C# and VB.Net in ASP.Net

Hey democloud,

Please refer below sample.

HTML

Holday :
<asp:TextBox runat="server" ID="txtValue" />

Namespaces

C#

using System.Data;

VB.Net

protected void Page_Load(object sender, EventArgs e)
{
    DataTable dt1 = new DataTable();
    dt1.Columns.AddRange(new DataColumn[] { new DataColumn("Date1", typeof(DateTime)) });
    dt1.Rows.Add("2/5/2019");
    dt1.Rows.Add("2/19/2019");
    dt1.Rows.Add("2/11/2019");
    dt1.Rows.Add("2/4/2019");
    dt1.Rows.Add("2/12/2019");
    dt1.Rows.Add("4/19/2019");
    dt1.Rows.Add("5/3/2019");

    DataTable dt2 = new DataTable();
    dt2.Columns.AddRange(new DataColumn[] { new DataColumn("Date2", typeof(DateTime)) });
    dt2.Rows.Add("4/19/2019");
    for (int i = 0; i < dt1.Rows.Count; i++)
    {
        for (int j = 0; j < dt2.Rows.Count; j++)
        {
            if (Convert.ToDateTime(dt1.Rows[i]["Date1"]) == Convert.ToDateTime(dt2.Rows[j]["Date2"]))
            {
                txtValue.Text = "1";
                return;
            }
            else
            {
                txtValue.Text = "0";
            }
        }
    }
}

VB.Net

Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load
    Dim dt1 As DataTable = New DataTable()
    dt1.Columns.AddRange(New DataColumn() {New DataColumn("Date1", GetType(DateTime))})
    dt1.Rows.Add("2/5/2019")
    dt1.Rows.Add("2/19/2019")
    dt1.Rows.Add("2/11/2019")
    dt1.Rows.Add("2/4/2019")
    dt1.Rows.Add("2/12/2019")
    dt1.Rows.Add("4/19/2019")
    dt1.Rows.Add("5/3/2019")
    Dim dt2 As DataTable = New DataTable()
    dt2.Columns.AddRange(New DataColumn() {New DataColumn("Date2", GetType(DateTime))})
    dt2.Rows.Add("4/19/2019")
    For i As Integer = 0 To dt1.Rows.Count - 1
        For j As Integer = 0 To dt2.Rows.Count - 1
            If Convert.ToDateTime(dt1.Rows(i)("Date1")) = Convert.ToDateTime(dt2.Rows(j)("Date2")) Then
                txtValue.Text = "1"
            Else
                txtValue.Text = "0"
            End If
        Next
    Next
End Sub

Screenshot