用VB讀取EXCEK趨式線公式 總是滯后
說明 其中“公式" 按鈕vb,net程式
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Try
Dim gs1 As String
Me.Range("B49").Value = "C1: "
gs1 = Me.Chart_2.SeriesCollection(1).Trendlines(1).DataLabel.text
If gs1 = "" Then
Exit Sub
End If
Dim gs1_2() As String
gs1_2 = gs1.Split("=") '3
If Val(gs1_2(2)) <= 0.995 Then
Chart_2.SeriesCollection(1).Trendlines(1).type = 3
Chart_2.SeriesCollection(1).Trendlines(1).Order = 4
End If
gs1 = Me.Chart_2.SeriesCollection(1).Trendlines(1).DataLabel.text
Me.Range("B49").Value = "C1: " & gs1
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Sub
End Class
中gs1是讀取趨式線文本（注意標色的地方）
在改變趨式引數 Order = 4后
在讀一次gs1 可反映如下，
進EXCLE 沒按過“公式" 按鈕：圖1
按 1次“公式" 按鈕：圖2 圖最下 出現”C1 :Y =...“ 是圖1中EXCEL的趨式線公式，本圖公式已變了
按 2次“公式" 按鈕：”C1 :Y =...“ 是圖2 上下一致
，明顯.DataLabel.text滯后，怎么解決為個滯后
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/36365.html
標籤：VB.NET
上一篇：require 加載js超時導致頁面無法使用【Uncaught Error: Load timeout for modules:】
下一篇：求幫新人，誠信求助