易语言小程序——强制性选择:你是不是喜欢我
1、首先,打开易语言,选择新建,然后在弹出的对话框中直接默认点击确定,可以看到已经创建了一个易语言空白程序,下面开始制作

2、首先在点击启动窗口,然后在旁边的属性栏中编辑它的大小
高度为:300
宽度为:400

3、在组件栏中选择“标签”组件,选中“标签”后,把鼠标移到窗口界面,拖动鼠标,绘制一个“标签”


4、同样,编辑“标签”的属性,如图所示,需要更改项为
标题:你是不是喜欢我
左边:50 、顶边:30 、宽度:300 、高度:50
以及字体,点击字体,会弹出一个对话框,大小选择为26,点击确定


5、在组件栏中选择“按钮”,然后在启动窗口绘制两个“按钮”,两个按钮属性如图所示



6、现在窗口界面已经初步完成,下面是最重要的代码部分
在启动窗口空白位置鼠标双击,进入代码编辑界面


7、'以下是代码,可以选择复制粘贴或手动输入
.版本 2
.程序集 窗口程序集_启动窗口
.子程序 __启动窗口_鼠标位置被移动, 逻辑型
.参数 横向位置, 整数型
.参数 功能键状态, 整数型
.参数 纵向位置, 整数型
.局部变量 变量1, 整数型
.局部变量 变量2, 整数型
变量1 = 到数值 (取鼠标水平位置 ())
变量2 = 到数值 (取鼠标垂直位置 ())
.判断开始 (变量1 < 653 或 变量2 < 530 或 变量1 > 719 或 变量2 > 563)
按钮1.标题 = “不是”
.默认
.判断结束
.如果真 (按钮1.标题 = “不是”)
按钮2.标题 = “是”
.如果真结束

8、'继续输入,以下是代码,可以选择复制粘贴或手动输入
.版本 2
.子程序 _按钮1_鼠标位置被移动, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
.局部变量 标签3, 整数型
.局部变量 标签4, 整数型
标签3 = 到数值 (取鼠标水平位置 ())
标签4 = 到数值 (取鼠标垂直位置 ())
按钮1.标题 = “是”
.如果真 (按钮1.标题 = “是”)
按钮2.标题 = “不是”

9、'继续输入,以下是代码,可以选择复制粘贴或手动输入
.版本 2
.子程序 _按钮2_鼠标位置被移动, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
.局部变量 标签1, 整数型
.局部变量 标签2, 整数型
标签1 = 到数值 (取鼠标水平位置 ())
标签2 = 到数值 (取鼠标垂直位置 ())
.判断开始 (标签1 > 772 且 标签2 > 522)
按钮2.顶边 = 110
.默认
按钮2.顶边 = 200
.判断结束

10、'继续输入,以下是代码,可以选择复制粘贴或手动输入
.版本 2
.子程序 __启动窗口_可否被关闭, 逻辑型
.如果 (信息框 (“关闭窗口也改变不了你喜欢我的事实”, #确认取消钮, , ) = #确认钮)
返回 (真)
.否则
返回 (假)
.如果结束
' 上面括号里的内容是关闭窗口时弹出的消息框,可以修改
.子程序 _按钮1_被单击
信息框 (“就知道你喜欢我~”, #确认钮, , )
' 点击“是”按钮时弹出的提示框内容,可以修改
.子程序 _按钮2_被单击
信息框 (“居然被你点到了,但是你还是得喜欢我”, 0, , )

11、代码编辑完成,按F5键开始测试,以下是测试截屏




12、对于一些易程序初学者或是没有接触过易程序的用户,我这里附上源文件已经已完成的程序作为参考与借鉴,下载后解压即可使用
下载地址为:链接:http://pan.baidu.com/s/1eR2j2X8 密码:j2y4

