diff --git a/LINQ to Objects demo1/LINQ to Objects demo1.sln b/LINQ to Objects demo1/LINQ to Objects demo1.sln new file mode 100644 index 0000000..4bfe2b6 --- /dev/null +++ b/LINQ to Objects demo1/LINQ to Objects demo1.sln @@ -0,0 +1,26 @@ +Microsoft Visual Studio Solution File, Format Version 12.00 +# Visual Studio 14 +VisualStudioVersion = 14.0.25420.1 +MinimumVisualStudioVersion = 10.0.40219.1 +Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "VBLinqToObject", "VBLinqToObject\VBLinqToObject.vbproj", "{1F187E80-A962-4EC9-9886-C59EC100E625}" +EndProject +Project("{2150E333-8FDC-42A3-9474-1A3956D46DE8}") = "Solution Items", "Solution Items", "{66E60E0C-AE02-42BA-9281-2D9DE26F61F3}" + ProjectSection(SolutionItems) = preProject + C:\USERS\VBJAY\APPDATA\LOCAL\MICROSOFT\VISUALSTUDIO\14.0\EXTENSIONS\T4HCFCDO.0KS\description.html = C:\USERS\VBJAY\APPDATA\LOCAL\MICROSOFT\VISUALSTUDIO\14.0\EXTENSIONS\T4HCFCDO.0KS\description.html + EndProjectSection +EndProject +Global + GlobalSection(SolutionConfigurationPlatforms) = preSolution + Debug|Any CPU = Debug|Any CPU + Release|Any CPU = Release|Any CPU + EndGlobalSection + GlobalSection(ProjectConfigurationPlatforms) = postSolution + {1F187E80-A962-4EC9-9886-C59EC100E625}.Debug|Any CPU.ActiveCfg = Debug|Any CPU + {1F187E80-A962-4EC9-9886-C59EC100E625}.Debug|Any CPU.Build.0 = Debug|Any CPU + {1F187E80-A962-4EC9-9886-C59EC100E625}.Release|Any CPU.ActiveCfg = Release|Any CPU + {1F187E80-A962-4EC9-9886-C59EC100E625}.Release|Any CPU.Build.0 = Release|Any CPU + EndGlobalSection + GlobalSection(SolutionProperties) = preSolution + HideSolutionNode = FALSE + EndGlobalSection +EndGlobal diff --git a/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe.htm b/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe.htm new file mode 100644 index 0000000..1b2891c --- /dev/null +++ b/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe.htm @@ -0,0 +1,2075 @@ + + + + + + + + + + + + + + + + + + + +
+ +

CONSOLE APPLICATION +(VBLinqToObject)

+ +

Introduction

+ +

The term "LINQ +to Objects" refers to the use of LINQ queries with any IEnumerable +or IEnumerable<T> collection directly, without the +use of an intermediate LINQ provider or API such as LINQ to SQL or LINQ to XML. +You can use LINQ to query any enumerable collections such as List<T>, +Array, or Dictionary<TKey, TValue>. +The collection may be user-defined or may be returned by a .NET Framework API.

+ +

In a basic sense, +LINQ to Objects represents a new approach to collections. In the old way, you +had to write complex foreach loops that specified how +to retrieve data from a collection. In the LINQ approach, you write declarative +code that describes what you want to retrieve.

+ +

In addition, LINQ +queries offer three main advantages over traditional foreach +loops:

+ +

1.They are more concise and readable, especially +when filtering multiple conditions.

+ +

2.They provide powerful filtering, ordering, and +grouping capabilities with a minimum of application code.

+ +

3.They can be ported to other data sources with +little or no modification.

+ +

In general, the +more complex the operation you want to perform on the +data, the more benefit you will realize by using LINQ instead of traditional +iteration techniques.

+ +

This example illustrates how to write Linq +to Object queries using Visual C#. First, it builds a +class named Person. Person inculdes +the ID, Name and Age properties. Then the example creates a list of +Person which will be used as the datasource. In the +example, you will see the basic Linq operations like +select, update, orderby, max, average, etc. 

+ +

Running the Sample

+ +

+ +

Using the Code

+ +

1. Define the Person class that includes the ID, Name, and +Age properties.

+ +
+ +
- VB code snippet -
 
Public Class Person
 
    Public Sub New(ByVal id As Integer, ByVal name As String, ByVal age As Integer)
        Me._id = id
        Me._name = name
        Me._age = age
    End Sub
 
    Private _id As Integer
 
    ''' <summary>
    ''' Person ID
    ''' </summary>
    Public Property PersonID() As Integer
        Get
            Return Me._id
        End Get
        Set(ByVal value As Integer)
            Me._id = value
        End Set
    End Property
 
    Private _name As String
 
    ''' <summary>
    ''' Person name
    ''' </summary>
    Public Property Name() As String
        Get
            Return Me._name
        End Get
        Set(ByVal value As String)
            Me._name = value
        End Set
    End Property
 
    Private _age As Integer
 
    ''' <summary>
    ''' Age that ranges from 1 to 100
    ''' </summary>
    Public Property Age() As Integer
        Get
            Return Me._age
        End Get
        Set(ByVal value As Integer)
            If ((value <= 0) OrElse (value > 100)) Then
                Throw New Exception("Age is out of scope [1,100]")
            End If
            Me._age = value
        End Set
    End Property
 
End Class
 
- end -
+ +
+ +

2. Build a list of Person to be used as the data source.

+ +
+ +
- VB code snippet -
 
        '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
        ' Build the Person list that serves as the data source.
        '
        Dim persons As New List(Of Person)
 
        persons.Add(New Person(1, "Alexander David", 20))
        persons.Add(New Person(2, "Aziz Hassouneh", 18))
        persons.Add(New Person(3, "Guido Pica", 20))
        persons.Add(New Person(4, "Chris Preston", 19))
        persons.Add(New Person(5, "Jorgen Rahgek", 20))
        persons.Add(New Person(6, "Todd Rowe", 18))
        persons.Add(New Person(7, "SPeter addow", 22))
        persons.Add(New Person(8, "Markus Breyer", 19))
        persons.Add(New Person(9, "Scott Brown", 20))
 
- end -
+ +
+ +

3. Use Linq to perform the query operation.

+ +
+ +
- VB code snippet -
 
    '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
    ' Query a person in the data source.
    '
    Dim Todd = (From p In persons _
                Where p.Name = "Todd Rowe" _
                Select p).First()
 
    Console.WriteLine("Ereka's age is {0}", Todd.Age)
 
- end -
+ +
+ +

4. Use Linq to perform the Update operation.

+ +
+ +
- VB code snippet -
 
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
' Perform the Update operation on the person's age.
'
Todd.Age = 21
 
Console.WriteLine("Todd Rowe's age is updated to {0}", (From p In persons _
                                                        Where p.Name = "Todd Rowe" _
                                                        Select p).First().Age)
 
- end -
+ +
+ +

5. Use Linq to perform the Order operation.

+ +
+ +
- VB code snippet -
 
      '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
      ' Sort the data in the data source.
      ' Order the persons by age
      Dim query1 = From p In persons _
                   Order By p.Age _
                   Select p
 
      Console.WriteLine("ID" & vbTab & "Name" & vbTab & vbTab & "Age")
 
      For Each p In query1.ToList()
          Console.WriteLine("{0}" & vbTab & "{1}" & vbTab & vbTab & "{2}", _
                            p.PersonID, p.Name, p.Age)
      Next
 
- end -
+ +
+ +

6. Use Linq +to perform the Max, Min, Average queries.

+ +
+ +
- VB code snippet -
 
      '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
      ' Print the average, max, min age of the persons.
      '
      Dim avgAge As Double = (From p In persons _
                              Select p.Age).Average()
      Console.WriteLine("The average age of the persons is {0:f2}", avgAge)
 
      Dim maxAge As Double = (From p In persons _
                              Select p.Age).Max()
      Console.WriteLine("The maximum age of the persons is {0}", maxAge)
 
      Dim minAge As Double = (From p In persons _
                              Select p.Age).Min()
      Console.WriteLine("The minimum age of the persons is {0}", minAge)
 
- end -
+ +
+ +

7. Use Linq +to count the Person whose age is larger than 20

+ +
+ +
- VB code snippet -
 
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
      ' Count the persons who age is larger than 20.
      '
      Dim query2 = From p In persons _
                   Where p.Age > 20 _
                   Select p
 
      Dim count As Integer = query2.Count()
 
      Console.WriteLine("{0} persons are older than 20:", count)
 
      For i = 0 To count - 1
          Console.WriteLine(query2.ElementAt(i).Name)
      Next
 
- end -
+ +
+ +

More Information

+ +

MSDN: +LINQ to Objects

+ +

http://msdn.microsoft.com/en-us/library/bb397919.aspx

+ +

How +to Query an ArrayList with LINQ

+ +

http://msdn.microsoft.com/en-us/library/bb397937.aspx

+ +
+ + + + diff --git a/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe_files/colorschememapping.xml b/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe_files/colorschememapping.xml new file mode 100644 index 0000000..6a0069c --- /dev/null +++ b/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe_files/colorschememapping.xml @@ -0,0 +1,2 @@ + + \ No newline at end of file diff --git a/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe_files/filelist.xml b/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe_files/filelist.xml new file mode 100644 index 0000000..5791c64 --- /dev/null +++ b/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe_files/filelist.xml @@ -0,0 +1,8 @@ + + + + + + + + \ No newline at end of file diff --git a/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe_files/image001.png b/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe_files/image001.png new file mode 100644 index 0000000..e855998 Binary files /dev/null and b/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe_files/image001.png differ diff --git a/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe_files/image002.jpg b/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe_files/image002.jpg new file mode 100644 index 0000000..2b109c1 Binary files /dev/null and b/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe_files/image002.jpg differ diff --git a/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe_files/themedata.thmx b/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe_files/themedata.thmx new file mode 100644 index 0000000..437cd6f Binary files /dev/null and b/LINQ to Objects demo1/VBLinqToObject/Documentation/ReadMe_files/themedata.thmx differ diff --git a/LINQ to Objects demo1/VBLinqToObject/MainModule.vb b/LINQ to Objects demo1/VBLinqToObject/MainModule.vb new file mode 100644 index 0000000..c8bf297 --- /dev/null +++ b/LINQ to Objects demo1/VBLinqToObject/MainModule.vb @@ -0,0 +1,106 @@ +锘�'****************************** Module Header ******************************\ +' Module Name: Program.cs +' Project: VBLinqToObject +' Copyright (c) Microsoft Corporation. +' +' This example illustrates how to write Linq to Object queries using Visual +' VB.NET. First, it builds a class named Person. Person inculdes the ID, +' Name and Age properties. Then the example creates a list of Person which +' will be used as the datasource. In the example, you will see the basic +' Linq operations like select, update, orderby, max, average, etc. +' +' This source is subject to the Microsoft Public License. +' See http://www.microsoft.com/en-us/openness/resources/licenses.aspx#MPL. +' All other rights reserved. +' +' THIS CODE AND INFORMATION IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND, +' EITHER EXPRESSED OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE IMPLIED +' WARRANTIES OF MERCHANTABILITY AND/OR FITNESS FOR A PARTICULAR PURPOSE. +' ***************************************************************************/ + +Module MainModule + + Sub Main() + + ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' + ' Build the Person list that serves as the data source. + ' + Dim persons As New List(Of Person) + + persons.Add(New Person(1, "Alexander David", 20)) + persons.Add(New Person(2, "Aziz Hassouneh", 18)) + persons.Add(New Person(3, "Guido Pica", 20)) + persons.Add(New Person(4, "Chris Preston", 19)) + persons.Add(New Person(5, "Jorgen Rahgek", 20)) + persons.Add(New Person(6, "Todd Rowe", 18)) + persons.Add(New Person(7, "SPeter addow", 22)) + persons.Add(New Person(8, "Markus Breyer", 19)) + persons.Add(New Person(9, "Scott Brown", 20)) + + ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' + ' Query a person in the data source. + ' + Dim Todd = (From p In persons + Where p.Name = "Todd Rowe" + Select p).First() + + Console.WriteLine("Todd Rowe's age is {0}", Todd.Age) + + ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' + ' Perform the Update operation on the person's age. + ' + Todd.Age = 21 + + Console.WriteLine("Todd Rowe's age is updated to {0}", (From p In persons + Where p.Name = "Todd Rowe" + Select p).First().Age) + + ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' + ' Sort the data in the data source. + ' Order the persons by age + Dim query1 = From p In persons + Order By p.Age + Select p + + Console.WriteLine("ID" & vbTab & "Name" & vbTab & vbTab & "Age") + + For Each p In query1.ToList() + Console.WriteLine("{0}" & vbTab & "{1}" & vbTab & vbTab & "{2}", + p.PersonID, p.Name, p.Age) + Next + + ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' + ' Print the average, max, min age of the persons. + ' + Dim avgAge As Double = (From p In persons + Select p.Age).Average() + Console.WriteLine("The average age of the persons is {0:f2}", avgAge) + + Dim maxAge As Double = (From p In persons + Select p.Age).Max() + Console.WriteLine("The maximum age of the persons is {0}", maxAge) + + Dim minAge As Double = (From p In persons + Select p.Age).Min() + Console.WriteLine("The minimum age of the persons is {0}", minAge) + + ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' + ' Count the persons who age is larger than 20. + ' + Dim query2 = From p In persons + Where p.Age > 20 + Select p + + Dim count As Integer = query2.Count() + + Console.WriteLine("{0} persons are older than 20:", count) + + For i = 0 To count - 1 + Console.WriteLine(query2.ElementAt(i).Name) + Next + Console.WriteLine("Press any key to quit...") + Console.ReadKey() + + End Sub + +End Module diff --git a/LINQ to Objects demo1/VBLinqToObject/My Project/Application.Designer.vb b/LINQ to Objects demo1/VBLinqToObject/My Project/Application.Designer.vb new file mode 100644 index 0000000..66fb81a --- /dev/null +++ b/LINQ to Objects demo1/VBLinqToObject/My Project/Application.Designer.vb @@ -0,0 +1,13 @@ +锘�'------------------------------------------------------------------------------ +' +' This code was generated by a tool. +' Runtime Version:4.0.30319.239 +' +' Changes to this file may cause incorrect behavior and will be lost if +' the code is regenerated. +' +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + diff --git a/LINQ to Objects demo1/VBLinqToObject/My Project/Application.myapp b/LINQ to Objects demo1/VBLinqToObject/My Project/Application.myapp new file mode 100644 index 0000000..e62f1a5 --- /dev/null +++ b/LINQ to Objects demo1/VBLinqToObject/My Project/Application.myapp @@ -0,0 +1,10 @@ +锘� + + false + false + 0 + true + 0 + 2 + true + diff --git a/LINQ to Objects demo1/VBLinqToObject/My Project/AssemblyInfo.vb b/LINQ to Objects demo1/VBLinqToObject/My Project/AssemblyInfo.vb new file mode 100644 index 0000000..a7eb0fd --- /dev/null +++ b/LINQ to Objects demo1/VBLinqToObject/My Project/AssemblyInfo.vb @@ -0,0 +1,35 @@ +锘縄mports System +Imports System.Reflection +Imports System.Runtime.InteropServices + +' General Information about an assembly is controlled through the following +' set of attributes. Change these attribute values to modify the information +' associated with an assembly. + +' Review the values of the assembly attributes + + + + + + + + + + +'The following GUID is for the ID of the typelib if this project is exposed to COM + + +' Version information for an assembly consists of the following four values: +' +' Major Version +' Minor Version +' Build Number +' Revision +' +' You can specify all the values or you can default the Build and Revision Numbers +' by using the '*' as shown below: +' + + + diff --git a/LINQ to Objects demo1/VBLinqToObject/My Project/Resources.Designer.vb b/LINQ to Objects demo1/VBLinqToObject/My Project/Resources.Designer.vb new file mode 100644 index 0000000..fb8e023 --- /dev/null +++ b/LINQ to Objects demo1/VBLinqToObject/My Project/Resources.Designer.vb @@ -0,0 +1,63 @@ +锘�'------------------------------------------------------------------------------ +' +' This code was generated by a tool. +' Runtime Version:4.0.30319.239 +' +' Changes to this file may cause incorrect behavior and will be lost if +' the code is regenerated. +' +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + +Imports System + +Namespace My.Resources + + 'This class was auto-generated by the StronglyTypedResourceBuilder + 'class via a tool like ResGen or Visual Studio. + 'To add or remove a member, edit your .ResX file then rerun ResGen + 'with the /str option, or rebuild your VS project. + ''' + ''' A strongly-typed resource class, for looking up localized strings, etc. + ''' + _ + Friend Module Resources + + Private resourceMan As Global.System.Resources.ResourceManager + + Private resourceCulture As Global.System.Globalization.CultureInfo + + ''' + ''' Returns the cached ResourceManager instance used by this class. + ''' + _ + Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager + Get + If Object.ReferenceEquals(resourceMan, Nothing) Then + Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("VBLinqToObject.Resources", GetType(Resources).Assembly) + resourceMan = temp + End If + Return resourceMan + End Get + End Property + + ''' + ''' Overrides the current thread's CurrentUICulture property for all + ''' resource lookups using this strongly typed resource class. + ''' + _ + Friend Property Culture() As Global.System.Globalization.CultureInfo + Get + Return resourceCulture + End Get + Set + resourceCulture = value + End Set + End Property + End Module +End Namespace diff --git a/LINQ to Objects demo1/VBLinqToObject/My Project/Resources.resx b/LINQ to Objects demo1/VBLinqToObject/My Project/Resources.resx new file mode 100644 index 0000000..af7dbeb --- /dev/null +++ b/LINQ to Objects demo1/VBLinqToObject/My Project/Resources.resx @@ -0,0 +1,117 @@ +锘� + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + \ No newline at end of file diff --git a/LINQ to Objects demo1/VBLinqToObject/My Project/Settings.Designer.vb b/LINQ to Objects demo1/VBLinqToObject/My Project/Settings.Designer.vb new file mode 100644 index 0000000..7172e13 --- /dev/null +++ b/LINQ to Objects demo1/VBLinqToObject/My Project/Settings.Designer.vb @@ -0,0 +1,73 @@ +锘�'------------------------------------------------------------------------------ +' +' This code was generated by a tool. +' Runtime Version:4.0.30319.239 +' +' Changes to this file may cause incorrect behavior and will be lost if +' the code is regenerated. +' +'------------------------------------------------------------------------------ + +Option Strict On +Option Explicit On + + +Namespace My + + _ + Partial Friend NotInheritable Class MySettings + Inherits Global.System.Configuration.ApplicationSettingsBase + + Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings) + +#Region "My.Settings Auto-Save Functionality" +#If _MyType = "WindowsForms" Then + Private Shared addedHandler As Boolean + + Private Shared addedHandlerLockObject As New Object + + _ + Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs) + If My.Application.SaveMySettingsOnExit Then + My.Settings.Save() + End If + End Sub +#End If +#End Region + + Public Shared ReadOnly Property [Default]() As MySettings + Get + +#If _MyType = "WindowsForms" Then + If Not addedHandler Then + SyncLock addedHandlerLockObject + If Not addedHandler Then + AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings + addedHandler = True + End If + End SyncLock + End If +#End If + Return defaultInstance + End Get + End Property + End Class +End Namespace + +Namespace My + + _ + Friend Module MySettingsProperty + + _ + Friend ReadOnly Property Settings() As Global.VBLinqToObject.My.MySettings + Get + Return Global.VBLinqToObject.My.MySettings.Default + End Get + End Property + End Module +End Namespace diff --git a/LINQ to Objects demo1/VBLinqToObject/My Project/Settings.settings b/LINQ to Objects demo1/VBLinqToObject/My Project/Settings.settings new file mode 100644 index 0000000..85b890b --- /dev/null +++ b/LINQ to Objects demo1/VBLinqToObject/My Project/Settings.settings @@ -0,0 +1,7 @@ +锘� + + + + + + diff --git a/LINQ to Objects demo1/VBLinqToObject/Person.vb b/LINQ to Objects demo1/VBLinqToObject/Person.vb new file mode 100644 index 0000000..ab7182e --- /dev/null +++ b/LINQ to Objects demo1/VBLinqToObject/Person.vb @@ -0,0 +1,54 @@ +锘縋ublic Class Person + + Public Sub New(ByVal id As Integer, ByVal name As String, ByVal age As Integer) + Me._id = id + Me._name = name + Me._age = age + End Sub + + Private _id As Integer + + ''' + ''' Person ID + ''' + Public Property PersonID() As Integer + Get + Return Me._id + End Get + Set(ByVal value As Integer) + Me._id = value + End Set + End Property + + Private _name As String + + ''' + ''' Person name + ''' + Public Property Name() As String + Get + Return Me._name + End Get + Set(ByVal value As String) + Me._name = value + End Set + End Property + + Private _age As Integer + + ''' + ''' Age that ranges from 1 to 100 + ''' + Public Property Age() As Integer + Get + Return Me._age + End Get + Set(ByVal value As Integer) + If ((value <= 0) OrElse (value > 100)) Then + Throw New Exception("Age is out of scope [1,100]") + End If + Me._age = value + End Set + End Property + +End Class diff --git a/LINQ to Objects demo1/VBLinqToObject/VBLinqToObject.vbproj b/LINQ to Objects demo1/VBLinqToObject/VBLinqToObject.vbproj new file mode 100644 index 0000000..2ac5bd1 --- /dev/null +++ b/LINQ to Objects demo1/VBLinqToObject/VBLinqToObject.vbproj @@ -0,0 +1,160 @@ + + + + Debug + AnyCPU + 9.0.30729 + 2.0 + {1F187E80-A962-4EC9-9886-C59EC100E625} + Exe + VBLinqToObject.MainModule + VBLinqToObject + VBLinqToObject + 512 + Console + v3.5 + On + Binary + Off + On + + + 3.5 + + publish\ + true + Disk + false + Foreground + 7 + Days + false + false + true + 0 + 1.0.0.%2a + false + false + true + + + + + + + true + full + true + true + ..\Debug\ + VBLinqToObject.xml + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022,42353,42354,42355 + AllRules.ruleset + + + pdbonly + false + true + true + ..\Release\ + VBLinqToObject.xml + 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022,42353,42354,42355 + AllRules.ruleset + + + + + + + + 3.5 + + + 3.5 + + + 3.5 + + + + + + + + + + + + + + + + + True + Application.myapp + + + True + True + Resources.resx + + + True + Settings.settings + True + + + + + + VbMyResourcesResXFileCodeGenerator + Resources.Designer.vb + My.Resources + Designer + + + + + + MyApplicationCodeGenerator + Application.Designer.vb + + + SettingsSingleFileGenerator + My + Settings.Designer.vb + + + + + + + + + + + + False + .NET Framework 3.5 SP1 Client Profile + false + + + False + .NET Framework 3.5 SP1 + true + + + False + Windows Installer 3.1 + true + + + + + \ No newline at end of file