集团标准化工作小组 #Q8QGGQT-GX8G08Q8-GNQGJ8-MHHGN#
一: 不使用变量单纯的操作界面
基础病1.操作某个画面中控件的属性 如 (总窗体) 下的 画面窗口2(画面窗口)
Sub OnClick(ByVal Item)
Dim objCircle
Dim screenname
Dim pwname
Set objCircle= ScreenItems("圆1" )
= 60
Set screenname=("Home1") creenItems("荣誉的力量画面窗口2")
Set value=
2.更改画面窗口的对象
Sub OnClick(Byval Item)
Dim opObject
Set opObject= ("Home1").ScreenItems("南京邮电大学张代远画面窗口2")
=""
End Sub
Set titleTxt= ("Home1").ScreenItems("静态文本2")
=+"EF" Dim objTag
Dim AText
Set objTag = ("a") vb 中 Switch 语句的变体
Dim objTag
Dim AText
霍纳Set objTag = ("a") 你要求是有是和否两个按钮那么民诉法179条MyVar = MsgBox ("Hello World!", 65, "MsgBox Example")中 的65改成4就可以了!
寿昌公主 vbs脚本中:
if msgbox("确实要启动设备吗",4,"警告")=6 then
("tag1").write 1
end if