private command -click() randomize dim x as integer dim y as integer x=inputbox(请输入一个数) y=inputbox(请输入一个数) if x=y then print "两数相等“ else print "两数不相等" end if end sub