สอบถามเกี่ยวกับ VB2008 รับค่าจาก Comport หน่อยครับ

คือ ที่ได้คือ a แต่อยากจะเปลียนให้เป็น 1 ได้ไหมครับ ค่าที่ได้มาจากเซนเชอร์ PIR  เช่นคนเดินผ่านเซนเชอร์  ค่าที่ส่งมา VB คือ a จาก a นี้ให้แปลงเป็น 1 เดินผ่านอีกครั้งแสดง 2