Innanzi
tutto chiariamo in quale contesto è meglio usare
un Function piuttosto che una Sub-Function.
La
Sub è utile quando abbiamo del codice che non deve
restituire alcun valore.
La
Function invece è da considerare quando si presenta
la necessità di restituire qualche valore.
-
Sub -
<CODE>
Sub NameOfSubRoutine(parameter1,
parameter2)
'some
code...
End Sub
</CODE>
-
Function -
<CODE>
Function CheckForSpaces(x)
If InStr(x," ")
> 0 Then
CheckForSpaces
= true
Else
CheckForSpaces
= false
End If
End Function
</CODE>
By:
Jared Stauffer
PASSAGGIO
DI VARIABILI CON UNA FUNCTION O SUB-FUNCTION
NameOfFunction(parameter1,
parameter2)
o
più direttamente...
CheckForChar(eaddress,
"@")
Per
utilizzare il valore restituito da una Function
il metodo più pratico è quello di usare una sintassi
del tipo:
variabilefinale = ChackForChar(eaddress, "@")
Manipolazione
di date
-
Isolamento di un particolare -
Vediamo
con un esempio questo discorso, in quanto la manipolazione
delle date risulta indispensabile ai fini di analisi
e impostazione filtri.
<CODE>
var1
= Now()
Response.Write("var1 = " & var1 &
"<br>")
Response.Write("var1 part yyyy = " &
DatePart("yyyy", var1) & "<br>")
Response.Write("var1 part m = " &
DatePart("m", var1) & "<br>")
Response.Write("var1 part q = " &
DatePart("q", var1) & "<br>")
Response.Write("var1 part y = " &
DatePart("y", var1) & "<br>")
Response.Write("var1 part d = " &
DatePart("d", var1) & "<br>")
Response.Write("var1 part w = " &
DatePart("w", var1) & "<br>")
Response.Write("var1 part ww = " &
DatePart("ww", var1) & "<br>")
Response.Write("var1 part h = " &
DatePart("h", var1) & "<br>")
Response.Write("var1 part n = " &
DatePart("n", var1) & "<br>")
Response.Write("var1 part s = " &
DatePart("s", var1) & "<br>")
</CODE>
Risultato:
var1 = 9/1/99 1:18:15 PM
var1 part yyyy = 1999
var1 part m = 9
var1 part q = 3
var1 part y = 244
var1 part d = 1
var1 part w = 4
var1 part ww = 36
var1 part h = 13
var1 part n = 18
var1 part s = 15
-
Day, Mounth, Year... -
<CODE>
var1
= "04/04/1999"<br>
Response.Write("var1 = " & var1 &
"<br>")
Response.Write("For var1 the day is "
& Day(var1) & "<br>")
Response.Write("For var1 the month is "
& Month(var1) & "<br>")
Response.Write("For var1 the year is "
& Year(var1) & "<br>")
Response.Write("For var1 the weekday is "
& WeekDay(var1, 1) & "<br>")
Response.Write("For var1 the weekdayname is
" & WeekDayName(WeekDay(var1), false, 1)
& "<br>")
</CODE>
Results:
var1 = 04/04/1999
For var1 the day is 4
For var1 the month is 4
For var1 the year is 1999
For var1 the weekday is 1
For var1 the weekdayname is Sunday