[الجندى]

السلام عليكم
أستأذن أستاذ حريف برمجة على شرح مثاله

ببساطة
نهيأ الفورم كما بالشكل


ثم ندخل صفحة الكود و نمسح مابه من كود ونضع هذا الكود

كود :

Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        MonthCalendar1.Visible = True
    End Sub

    Private Sub MonthCalendar1_DateSelected(sender As Object, e As DateRangeEventArgs) Handles MonthCalendar1.DateSelected
        TextBox1.Text = MonthCalendar1.SelectionStart.ToShortDateString
        MonthCalendar1.Visible = False
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        DateTimePicker1.Visible = True
    End Sub

    Private Sub DateTimePicker1_ValueChanged(sender As Object, e As EventArgs) Handles DateTimePicker1.ValueChanged
        TextBox2.Text = DateTimePicker1.Value.ToString("yyyy/MM/dd")
        DateTimePicker1.Visible = False
    End Sub

  
End Class