|
<%@ Page Language="VB" %>
<script runat="server">
sub Page_Load(Sender as object, e as eventargs)
dim strDay as string
dim arrWeekDays() as String = {"Monday", "Tuesday", _
"Wednesday", "Thursday", "Friday"}
For Each strDay in arrWeekDays
Response.Write(strDay & "<br>")
exit for
Next
end sub
</script>
<html><body>
</body></html>
|