[size=2][color=#0000ff]Dim[/color][/size][size=2] g [/size][size=2][color=#0000ff]As[/color][/size][size=2] Graphics
[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] mypen [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]New[/color][/size][size=2] Pen(Color.Black)
[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] myfont [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]New[/color][/size][size=2] Font(Font.Name = "Arial", 10, FontStyle.Regular, GraphicsUnit.Pixel)
[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] mybrush [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]New[/color][/size][size=2] Drawing2D.LinearGradientBrush(ClientRectangle, _
Color.Red, Color.Red, Drawing2D.LinearGradientMode.Horizontal)
[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] mybrush2 [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]New[/color][/size][size=2] Drawing2D.LinearGradientBrush(ClientRectangle, _
Color.Blue, Color.Blue, Drawing2D.LinearGradientMode.Horizontal)
[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] x1a, x1b, y1a, y1b [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]Double
[/color][/size][size=2][/size][size=2][color=#0000ff]Dim[/color][/size][size=2] x1ai, x1bi, y1ai, y1bi [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]Integer
[/color][/size][size=2][color=#0000ff]Private[/color][/size][size=2] [/size][size=2][color=#0000ff]Sub[/color][/size][size=2] drawMapFunc([/size][size=2][color=#0000ff]ByVal[/color][/size][size=2] sender [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]Object[/color][/size][size=2], [/size][size=2][color=#0000ff]ByVal[/color][/size][size=2] e [/size][size=2][color=#0000ff]As[/color][/size][size=2] System.EventArgs) [/size][size=2][color=#0000ff]Handles[/color][/size][size=2] TabControl1.SelectedIndexChanged
[/size][size=2][color=#0000ff]If[/color][/size][size=2] lstStations.SelectedIndex() <> -1 [/size][size=2][color=#0000ff]And[/color][/size][size=2] TabControl1.SelectedIndex() = 5 [/size][size=2][color=#0000ff]Then
[/color][/size][size=2]g = drawMap.CreateGraphics
g.SmoothingMode = Drawing2D.SmoothingMode.AntiAlias
x1ai = [/size][size=2][color=#0000ff]CInt[/color][/size][size=2](drawMap.Width / 2)
y1ai = [/size][size=2][color=#0000ff]CInt[/color][/size][size=2](drawMap.Height / 2)
[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] q [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]Integer
[/color][/size][size=2][/size][size=2][color=#0000ff]For[/color][/size][size=2] q = 0 [/size][size=2][color=#0000ff]To[/color][/size][size=2] diamondMeasure.stationSet(lstStations.SelectedIndex()).numSubTargets
x1bi = [/size][size=2][color=#0000ff]CInt[/color][/size][size=2](-8 * (diamondMeasure.stationSet(lstStations.SelectedIndex()).targetSet(q).myNomXYZ.X - diamondMeasure.stationSet(lstStations.SelectedIndex()).myNomXYZ.X))
y1bi = [/size][size=2][color=#0000ff]CInt[/color][/size][size=2](8 * (diamondMeasure.stationSet(lstStations.SelectedIndex()).targetSet(q).myNomXYZ.Y - diamondMeasure.stationSet(lstStations.SelectedIndex()).myNomXYZ.Y))
g.DrawLine(mypen, x1ai, y1ai, x1bi + x1ai, y1bi + y1ai)
g.DrawString(diamondMeasure.stationSet(lstStations.SelectedIndex()).targetSet(q).name, myfont, mybrush, x1bi + x1ai + 1, y1bi + y1ai + 1)
[/size][size=2][color=#0000ff]Next
[/color][/size][size=2]g.DrawString(diamondMeasure.stationSet(lstStations.SelectedIndex()).name, myfont, mybrush2, x1ai + 2, y1ai + 2)
[/size][size=2][color=#0000ff]End[/color][/size][size=2] [/size][size=2][color=#0000ff]If
[/color][/size][size=2][/size][size=2][color=#0000ff]End[/color][/size][size=2] [/size][size=2][color=#0000ff]Sub
[/color][/size]