基于VB 6．0智能電子自旋共振儀系統繪圖模塊實現
加入技術交流群
定制好了繪圖區，為了繪圖區的美觀，繪圖中區加了橫縱相交的網格。橫坐標固定只有5個細分格，縱坐標固定4個細分格。部分代碼如下：
2．3 設置坐標
根據繪圖區的大小與高度繪制x軸和y軸。
3 繪圖模塊實時曲線的生成
畫好繪圖區及坐標系后，就要在繪圖區繪制實時曲線，實時曲線的繪制一般借助于Timer控件來完成，使用Timer控件，定期將串口或是其他儀器中監測到的數據送往pic_main，而曲線的繪制一般畫成折線圖，采用PictureBoxl的Line方法繪制。用Line方法可以在窗體或圖片框上繪制一條直線或繪制一個矩形。
Line方法的一般格式：
[對象名．]Line(x1，y1)-(x2，y2)[，顏色]
其中：(x1，y1)為始點坐標；(x2，y2)為終點坐標；顏色可以使用RGB函數，規定畫線或畫矩形的顏色。代碼如下：
3．1 曲線的生成
曲線的生成為：
3．2 時鐘更新曲線
時鐘更新曲線為：
這樣，就完成了在繪圖區中顯示從單片機實時采集到的數據的任務。
4 雙游標讀取某兩點的數值差
用4條線來描述雙游標。首先在繪圖區上放置4條直線控件，4條線放置成2對坐標形式(十字相交)。并設置4條線的屬性：
4條直線的名稱分別為線c0_x，c0_y，c1_x，c1_y。
顏色分別為c0_x．bordercolor＆H0000OOFF＆；c1_x．bordercolor＆HOOFFFF00＆。
4．1 獲取任意點的坐標值
通過在曲線上單擊鼠標左鍵來獲得坐標值
4．2 任意點坐標值的顯示
因為獲取的是任意點的坐標值，所以鼠標放在曲線的任意位置時，坐標CO()與坐標C1()的值相應的要改變。
某點的坐標如圖1所示。
評論