<%@ Page Language="VB" %>
Sub btnConvert_Click(sender As Object, e As EventArgs)
Try
lblToInt.Text = cint(txtValueToConvert.Text)
Catch
lblToInt.Text = "Could not convert to Integer"
End Try
Try
lblToDateTime.Text = cdate(txtValueToConvert.Text)
Catch
lblToDateTime.Text = "Could not convert to Date/Time"
End Try
Try
lblToBoolean.Text = cbool(txtValueToConvert.Text)
Catch
lblToBoolean.Text = "Could not convert to Boolean"
End Try
End Sub
Original input:
Convert to Integer produces:
Convert to Date/Time produces:
Convert to Boolean produces: