I suppose you want to add a day to the current date.
What do you want to do in this line ?
EditText1.Text = d + m + y + jd
Add values or concacatenate strings.
To concacatenate strings you should use:
EditText1.Text = d & m & y & jd
To add a day you can do it that way:
EditText1.Text = DateTime.Date(DateTime.Add(DateTime.Now, 0, 0, 1))
What is jd supposed to be ?
Best regards.