Update Comm.vb