Hola Alex,
es cierto, debí explicarlo con más detalle.
He seguido buscando y he conseguido, más o menos, obtener un gráfico de dispersión con lenguaje visual basic. Estoy haciendo la aplicación con Visual Basic 2010 Express. Tengo un Form donde he puesto un control Combobox, un control Button y un control Chart. En una base de datos MySQl tengo una tabla con nombre 'grafico4' donde he puesto cinco columnas. Los nombres de cuatro de las columnas, son los elementos que he introducido en el Combobox. La idea es que al seleccionar un elemento del combobox y darle al control Button, en el grafico Chart1 me represente en el eje X la columna 1 de la tabla 'grafico4' y en el eje Y la columna de la tabla 'grafico4' que coincide con el elemento seleccionado en el Combobox. A continuación pongo el código:
Private Sub Button67_Click(sender As System.Object, e As System.EventArgs) Handles Button67.Click
Chart1.Series.Add(ComboBox281.Text)
Chart1.Titles.Clear()
Chart1.Series(ComboBox281.Text).ChartType = SeriesChartType.Line
Dim stConexion1 As New MySqlConnection("server= localhost; user id = root; password =; database = reyes") 'este es el codigo que funciona para office 2007 y 2010
Dim READER As MySqlDataReader
stConexion1.Open()
Dim query As String
query = "Select * From grafico4"
Dim Command As New MySqlCommand(query, stConexion1)
READER = Command.ExecuteReader
While READER.Read
Chart1.Series(ComboBox281.Text).Points.AddXY(READER.GetString(ComboBox281.Text), READER.GetString(ComboBox281.Text & "Log"))
End While
Chart1.ChartAreas(0).AxisX.Title = "Temperatura (ºC)"
Chart1.ChartAreas(0).AxisX.TitleFont = New System.Drawing.Font("Segoe UI", 12, FontStyle.Bold)
Chart1.ChartAreas(0).AxisX.TitleForeColor = Color.Maroon
Chart1.ChartAreas(0).AxisX.TitleAlignment = StringAlignment.Center
Chart1.ChartAreas(0).AxisX.IsMarginVisible = False
Chart1.ChartAreas(0).AxisY.Title = "Fusión"
Chart1.ChartAreas(0).AxisY.TitleFont = New System.Drawing.Font("Segoe UI", 12, FontStyle.Bold)
Chart1.ChartAreas(0).AxisY.TitleForeColor = Color.Maroon
Chart1.ChartAreas(0).AxisY.TitleAlignment = StringAlignment.Center
Chart1.ChartAreas(0).AxisY.IsMarginVisible = False
Chart1.Titles.Add(0)
Chart1.Titles(0).Text = "Curva Fusión - Temperatura"
Chart1.Titles(0).Font = New System.Drawing.Font("Segoe UI", 15, FontStyle.Bold)
Chart1.Titles(0).ForeColor = Color.Maroon
stConexion1.Close()