1.使用#region将代码分块

#Region "定义字符串常量"
    Private str_FilePath As String = ".\" '默认在程序运行目录下
    Private str_FileName As String = "" '文件路径+文件名

    Public config_IP As String = ""
    Public config_DbType As String = ""
    Public config_DbName As String = ""
    Public config_UserName As String = ""
    Public config_PSW As String = ""
#End Region

语法是：以#Region 和 #End Region来包围一块代码，可以收缩。这样可以很方便地将一个类中的方法归类。

2.用MustOverride实现C中的虚方法

''' <summary>
    '''  查询为数字的例值，没有记录返回0
    ''' </summary>
    ''' <param name="str_sql">需要执行的sql语句</param>
    ''' <param name="str_KeyWord">表的列名,此列的返回值必须为整数</param>
    ''' <returns>返回例值</returns>
    ''' <remarks></remarks>
    Public MustOverride Function SelectColumnAsInt(ByVal str_sql As String,ByVal str_KeyWord As String) As Integer

有时候用基类来接受派生类的赋值为了保证基类的方法名和派生类一样，可以用这种方法（我想过用接口来实现，但是实现了同样接口的类A和B，在A=B后，用A调用的方法还是A的，并不是B的——没有验证）

3.shared与static

static:

通常，过程终止后，此过程中的局部变量将立即消失。静态变量可继续存在，并保留其最新值。您的代码下次调用此过程时，此变量将不会重新初始化，仍然存储已赋给它的最新值。

我的理解是：对象级的。

shared:

我的理解是：类级的。

4.property的使用

Public Class A 
Private _text as string 
Property text() As String
        Get
            Return _text
        End Get
        Set(ByVal value As String)
            _text = value
        End Set
    End Property
End Class

dim X as A
X.text="小白"
msgBox X.text