VB编码规范[9]

       dim em          as objectpersistencelib.entitymanager

     空行

       空行是区分代码块与块的间隔，在函数之间必须加上空行（两行左右），而函数内部，变量声明块和实现块（实现块指除变量声明外的其它代码）要使用空行来间隔（一行），实现块的内部，通过空行来标识一个功能段，如：

private sub check(order as nysalebacklib.order)

'* 减少库存

dim objstockitem          as nystocklib.stockitem

dim objstock                 as nystocklib.stock

dim i                    as integer

    set objstock = createstock()

    for i = 0 to order.itemcount - 1

        set objstockitem = order.item(i)

        '* 减少库存

        call objstock.reduceitem(objstockitem, true)

    next i

    set objstock = nothing

end sub