baseform.vb

来自「聊天工具,一个可以在任何系统下运作的聊天工具」· VB 代码 · 共 9 行

Public Class BaseForm

    Private Sub lkbHomepage_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles lkbHomepage.LinkClicked
        MsgBox("Welcome PK3#")
    End Sub
    Protected Sub SetTitle(ByVal strTitle As String)
        Me.lblTitle.Text = strTitle
    End Sub
End Class