lcDay = STR(Myspinner.value) lcMonth = STR(cmbMonth.List[ ListIndex ]) dDate = ctod(lcMonth+"/"+lcYear+"/"+str(year(date())))