e4a判断标签颜色寻找文本

事件 按钮1.被单击()
   变量 待判断 为 文本型 = 删首尾空(编辑框1.内容)
   如果 待判断 = “” 则
   弹出提示(“待判断的内容不能为空”)
   退出
   结束 如果
   判断内容(标签1,待判断)
   判断内容(标签2,待判断)
结束 事件
过程 判断内容(组件 为 标签,待判断 为 文本型)
   如果 寻找文本(组件.标题,待判断,0) = -1 则
   组件.背景颜色 = 无色
   组件.字体颜色 = 黑色
   否则
   组件.背景颜色 = 红色
   组件.字体颜色 = 白色
   结束 如果
结束 过程