[حريف برمجة]

كود :

if Textday.Text = "" or Textmonth.Text = "" or Textyear.Text = "" then
MsgBox("No Date")
Else
TextAllDate.Text = Textday.Text & "/" & Textmonth.Text & "/" & Textyear.Text
End if