2023-08-01から1ヶ月間の記事一覧
Private Sub Chart1_MouseWheel(sender As Object, e As MouseEventArgs) Handles Chart1.MouseWheel Dim yMax As Double = Chart1.ChartAreas(0).AxisY.Maximum Dim yMin As Double = Chart1.ChartAreas(0).AxisY.Minimum Dim yChange As Double = 1 If e.D…