一个画等值线的VB程序

Public Class Form6 Inherits System.Windows.Forms.Form #Region " Windows ┤░╠σ╔Φ╝╞╞≈╔·│╔╡─┤·┬δ " Public Sub New() MyBase.New() '╕├╡≈╙├╩╟ Windows ┤░╠σ╔Φ╝╞╞≈╦∙▒╪╨Φ╡─íú InitializeComponent() '╘┌ InitializeComponent() ╡≈╙├╓«║≤╠φ╝╙╚╬║╬│⌡╩╝╗» End Sub '┤░╠σ╓╪╨┤ dispose ╥╘╟σ└φ╫Θ╝■┴╨▒φíú Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean) If disposing Then If Not (components Is Nothing) Then components.Dispose() End If End If MyBase.Dispose(disposing) End Sub 'Windows ┤░╠σ╔Φ╝╞╞≈╦∙▒╪╨Φ╡─ Private components As System.ComponentModel.IContainer '╫ó╥Γ: ╥╘╧┬╣²│╠╩╟ Windows ┤░╠σ╔Φ╝╞╞≈╦∙▒╪╨Φ╡─ '┐╔╥╘╩╣╙├ Windows ┤░╠σ╔Φ╝╞╞≈╨▐╕─┤╦╣²│╠íú '▓╗╥¬╩╣╙├┤·┬δ▒α╝¡╞≈╨▐╕─╦ⁿíú End If End If MyBase.Dispose(disposing) End Sub 'Windows ┤░╠σ╔Φ╝╞╞≈╦∙▒╪╨Φ╡─ Private components As System.ComponentModel.IContainer '╫ó╥Γ: ╥╘╧┬╣²│╠╩╟ Windows ┤░╠σ╔Φ╝╞╞≈╦∙▒╪╨Φ╡─ '┐╔╥╘╩╣╙├ Windows ┤░╠σ╔Φ╝╞╞≈╨▐╕─┤╦╣²│╠íú '▓╗╥¬╩╣╙├┤·┬δ▒α╝¡╞≈╨▐╕─╦ⁿíú