VB利用数组画曲线

VB 利用数组画曲线 VB 中给定相应数组，画出对应曲线，效果还是不错的，可以参照修改。下面将详细介绍如何在 VB 中使用数组画曲线。 需要在工程中添加 Chart 控件，以便画出曲线图。在 Form_Load 事件中，可以设置 Chart 的背景颜色和其他属性。例如，MSChart1.Plot.Backdrop.Fill.Style = VtFillStyleBrush 可以设置 Chart 的背景颜色为白色。 接下来，在 Timer1_Timer 事件中，可以读取数组的数据并将其画出曲线图。例如，使用 With 语句可以遍历数组的每个元素，并将其画出曲线。例如，tempData = .Data.Row = j 可以获取数组的每个元素，并将其画出曲线。 在 Command1_Click 事件中，可以使用数组 z 来画出曲线图。例如，z(0, i) = i 可以设置横坐标值，z(1, i) = Rnd * 30 + 50 可以设置纵坐标值。然后，使用 Me.Scale (-10, 120)-(120, -15) 可以设置坐标轴的范围。 在画坐标轴时，可以使用 Line 语句来画出横纵坐标轴。例如，Line (0, -10)-(0, 110) 可以画出纵坐标轴。然后，可以使用 For 循环来画出横坐标轴。例如，For i = -5 To 105 Step 5 可以画出横坐标轴上的刻度。 在画曲线时，可以使用 Circle 语句来画出曲线上的每个点。例如，Me.Circle (x, y), 0.5, vbRed 可以画出曲线上的每个点。 在 Form_Load 事件中，可以使用 ADODB 连接数据库，并读取数据库中的数据。例如，使用 conn.Open str1 & str2 可以打开数据库连接，然后使用 rs.Open "select 温度 FROM caiji", conn, adOpenStatic, adLockReadOnly 可以读取数据库中的数据。 VB 利用数组画曲线可以通过使用 Chart 控件、数组、 Timer 控件和 ADODB 连接数据库来实现。通过设置 Chart 的背景颜色和坐标轴的范围，并使用数组来画出曲线图，可以实现画出曲线的功能。