Data Binding ASP.Net


  Sub Page_Load()
   Dim DueDate As Date
   Dim CheckOutDate As Date
   CheckoutDate = Now()
   DueDate = FindDueDate(CheckoutDate)
   Message1.text = "
Your books were checked OUT on "& CheckOutDate
   Message2.text = "
Your books are due on " & DueDate
  End Sub
 
  Function FindDueDate(CheckOutDate As Date) As Date
     return DateValue(DateAdd("d", 14, CheckOutDate)) 
  End Function



Sample Function Page


  

Thank you for using the On-Line Library.