VB与西门子300的通讯例子，可实现自由口通讯。