1

この作業を高速化する方法はありますか?

これがvb.netの私のサンプルコードです。これはチャート上のマウス位置にポイントを追加しますが、かなり遅いです。

    Private Sub Chart2_MouseMove(sender As Object, e As MouseEventArgs) Handles Chart2.MouseMove
    Dim coord() As Double = GetAxisValuesFromMouse(e.X, e.Y)

    Dim test As Series
    Try
        Chart2.Series.RemoveAt(1)
    Catch ex As Exception
    End Try

    Dim pt As New DataPoint
    pt.XValue = coord(0)
    pt.YValues(0) = coord(1)

    test = New Series
    Chart2.Series.Add(test)
    Chart2.Series(test.Name).ChartType = SeriesChartType.Point
    Chart2.Series(test.Name).Points.Add(pt)

End Sub

関数は、マウス位置の x 軸と y 軸の座標を返します。

Private Function GetAxisValuesFromMouse(x As Integer, y As Integer) As Double()
    Dim coord(1) As Double
    Dim chartArea = Chart2.ChartAreas(0)
    coord(0) = chartArea.AxisX.PixelPositionToValue(x)
    coord(1) = chartArea.AxisY.PixelPositionToValue(y)
    Return coord
End Function

結果：

ここに画像の説明を入力

4

2 に答える 2

-1

Flexcell グリッド コントロールを使用 します。これは、データグリッド コントロールによって提供されるすべての機能を提供する優れたコントロールであり、さらに FlexCell は柔軟で使いやすいグリッド コントロールです。... 印刷、印刷プレビュー、グラフなどの包括的な機能を提供します。 FlexCell Grid Control を使用すると、アプリケーションでプロフェッショナルなユーザー インターフェイスとレポート フォームを作成できます。... Visual Basic、Visual FoxPro、Visual C++、VB.net、C# などでコーディングされたアプリケーション

于 2014-01-23T09:57:49.140 に答える