ANSWERS FOR SAMPLE FINAL EXAM

1. (d)    
2. (b)
3. (b)
4. (d)
5. (c)
6. (a)
7. (c)
8. (d)
9. (a)
10.(c)

Problems B1 and B2 do not apply because we did not study the
DataGrid object.  We also did not create our own user defined
objects.  Here is the solution to Problem B3:

    Private x As New ArrayList
    Private y As New ArrayList

    Private Sub picDisplay_MouseUp(ByVal sender As Object, _
        ByVal e As MouseEventArgs) Handles picDisplay.MouseUp

        x.Add(e.X)
        y.Add(e.Y)
    End Sub

    Private Sub mnuSave_Click(ByVal sender As Object, _
        ByVal e As EventArgs) Handles mnuSave.Click

        Dim sw As New StreamWriter("c:\Points.csv")
        Dim i As Integer

        For i = 0 To x.Count - 1
            sw.WriteLine("(" & x(i) & "," & y(i) & ")")
        Next
        sw.Close()

    End Sub
End Class