'--->窗体加载:
'获取登录人能看到的组织机构,可以是ID,可以是名称,这里以名称为例
dim companyStr="重庆公司,北京公司"
'坼分能看到的公司个数
dim companyName=split(companyStr,",")
'动态设置成员
for i=0 to companyName.Length-1
图表部件1.AddSeries("月度",companyName.GetValue(i),companyName.GetValue(i),Color.FromArgb(0),"Line","{V} ",5,True)
next
'刷新
图表部件1.RefreshData()
'设置成员小数位数为0
for i=0 to companyName.Length-1
图表部件1.ValuePrecision(i,0)
next
'*******************窗体加载和关闭事件结束*****************