Dim Products As List(Of String)Products = DataTables("表A").SQLGetValues("ID", " 数值> 1 ", "时间")
For Each Product As String In Products
nfi.Ballocolor: rgb(0, 0, 255); font-family: 宋体; font-size: small;">" '需要弹出的提示
nfi.ShowBalloonTip(1000) '提示显示的事件(毫秒)
Next