可以让玫瑰花一朵朵出现围成一个桃心的VB程序

可以让玫瑰花一朵朵出现围成一个桃心的VB程序,第1张

首先你要准备一个玫瑰花文件,要小一点。

然后在窗体上放12个Image控件,组成一个控件数组,摆成心形,Picture属性设置为你的玫瑰花。Visibel属性全部设置为False。

在窗体上放一个Timer控件。Interval属性设置为1000,每秒显示一朵玫瑰花。

 

OK!你的心愿完成了!

 

Private Sub Form_Load()

For i = 0 To 11

    Image1(i)Picture = LoadPicture(AppPath + "\西安绿博园七彩玫瑰jpg")

Next

Timer1Enabled = True

End Sub

Private Sub Timer1_Timer()

    Static i As Integer

    Image1(i)Visible = True

    i = i + 1

    If i = Image1Count Then

        Label1Visible = True

        Timer1Enabled = False

    End If

   

End Sub

工具:钩针、两种颜色的棉线

1、先用钩子勾出活线圈。然后在活头线圈中勾长针3针,长针1针,最后锁定起点,拧紧活头线,勾出一个**的狭缝。

2、更换蓝色的线,并开始针。然后,每个针孔用2根长针钩起来,然后锁在第二步。

3、后1圈正常锁针,拉4针在第一针孔,然后分离第二针孔,将针放在第三针孔,钩在针的中间,把针分成两针。下一步是背对背的第三步,完成另一半。

4、在这个步骤中,锁针的方法是一样的。注意下针的穿孔。只剩下一半的针锁孔,因此另一半保持在原地,使针锁向内一致,蓝线锁针则是两次。

5、将黄线锁脚更换为1环,然后将两环锁入1环,钩中两针,环完成。然后用两个引脚代替**的线,将其锁成一个引脚。在钩子上,针是长的。两针,直到1个顶点形成。

6、 将黄线与蓝线合并,然后钩并拉20针,然后锁定到拉的开始。这么漂亮的心形吊坠。

谁说玩浪漫非要有个特别的理由才行? 发挥点想象力就能为你和你的她建立亲密关系!在520这个爱的日子里,就花些心思和女友一起度过吧!小小的惊喜就会让你发现,原来贴近一个人的内心,是如此容易……我就来出谋划策,希望能带给男生们更多浪漫灵感,让你们的520多一些甜蜜回忆~

手工定制的巧克力——浓浓爱意,融化在心

巧克力之所以成为情人节和纪念日的必选礼物,原因大概是因为它是浪漫爱情永恒的象征吧。巧克力不仅能用甜蜜的滋味吸引女孩子的注意力,百变的可爱外型也同样能博得她们的欢心。所以在这个特殊的日子里,不妨亲手为她准备一份精美的手工巧克力,把它从最原始的状态,亲手塑造成可爱的小球或者桃心,再用糖浆写上你的表白……深色巧克力泛着丝滑秀发般的光泽,而浓醇的口感也如丝绸一样顺滑,为你和深爱的她带来最甜蜜的感动!

微风摇曳中的晚餐——二人世界,无与伦比

在朦胧的烛光下,若有若无的音乐中,享受着可口的西餐与芳香的红酒……如此惬意的环境下,情侣之间一定会敞开心扉,倾吐自己对对方的眷恋。想讨女友欢心,为她安排一顿烛光晚餐或许是不错的主意哦!找一家有露台的餐厅,在初夏的晚风里给女朋友朗诵一首小诗,唱几句深情的小调,还能一边用餐一边欣赏城市的夜景,烛光中对方的形象也会变得温暖可人吧?别忘记准备几枝玫瑰花,再细心的铺上漂亮的桌布,一次愉快的约会就此开始……相信她会永远记得你的温柔体贴,而她在微风中传来的发香以及甜美的笑容,也一定会给你留下 完美 的印象~

别具匠心的小首饰——精致小件,精致我心

年轻时的爱情,纯洁简单,虽然不像钻石一样耀眼夺目,却也可以如银饰般素雅安宁。在有着美好意义的5月20号,作为男友,不如送女朋友一件小小的首饰吧,小巧精致的首饰会唤起她们内心的温柔情愫,因为它好似你们之间的契约,牵绊着你们的恋情,它让女友有一种归属感~所以不管是可爱的小动物造型的耳环,还是形状别致的指环项坠,传递出的都是一份沉甸甸的爱意。纵然随着时光的推移,你会买给她更多更昂贵的珠宝,但是每每看到这件匠心独运的小首饰,都会记起今天,相视一笑,回忆当时美好的爱情!

表达真爱从不拘泥于时间,在5月20号大胆地为你爱的她安排下种种惊喜吧, 我们愿做你们恋爱的守护使者,见证你们真爱旅途中的幸福与甜蜜,和你们一起赢在生活中每个重要时刻!

一、

如果你心爱的姑娘是一位文学爱好者,那么爱情诗求婚这个想法很适合你。创作一首诗或短篇小说,以求婚为主题或者结局。当她读到最后部分时,耐心地等待她惊讶的表情!你不是作家,没有那么好的文采不用担心。

二、

在与您所爱的人一起度假期间求婚也是很不错的。不一定要去很远的地方,周末去附近的城市也是一个好主意!当你到达目的地之后,在飞机上或在车内进行操作时,都是可以的,当然你也可以度假过程中、著名景点求婚,这样能获得更多地关注哦。

三、

创建一系列你和你心爱姑娘的美好记忆,将情侣照一起打印出来精美地保存在一个盒子里。在每张照片背后留下一张纸条,让她在惊喜之前沉浸在怀旧的幸福之中。温馨提示:在开始打开照片前,您可以让她一起播放特定的歌曲或你们共同喜欢的音乐,以便铺垫出记忆路径设置下她的心情。

欢迎分享,转载请注明来源:浪漫分享网

原文地址: https://hunlipic.com/jiehun/2073077.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-07-23
下一篇 2023-07-23

发表评论

登录后才能评论

评论列表(0条)

保存