Pubblicato da Mario De Ghetto su 5 Marzo 2008
Per convertire una stringa in formato “gg/mm/aaaa” in un oggetto di tipo DateTime, è possibile utilizzare la seguente funzione:
Private Function ToDateTime(ByVal _
dataGG_MM_AAAA As String) As DateTime
Dim myCultureInfo As New _
System.Globalization.CultureInfo("it-IT", _
True)
Dim formato As String = "dd/MM/yyyy"
Return _
System.DateTime.ParseExact(dataGG_MM_AAAA, _
formato, myCultureInfo)
End Function
Per testare questa funzione, invece, potete provare il seguente codice:
Private Sub Form1_Load(ByVal sender _
As System.Object, _
ByVal e As System.EventArgs) _
Handles MyBase.Load
Dim dataStringa As String
Dim data As Date
dataStringa = "01/03/2008"
data = ToDateTime(dataStringa)
MessageBox.Show(Month(data)) ' <-- visualizza "3"
End Sub
Pubblicato su Tips | Contrassegnato da tag: Tips | 5 Commenti »
Pubblicato da Mario De Ghetto su 5 Marzo 2008
LINQ to Objects permette di eseguire interrogazioni su oggetti presenti in memoria.
Questa tecnica può essere applicata anche a un array, come possiamo vedere dal seguente esempio:
Public Class Form1
Private Sub Button1_Click(ByVal sender _
As System.Object, _
ByVal e As System.EventArgs) _
Handles Button1.Click
' variabili per composizione
' del messaggio finale:
Dim messaggio As String = ""
Dim NL As String = Environment.NewLine
' dichiarazione array:
Dim frutti() As String = _
{"mela", "pera", "banana", "mandarino"}
' dichiarazione della variabile che conterrà
' l'insieme delle stringhe restituite dalla
' query. La query è dichiarata nella stessa
' istruzione:
Dim fruttiPreferiti = _
From f In frutti _
Where f.StartsWith("m") _
Select f
' scorrimento dell'insieme delle stringhe
' per la composizione del messaggio:
For Each frutto In fruttiPreferiti
messaggio &= "Frutto: " & frutto & NL
Next
MessageBox.Show(messaggio)
End Sub
End Class
Le stringhe restituite dalla query sono “mela” e “mandarino”.
Pubblicato su LINQ, Tips | Contrassegnato da tag: LINQ, VB 2008 | Lascia un commento »
