Visual Basic.NET - objeto calendar

hola, alguien sabe como hacer para almacenar el valor que uno selecciona de un objeto calendar (fecha), en una variable?

si es un objeto calendar
m1=objeto calendar
Private Sub M1_DateSelected(ByVal sender As Object, ByVal e As System.Windows.Forms.DateRangeEventArgs) Handles M1.DateSelected
Dim j As String

j = M1.SelectionStart
MsgBox(j)
End Sub

si utilizas un onbeto datatimepicker

Private Sub DateTimePicker1_CloseUp(ByVal sender As Object, ByVal e As System.EventArgs) Handles DateTimePicker1.CloseUp

Dim j As String

j = DateTimePicker1.value
MsgBox(j)

End Sub