CHAPTER 3 METHODOLOGY 3.1 Overview The Water Monitoring ...
CHAPTER 3 METHODOLOGY 3.1 Overview The Water Monitoring ...
CHAPTER 3 METHODOLOGY 3.1 Overview The Water Monitoring ...
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
Appendix C: Visual Basic Programming for <strong>Water</strong> <strong>Monitoring</strong> SystemDim Data As StringPrivate Sub Form_Load()MSComm1.CommPort = 1MSComm1.Settings = "9600,N,8,1"MSComm1.InputLen = 0MSComm1.PortOpen = TrueEnd Sub‘Setting Serial Port’Private Sub timer1_timer()If Shape6.FillColor = vbWhite <strong>The</strong>nShape6.FillColor = vbRedElseShape6.FillColor = vbWhiteEnd IfIf Shape7.FillColor = vbWhite <strong>The</strong>nShape7.FillColor = vbRedElseShape7.FillColor = vbWhiteEnd IfIf Shape8.FillColor = vbWhite <strong>The</strong>nShape8.FillColor = vbRed48