в 16:40, 26 мая 2010

2010-05-26T16:40:06Z

Admin: 1 версия

2010-05-26T12:45:16Z

1 версия

Новая страница

==Double number format: 0:n3==

<source lang="vbnet">
Imports System
Public Class MainClass
Shared Sub Main()
"Declare variable
Dim dblNumber As Double
"Set number, divide numbers, and display results
dblNumber = 45.34
dblNumber /= 4.333
System.Console.WriteLine("Division test... " & dblNumber)
System.Console.WriteLine("With formatting: " & String.Format("{0:n3}", dblNumber))
End Sub
End Class

</source>

==Proper Title Case==

<source lang="vbnet">
Public Class MainClass
Public Shared Function ProperCase(ByVal Text As String) As String
Dim objCulture As New System.Globalization.CultureInfo("en-US")
Return objCulture.TextInfo.ToTitleCase(Text.ToLower)
End Function
Public Shared Sub Main
System.Console.WriteLine(ProperCase("this Is a Test"))
End Sub
End Class

</source>

==String Format: Currency==

<source lang="vbnet">
Imports System
Public Class MainClass
Shared Sub Main(ByVal args As String())
Dim amount, principal As Decimal " dollar amounts
Dim rate As Double " interest rate
Dim year As Integer " year counter
Dim output As String " amount after each year
principal = 1000
rate = 0.05
output = "Year" & vbTab & "Amount on deposit" & vbCrLf
" calculate amount after each year
For year = 1 To 10
amount = principal * (1 + rate) ^ year
output &= year & vbTab & _
String.Format("{0:C}", amount) & vbCrLf
Next
" display output
Console.WriteLine("Compound Interest" & output)
End Sub

End Class

</source>

← Предыдущая	Версия 16:40, 26 мая 2010
(нет различий)

VB.Net/Development/String Format - История изменений

в 16:40, 26 мая 2010

Admin: 1 версия