Create Block.vb