.版本 2
.支持库 internet
.子程序 _按钮1_被单击
.局部变量 QQ号, 文本型
.局部变量 密码, 文本型
QQ号 = 到文本 (编辑框1.内容)
密码 = 到文本 (编辑框2.内容)
.判断开始 (编辑框1.内容 = “”)
信息框 (“请输入您的账号!”, #错误图标, “登录失败”)
.判断 (编辑框2.内容 = “”)
信息框 (“请输入您的密码!”, #错误图标, “登录失败”)
.判断 (编辑框1.内容 + 编辑框2.内容 = “”)
信息框 (“请输入您的账号和密码!”, #错误图标, “登录失败”)
.判断 (按钮2.标题 = “正确” 且 按钮3.标题 = “正确”)
.判断开始 (连接发信服务器 (“smtp.qq.com”, , QQ号, 密码, 3000) = 真)
信息框 (“您输入的QQ密码正确”, #信息图标, “正确”)
断开发信服务器 ()
.默认
.判断结束
.判断开始 (连接发信服务器 (“smtp.qq.com”, , QQ号, 密码, 3000) = 真)
信息框 (“您输入的QQ密码不正确,请重新输入”, #信息图标, “错误”)
.默认
.判断结束
.默认
.判断结束
断开发信服务器 ()
‘这样就可以了
编辑框是文本数据
你需要在赋值语句右边加一个到文本()
也就是
编辑框_平方.内容
=
到文本
(到整数
(编辑框_宽.内容)
÷
1000
×
到整数
(编辑框_高.内容)
÷
1000)
看到那么多问好和感叹好没有,这是程序无法识别的命令