' Visual Basic 2008 9.0 .NET Examples - Local Type Inference - New in Visual Basic 2008 - 9.0 : 
Class Example2
    Private Shared variable1
    Private Shared variable2 = "a"
    Public Shared Sub Main()
        variable1 = 1
        Dim variable3
        variable3 = 2S
        Dim variable4 = "b"c
        variable5 = "c"
        Dim variable6 = SomeFunction(variable4, variable5)
        Dim variable10 = 3UI
        'Stop
    End Sub
    Public Shared Function SomeFunction(ByVal variable7, _
                                        Optional ByVal variable8 = "d", _
                                        Optional ByVal variable9 = 4)
        SomeFunction = variable8
        'Stop
    End Function
End Class
' Visit www.studyvb.com for more examples.  Copyright 2003-2008 De Wolf.