在西门子的一些比较高端的hmi支持脚本功能，对于一些没有封装好的功能我们可以自己开发，给大家分享两个利用脚本在KP1200中实现功能。
1. 多语言循环切换功能。
在运行系统设置中，语言和字体选项中添加语言：
新建变量，并将该变量添加事件“数值更改”---设置语言---语言
这里的变量就与张图片中的“顺序列”里的数值建立起来了联系。
编写脚本子程序Sub：
Sub scr_language（）
If SmartTags（“DB_Visualization_vi_Language”） 》= 2 ThenSmartTags（“DB_Visualization_vi_Language”） = -1
SmartTags（“DB_Visualization_vi_Language”）=SmartTags（“DB_Visualization_vi_Language”） + 1
End If
End Sub
后一步，给按键F12添加事件，找到这个函数：scr_language（）
至此就完成了利用VB脚本实现多语言循环切换的功能。
2. 循环正向计数功能。
典型的应用是对于不同种类的介质进行选择，
编写脚本函数Function：
Function scr_change_value_limited（ByRef value， ByRef limit_min，ByRef limit_max， ByRef decrement）
value =value+decrement
If value 《 limit_min Then
value =limit_max
Else
If value 》 limit_max Then
value =limit_min
End If
End If
scr_change_value_limited =value
End Function
新建按钮，添加按下事件，选择函数scr_change_value_limited：
两个例子中用到了Function 和 Sub，两者大的区别是带不带返回值，希望能够抛砖引玉，使更多的人加入到一起学习VB脚本在HMI中的应用队伍中。
