StackOverflow2013

Note that there are some explanatory texts on larger screens.

plurals

PO
primarykey
Id
8336696
data
AcceptedAnswerId
0
AnswerCount
0
ClosedDate
CommentCount
2
CommunityOwnedDate
CreationDate
2011-12-01T04:52:24.323
FavoriteCount
0
LastActivityDate
2011-12-01T05:45:50.473
LastEditDate
2011-12-01T05:45:50.473
LastEditorUserId
740923
OwnerUserId
740923
ParentId
8336453
PostTypeId
2
Score
3
ViewCount
0
LastEditorDisplayName
text
Body
Use generics for this: <pre><code>Sub createSystem(Of T As {New, systemSettings})() Dim newSystem As New T systemCollection.add(newSystem) End Sub </code></pre> And call it with: <pre><code>createSystem(Of windSystem) </code></pre> To explain: The term <code>Of T</code> lets you create a method that can be used for any type. Every time you call it for a new value of T, a new method is created in memory. The term <code>As {New, systemSettings}</code> constrains <code>T</code>. It says that T must represent a type that is or derives from <code>systemSettings</code>. It also says that <code>T</code> must contain a default constructor: <code>New()</code> which is required for the command <code>New T</code>. Note that you cannot specify a more elaborate constructor as a generics constraint. If you require parameters in your constructor, you can create an <code>Initialise</code> method in the base class. Because <code>T</code> is constrained to <code>systemSettings</code>, it is guaranteed that the <code>Initialise</code> method exists. <pre><code>Class systemSettings Public Overridable Sub Initialise(arg1 As Object, arg2 As Object) 'initialise properties End Sub 'some properties End class Class fireSystemSettings Inherits systemSettings Public Overrides Sub Initialise(arg1 As Object, arg2 As Object) 'initialise properties End Sub 'some additional properties End Class Class windSystemSettings Inherits systemSettings Public Overrides Sub Initialise(arg1 As Object, arg2 As Object) 'initialise properties End Sub 'some additional properties End Class Sub createSystem(Of T As {New, systemSettings})(arg1 As Object, arg2 As Object) Dim newSystem As New T newSystem.Initialise(arg1, arg2) systemCollection.add(newSystem) End Sub </code></pre>
Tags
Title
singulars
PostAcceptedAnswerId
1. This table or related slice is empty.
PostParentId
1. POSub to create object of type passed by caller in VB.NET
 singulars
 PostTypePostTypeId
 PTQuestion
PostTypePostTypeId
1. PTAnswer
UserLastEditorUserId
1. USHand-E-Food
UserOwnerUserId
1. USHand-E-Food
plurals
PostLinksPostIdRelatedPostId
1. This table or related slice is empty.
PostLinksRelatedPostIdPostId
1. This table or related slice is empty.
PostsAcceptedAnswerId
1. This table or related slice is empty.
PostsParentIdCreationDate
1. This table or related slice is empty.
VotesPostIdCreationDate
1. VO
 singulars
 PostPostId
 PO
 UserUserId
 This table or related slice is empty.
 VoteTypeVoteTypeId
 VTUpMod
CommentsPostId
1. COSo if I understand correctly this method essentially creates another method which inherits the original, but modifies the parameters type? This is interesting, however i neglected to show in my original post that new takes two arguments, and it seems from your last statement this solution will not work.
 singulars
 PostPostId
 PO
 UserUserId
 USMichael
2. COThat's correct. See my answer for a solution to your new problem.
 singulars
 PostPostId
 PO
 UserUserId
 USHand-E-Food

Querying!

Guidance

A row detail

Detail views are divided into sections. All the information in the data section comes from columns in the selected row. The other sections display data from other, related rows.

Related data can be related in a to-one or a to-many fashion. Captions of data related in a to-many fashion link to a list view showing a filtered view of the table.

Try moving around until you find a non-empty to-many entry and click on the label to get to one. You can move back to the root by clicking on the database name in the header.