上面的结果可能存在更新周期有误差造成显示有点区别我用文本有改了一个：
文本的字体用vbs脚本做：
Function Text_Trigger(ByVal Item)
Dim tag(10)
Dim group1

Set group1=HMIRuntime.Tags.CreateTagSet
group1.add"data"'整数判断应该显示哪个数值
group1.add"data_1"
group1.add"data_2"
group1.add"data_3"
group1.add"data_4"
group1.add"data_5"
group1.add"data_6"
group1.add"data_7"
group1.add"data_8"
group1.add"data_9"
group1.add"data_10"
group1.read
tag(0)=group1("data").value
tag(1)=group1("data_1").value
tag(2)=group1("data_2").value
tag(3)=group1("data_3").value
tag(4)=group1("data_4").value
tag(5)=group1("data_5").value
tag(6)=group1("data_6").value
tag(7)=group1("data_7").value
tag(8)=group1("data_8").value
tag(9)=group1("data_9").value
tag(10)=group1("data_10").value
Select Case tag(0)
Case 1 Text_Trigger="1号模拟量="&tag(1)
Case 2 Text_Trigger="2号模拟量="&tag(2)
Case 3 Text_Trigger="3号模拟量="&tag(3)
Case 4 Text_Trigger="4号模拟量="&tag(4)
Case 5 Text_Trigger="5号模拟量="&tag(5)
Case 6 Text_Trigger="6号模拟量="&tag(6)
Case 7 Text_Trigger="7号模拟量="&tag(7)
Case 8 Text_Trigger="8号模拟量="&tag(8)
Case 9 Text_Trigger="9号模拟量="&tag(9)
Case 10 Text_Trigger="10号模拟量="&tag(10)
End select
End Function
效果图