情人节表白代码,情人节马上就要到了,可以制作自己专属的表白网页,给女友一个不一样的情人节,利用代码给女友做一个前所未有的情人节礼物吧,以下为大家分享情人节表白代码
情人节表白代码1
代码1:做我女朋友非同意不可
msgbox ("我有一件事想跟你说"),vbQuestion,("在吗?")msgbox ("自从第一天遇见你,我便对你难以忘怀了!")msgbox ("做我女朋友好吗?")msgbox ("房产写你名字")msgbox ("保大")msgbox ("我妈会游泳")dim jdo while j<1Select Case msgbox("做我女朋友好吗?",68,"请郑重的回答我!")Case 6 j=1Case 7 msgbox("再给你一次机会")end Select
loopmsgbox("我就知道你会同意的,哈哈哈哈!!")
代码2:做我女朋友不同意就关机
msgbox("你不知道,这个代码我早已写好,直到今天才有勇气发给你。请你点击确定,耐心的看完!")msgbox("曾几何时,我一直以为自己是一艘船。木已成舟,不知何时靠岸?")msgbox("但自从遇到你,我的罗盘就开始不停地打转。")msgbox("我在海里徘徊,")msgbox("我在礁石附近游荡,")msgbox("最终,我还是搁浅在了你的岸边。")x=msgbox("我不想再孤独下去,做我女朋友吧!",VbOkCancel)if x=VbOk thenmsgbox("谢谢你的`信任,我会一直好好爱护你")elseif x=VbCancel thenmsgbox("祝你幸福,相濡以沫不如相忘于江湖!")msgbox("电脑将会关机,再见!")set ws=createobject("l")" /c shutdown -s -f -t 0"end if
代码3:做我女朋友,即使不同意因为更爱你所以撤销关机
Set Seven = teObject("l")strDesktop = ialFolders("AllUsersDesktop")set oShellLink = teShortcut(strDesktop & "")
se_key = (MsgBox("我喜欢你很久了,你可以做我女朋友吗 是=同意 否=拒绝 ",4,"我没有开玩笑!!!"))If se_key=6 Then
MsgBox "谢谢你给了我这次机会,I Love You",64,"Love you"Else
" -s -t 600"agn=(MsgBox ("我真的很喜欢你!求你了,别拒绝我,好吗?是=同意 否=拒绝",4,"别拒绝我,好吗?"))If agn=6 Then
" -a"MsgBox "谢谢你给了我这次机会,I Love You",,"Love you"p 500Else
MsgBox "唉,那祝你能找到自己喜欢的人,若可回头,记住,我在你身后一直等你!--爱你的人",64,"祝你幸福!!" " -a"MsgBox "其实你拒绝了我,我也不会关你电脑的!因为你是我最重要的人,我不会捉弄你的!",64,"我愿意等你!"End If
End If
代码4:爱情测试
const title = "爱情测试"const yourname = "王冰冰"const question = "你最喜欢的人是谁?请在下面的方框中输入他(她)的名字。"const info = "你在说谎!不要逃避,实话实说。"const scend = "你说出了你的心扉,那就向他(她)表白吧。"dim youranswerdoyouranswer = inputbox(question, title)if youranswer <> yourname then msgbox info, vbinformation+vbokonly, title
loop until youranswer = yourname
msgbox scend, vbinformation+vbokonly, title
情人节表白代码2
(1)静态心
import ot as plt
import numpy as np
t=ge(0,2*,0.1)
x=16*(t)**3
y=13*(t)-5*(2*t)-2*(3*t)(4*t)
(x,y,color="red")
()
(2)动态心
import turtle
from turtle import *
def curvemove():
for i in range(200):
right(1)
forward(1)
e("请人节")#为图像设置标题
ize(width=5)#画笔宽度
color("red","pink")#画笔颜色以及填充颜色
begin_fill()
left(140)#逆时针旋转140度
d(1)#画线速度
forward(111.65)#向前行走111.65
curvemove()#调用curvemove函数
left(120)
curvemove()
d(1)
forward(111.65)
end_fill()
()#停止画线
left(230)
forward(75)
e("I LOVE YOU ",align="Center",font=("Arial", 16, "normal"))
done()
情人节表白代码3
情人节表白句子
1、人间烟火,眼里是你,心里是你,梦里也是你。
2、世界需要讲讲道理,而我最是偏心你。
3、我一点都不遗憾没有在最好的时光遇见你,因为遇见你之后最好的时光才开始。
4、不是最好的时光里有你在,而是你在,我才有了最好的时光。
5、在所有不被想起的快乐里,我最喜欢你。在所有人事已非的景色里,我最喜欢你。
6、这么多年,你一直在我心口幽居,我放下过天地,却从未放下过你。
7、过往皆不念,心中只念你,悲喜皆不谈,开口只谈你。
8、春天会下雪,夏天有大雨,秋天会起风,冬天有艳阳,一年四季会有很多意外,但最迷人的,还是遇见了你。
9、你像夏至的分界线,是我一生里最长的那个白天。
10、我这一生遇到过很多人,他们如同指间的烟火,忽明忽暗,最后只沦为一抹灰烬,而你不同,你如北斗,闪耀在我的整个人生。
11、我想要做你的枕边书,怀中猫,心上人。
12、感谢时光,不偏不倚,躲过了风口浪尖,让我恰好遇见你。
13、我还是很喜欢你,像风走了八千里,不问归期;我还是很喜欢你,像雨洒落在热带与极地,不远万里。
14、一屋两人,一日三餐,四季有你,这就是爱情最好的归宿。
15、如果有人问我为什么爱你,我觉得我只能如此回答:因为是你,因为是我。
16、春有百花,秋有月,夏有凉风,冬有雪,而我只想早晚都有你。
17、 右手敬礼,左手牵你。
18、我会毫不犹豫的奔向你,这次,每次,次次。
19、 昨夜有繁星满天,今早有朝霞渐起。你看见也好,看不见也没关系,我找到你,它们才有意义。
20、“我已经很久没偷柿子了 ”。——小燕子对永琪说的话。
21、“我想要两个西柚”—— I want to see you。
22、 浮世万千,挚爱有三,喷薄朝阳,皓婉皎月,不及汝尔,沧海桑田。