在VB.net中使用类

时间:2015-11-15 20:19:35

标签: vb.net inheritance

对不起,如果我听起来像一个完整的菜鸟或使用下面不恰当的术语。

我正在尝试在vb.net中创建一个类,多个表单类可以从中继承。所以在'表单类',如果我说,从用户获取一个列表,将其发送到'单独的类'来订购列表,然后将列表传递回表单类以保存在数据库中或做任何与如何我会继续吗。

到目前为止,这就是我所做的。

下面的

是没有内容的类本身

Public Class RandomClassName

End Class

以下是我从上述课程“继承”

所做的工作
Public Class frmStudentLogin
Dim con As New OleDbConnection
Dim ValidUserNameLength As Boolean
Inherits RandomClassName

我想知道如何设置代码以允许我正确地继承并引用类链接。

感谢。

1 个答案:

答案 0 :(得分:0)

目前尚不清楚使用此继承方法尝试解决哪个问题,但肯定可以从另一个类(BaseForm)继承表单类(MyForm),前提是另一个类(BaseForm)继承自表单基类(形成)。

此时您可以在MyForm中插入要在表单之间共享的所有函数,但请注意,在这种情况下,每个表单都会受到BaseForm类的影响

我将展示在LinqPAD中测试的示例

Sub Main

    Dim x = New MyForm()
    x.Show()

End Sub

Public Class MyForm
    Inherits BaseForm

    Public Sub New ()
        Dim txt = New TextBox()
        txt.Multiline = True
        txt.Height = 200

        'Here you could use the GetAList from the BaseForm class
        ' and use it to set the initial text for the multiline textbox.
        txt.AppendText (String.Join(Environment.NewLine, GetAList().ToArray()))
        Me.Controls.Add(txt)
    End Sub
End Class


Public Class BaseForm
    Inherits Form

    ' Common methods required by your uplevel forms
    Public Function GetAList() As List(Of String)
        Dim a = New List(Of String)() From
            {"ABC", "DEF", "GHJ"}
        Return a
    End Function

End Class