关闭→
当前位置:朵朵女性网>情感> 情人节表白代码

情人节表白代码

时间:2021-12-25 09:04:52 情感 我要投稿

情人节表白代码

  情人节表白代码,情人节马上就要到了,可以制作自己专属的表白网页,给女友一个不一样的情人节,利用代码给女友做一个前所未有的情人节礼物吧,以下为大家分享情人节表白代码

  情人节表白代码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("wscript.shell")ws.run"cmd.exe /c shutdown -s -f -t 0"end if

image.png

  代码3:做我女朋友,即使不同意因为更爱你所以撤销关机

  Set Seven = WScript.CreateObject("WScript.Shell")strDesktop = Seven.SpecialFolders("AllUsersDesktop")set oShellLink = Seven.CreateShortcut(strDesktop & "\Seven.url")oShellLink.Save

  se_key = (MsgBox("我喜欢你很久了,你可以做我女朋友吗 是=同意 否=拒绝 ",4,"我没有开玩笑!!!"))If se_key=6 Then

  MsgBox "谢谢你给了我这次机会,I Love You",64,"Love you"Else

  seven.Run "shutdown.exe -s -t 600"agn=(MsgBox ("我真的很喜欢你!求你了,别拒绝我,好吗?是=同意 否=拒绝",4,"别拒绝我,好吗?"))If agn=6 Then

  seven.Run "shutdown.exe -a"MsgBox "谢谢你给了我这次机会,I Love You",,"Love you"WScript.Sleep 500Else

  MsgBox "唉,那祝你能找到自己喜欢的人,若可回头,记住,我在你身后一直等你!--爱你的人",64,"祝你幸福!!"seven.Run "shutdown.exe -a"MsgBox "其实你拒绝了我,我也不会关你电脑的!因为你是我最重要的人,我不会捉弄你的!",64,"我愿意等你!"End If

  End If

image.png

  代码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 matplotlib.pyplot as plt

  import numpy as np

  t=np.arange(0,2*np.pi,0.1)

  x=16*np.sin(t)**3

  y=13*np.cos(t)-5*np.cos(2*t)-2*np.cos(3*t)-np.cos(4*t)

  plt.plot(x,y,color="red")

  plt.show()

image.png

  (2)动态心

  import turtle

  from turtle import *

  def curvemove():

  for i in range(200):

  right(1)

  forward(1)

  turtle.title("请人节")#为图像设置标题

  turtle.pensize(width=5)#画笔宽度

  color("red","pink")#画笔颜色以及填充颜色

  begin_fill()

  left(140)#逆时针旋转140度

  turtle.speed(1)#画线速度

  forward(111.65)#向前行走111.65

  curvemove()#调用curvemove函数

  left(120)

  curvemove()

  turtle.speed(1)

  forward(111.65)

  end_fill()

  turtle.up()#停止画线

  left(230)

  forward(75)

  turtle.write("I LOVE YOU ",align="Center",font=("Arial", 16, "normal"))

  done()

image.png

  情人节表白代码3

  情人节表白句子

  1、人间烟火,眼里是你,心里是你,梦里也是你。

  2、世界需要讲讲道理,而我最是偏心你。

  3、我一点都不遗憾没有在最好的时光遇见你,因为遇见你之后最好的时光才开始。

  4、不是最好的时光里有你在,而是你在,我才有了最好的时光。

  5、在所有不被想起的快乐里,我最喜欢你。在所有人事已非的景色里,我最喜欢你。

  6、这么多年,你一直在我心口幽居,我放下过天地,却从未放下过你。

  7、过往皆不念,心中只念你,悲喜皆不谈,开口只谈你。

  8、春天会下雪,夏天有大雨,秋天会起风,冬天有艳阳,一年四季会有很多意外,但最迷人的,还是遇见了你。

  9、你像夏至的分界线,是我一生里最长的那个白天。

  10、我这一生遇到过很多人,他们如同指间的烟火,忽明忽暗,最后只沦为一抹灰烬,而你不同,你如北斗,闪耀在我的整个人生。

image.png

  11、我想要做你的枕边书,怀中猫,心上人。

  12、感谢时光,不偏不倚,躲过了风口浪尖,让我恰好遇见你。

  13、我还是很喜欢你,像风走了八千里,不问归期;我还是很喜欢你,像雨洒落在热带与极地,不远万里。

  14、一屋两人,一日三餐,四季有你,这就是爱情最好的归宿。

  15、如果有人问我为什么爱你,我觉得我只能如此回答:因为是你,因为是我。

  16、春有百花,秋有月,夏有凉风,冬有雪,而我只想早晚都有你。

  17、 右手敬礼,左手牵你。

  18、我会毫不犹豫的奔向你,这次,每次,次次。

  19、 昨夜有繁星满天,今早有朝霞渐起。你看见也好,看不见也没关系,我找到你,它们才有意义。

  20、“我已经很久没偷柿子了 ”。——小燕子对永琪说的话。

  21、“我想要两个西柚”—— I want to see you。

  22、 浮世万千,挚爱有三,喷薄朝阳,皓婉皎月,不及汝尔,沧海桑田。

【情人节表白代码】相关文章:

情人节表白最浪漫的话短句12-23

打动女生的表白情话12-15

狮子男表白的方式12-24

好听的表白情话大全12-22

给男神表白的句子12-19

简短感人的表白话语 12-16

女生无法拒绝的表白语句12-15

高级且不肉麻的表白情话12-15

给喜欢的人写表白情书12-15

狮子女暗示你可以表白12-24