public Sub PicCurve _ Paint(ByVal sender作為對象,ByVal e作為系統。Windows.Forms.PaintEventArgs)處理PicCurve。顏料
表單中調用的方法是實例化該類。因為這個類有NEW,所以在實例化時應該給它參數。
代碼如下。我臨時寫的。妳只需要在打電話的時候根據實際情況來改就可以了。參數PictureBox1是添加到窗體上的PictureBox控件。
私有子表單1 _ Load(ByVal sender As System。對象,ByVal e作為系統。EventArgs)處理MyBase。負荷
Dim AA() As Single = {0.1,1.2,1.5,1.6,1.8}
dim cls point As New bbbb(PictureBox 1,AA," PictureBox_1 ")
clsPaint。PicCurve_Paint(我,什麽都沒有)
末端接頭