SIEMENS西门子广东省茂名市(授权)电机一级代理商——西门子华南总代理
| 更新时间 2024-11-20 07:00:00 价格 请来电询价 西门子总代理 PLC 西门子一级代 驱动 西门子代理商 伺服电机 联系电话 15903418770 联系手机 15915421161 联系人 张经理 立即询价 |
详细介绍
1. 在Home画面中创建三个按钮,背景色改成需要修改成的背景色
Sub ChangeBackgroundColor()'提示:' 1. 使用 <CTRL+SPACE> 或 <CTRL+I> 快捷键打开含所有对象和函数的列表' 2. 使用 HMI Runtime 对象写入代码。' 示例:HmiRuntime.Screens("Screen_1")。' 3. 使用 <CTRL+J> 快捷键创建对象引用。'从此位置起写入代码:
Select Case SmartTags("ColorNumber") Case 0 HmiRuntime.Screens("Home").BackColor=RGB(255,0,0) Case 1 HmiRuntime.Screens("Home").BackColor=RGB(0,255,0) Case 2 HmiRuntime.Screens("Home").BackColor=RGB(0,0,255) End Select
End Sub
我们这里使用红 绿 蓝三种颜色
2
3
Select Case SmartTags("ColorNumber") Case 0 HmiRuntime.Screens("Home").BackColor=RGB(255,0,0) Case 1 HmiRuntime.Screens("Home").BackColor=RGB(0,255,0) Case 2 HmiRuntime.Screens("Home").BackColor=RGB(0,0,255) End Select
End Sub
4
相关产品