Aprenda de uma forma simples , objetiva e direta os ... - Macoratti.net
Aprenda de uma forma simples , objetiva e direta os ... - Macoratti.net
Aprenda de uma forma simples , objetiva e direta os ... - Macoratti.net
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
Curso <strong>de</strong> Introdução a Plata<strong>forma</strong> .Net FrameWork SDK<br />
Exempl<strong>os</strong> e Exercíci<strong>os</strong><br />
Exemplo 01 – Função Format( ).<br />
Imports System<br />
Imports Micr<strong>os</strong>oft.VisualBasic<br />
Imports Micr<strong>os</strong>oft.VisualBasic.Strings<br />
Module FormNewDataVB<br />
Sub Main( )<br />
Dim VarDataNow As DateTime = DateTime.Now<br />
Dim VarM<strong>os</strong>tra As String<br />
Console.WriteLine(" ---- Função FormatDateTime ---- ")<br />
VarM<strong>os</strong>tra = FormatDateTime(VarDataNow, DateFormat.GeneralDate)<br />
Console.WriteLine("DateFormat.GeneralDate = "& VarM<strong>os</strong>tra)<br />
VarM<strong>os</strong>tra = FormatDateTime(VarDataNow, DateFormat.ShortDate)<br />
Console.WriteLine("DateFormat.ShortDate = "& VarM<strong>os</strong>tra)<br />
VarM<strong>os</strong>tra = FormatDateTime(VarDataNow, DateFormat.LongDate)<br />
Console.WriteLine("DateFormat.LongDate = "& VarM<strong>os</strong>tra)<br />
VarM<strong>os</strong>tra = FormatDateTime(VarDataNow, DateFormat.ShortTime)<br />
Console.WriteLine("DateFormat.ShortTime = "& VarM<strong>os</strong>tra)<br />
VarM<strong>os</strong>tra = FormatDateTime(VarDataNow, DateFormat.LongTime)<br />
Console.WriteLine("DateFormat.LongTime = "& VarM<strong>os</strong>tra)<br />
Console.WriteLine( )<br />
Console.WriteLine(" ---- Função Format ---- ")<br />
VarM<strong>os</strong>tra = Format(VarDataNow, "dd")<br />
Console.WriteLine("Format(VarDataNow, 'dd') : "& VarM<strong>os</strong>tra)<br />
VarM<strong>os</strong>tra = Format(VarDataNow, "ddd")<br />
Console.WriteLine("Format(VarDataNow, 'ddd') : "& VarM<strong>os</strong>tra)<br />
VarM<strong>os</strong>tra = Format(VarDataNow, "dddd")<br />
Console.WriteLine("Format(VarDataNow, 'dddd') : "& VarM<strong>os</strong>tra)<br />
VarM<strong>os</strong>tra = Format(VarDataNow, "M")<br />
Console.WriteLine("Format(VarDataNow, 'M') : "& VarM<strong>os</strong>tra)<br />
VarM<strong>os</strong>tra = Format(VarDataNow, "MMMM")<br />
Console.WriteLine("Format(VarDataNow, 'MMMM') : "& VarM<strong>os</strong>tra)<br />
VarM<strong>os</strong>tra = Format(VarDataNow, "y")<br />
Console.WriteLine("Format(VarDataNow, 'y') : "& VarM<strong>os</strong>tra)<br />
VarM<strong>os</strong>tra = Format(VarDataNow, "yyyy")<br />
Console.WriteLine("Format(VarDataNow, 'yyyy') : "& VarM<strong>os</strong>tra)<br />
VarM<strong>os</strong>tra = Format(VarDataNow, "hh")<br />
Console.WriteLine("Format(VarDataNow, 'hh') : "& VarM<strong>os</strong>tra)<br />
VarM<strong>os</strong>tra = Format(VarDataNow, "HH")<br />
Console.WriteLine("Format(VarDataNow, 'HH') : "& VarM<strong>os</strong>tra)<br />
VarM<strong>os</strong>tra = Format(VarDataNow, "mm")<br />
Console.WriteLine("Format(VarDataNow, 'mm') : "& VarM<strong>os</strong>tra)<br />
VarM<strong>os</strong>tra = Format(VarDataNow, "ss")<br />
Console.WriteLine("Format(VarDataNow, 'ss') : "& VarM<strong>os</strong>tra)<br />
Console.WriteLine( )<br />
Console.WriteLine(" ---- Format<strong>os</strong> Personalizad<strong>os</strong> ---- ")<br />
VarM<strong>os</strong>tra = Format(VarDataNow, "dd/MM/yyyy")<br />
Console.WriteLine("Format(VarDataNow, 'dd/MM/yyyy') : "& VarM<strong>os</strong>tra)<br />
VarM<strong>os</strong>tra = Format(VarDataNow, "dddd dd/MMMM/yyyy")<br />
Console.WriteLine("Format(VarDataNow, 'dddd dd/MMMM/yyyy') : "& VarM<strong>os</strong>tra)<br />
VarM<strong>os</strong>tra = Format(VarDataNow, "ddd/MMM/yy HH:mm:ss")<br />
Console.WriteLine("Format(VarDataNow, 'ddd/MMM/yy HH:mm:ss') : "& VarM<strong>os</strong>tra)<br />
End Sub<br />
End Module<br />
76