VB.NET中如何在Chart控件绘制前获取尺寸以实现坐标轴1:1等比例缩放

问题根因 #

窗体Load事件触发时，Chart控件仅完成了基础属性初始化，还未执行内部布局计算与预渲染流程，ChartArea.Position和ChartArea.InnerPlotPosition的自动计算值尚未生成，因此返回0。二次打开窗体时Chart控件的初始化缓存已生成，因此可以读取到非零值。

可行解决方案 #

方案1：使用Chart.Customize事件（推荐） #

Customize是Chart控件原生提供的、在所有布局计算完成、首次渲染前触发的事件，此时所有自动计算的属性均已赋值完成，调整逻辑写在这里不会出现显示后跳变的问题，是官方推荐的自定义布局调整时机。
代码示例：

Private Sub Chart1_Customize(sender As Object, e As EventArgs) Handles Chart1.Customize
    Dim targetArea = Chart1.ChartAreas(0)
    ' 此时读取属性已返回非零正常值
    Dim areaWidthPct = targetArea.Position.Width
    Dim areaHeightPct = targetArea.Position.Height
    Dim plotWidthPct = targetArea.InnerPlotPosition.Width
    Dim plotHeightPct = targetArea.InnerPlotPosition.Height
    
    ' 此处填入你的1:1等比例调整逻辑
    ' 注意自定义尺寸前需先关闭自动计算：
    ' targetArea.InnerPlotPosition.Auto = False
    ' targetArea.Position.Auto = False
End Sub

方案2：Load事件内异步延迟执行 #

如果需要把逻辑保留在Form Load流程内，可以通过UI同步上下文提交异步回调，等待初始布局完成后再执行属性读取与调整操作：

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    ' 先完成Chart的基础初始化：绑定数据、调整坐标轴最大最小值等
    ' ...
    
    ' 提交回调，等待UI线程完成初始布局后执行
    SynchronizationContext.Current.Post(Sub()
        Dim targetArea = Chart1.ChartAreas(0)
        ' 此时可正常读取两个Position属性的非零值
        ' 执行你的比例调整逻辑即可
    End Sub, Nothing)
End Sub

注意事项 #

• 手动修改Position或InnerPlotPosition属性前，需先将对应属性的Auto字段设为False，否则自定义值会被Chart的自动计算逻辑覆盖。
• 如果窗体支持拖拽缩放，可将比例调整逻辑同时绑定到Chart.Resize事件，保证窗体尺寸变化时坐标轴比例始终保持1:1。

内容的提问来源于stack exchange，提问作者AaronJasso