情侣起名

情侣网名:

男(天涯海角)，女(如影相随)

男(漫步云端)，女(云淡风轻)

男(闲云野鹤)，女(云卷云舒)

男(水云间)，女(水无痕)

男(秦时明月)，女(诗心秦意)

男(迎风逆旅)，女(浅夏墨离)

男(恒怀真爱)，女(晗心子月)

名字随机生成器软件

第一步，制作抽签界面。

打开WPS表格2009，新建一个空白文档。假设一个年级有20个班，在a1单元格中录入“班主任姓名”，在(a2：a21)单元格区域中录入班主任姓名;在b1单元格中录入“抽中班级”，在(b2：b21)单元格区域中录入“未抽签”字样;若用e3单元格显示抽签后抽到的班级，则将e3单元格设置合适的边框和字号;接着执行“视图→工具→控件工具箱”，单击“命令按钮”，在e3单元格下方插入两个按钮，并在“属性”窗口中设置Caption选项分别为“抽签”和“停止”，名称选项为默认的CommandButton1和CommandButton2。

第二步，为按钮实现其功能。

双击“抽签”按钮，打开代码窗口，输入下列代码(该代码中包含“停止”按钮的代码)：

Option Explicit

Dim flag As Boolean, i, j, m As Integer

Private Sub CommandButton1_Click()

flag = True '初始化中断变量 当中断变量为真时开始抽签

tiaozhuan1:

For i = 1 To 20 '假如有20个班

DoEvents '释放程序控制权 允许执行其它事件

For j = 2 To 21 '第2行到21行

If Cells(j, 2) = i Then GoTo tiaozhuan2

Next

Cells(3, 5) = i '即e3单元格显示循环变量的值

If flag = False Then GoTo tiaozhuan3 '如果按下了停止按钮则退出

tiaozhuan2:

Next

If flag = True Then GoTo tiaozhuan1

'如果一次循环结束还没按下停止按钮则进行下一次循环

tiaozhuan3:

For m = 2 To 21

If Cells(m, 2) = "未抽签" Then

Cells(m, 2) = Cells(3, 5)

Exit Sub

End If

Next

End Sub

Private Sub CommandButton2_Click()

flag = False '中断循环

End Sub

现在关闭代码窗口，退出设计模式，一个抽签程序就制作好了。当单击“抽签”按钮，在e3单元格中轮流显示没有被抽中的班级，单击“停止”按钮时e3单元格显示该班主任抽中的班级，并将抽中的班号自动填写到相应的单元格中，该班号不再参与下一轮抽签;当下一位班主任单击“抽签”按钮时进行下一轮抽签

取一对情侣的名字

我认为与心动对应的情侣名是燃烧。

因为根据情侣名对应法则，心动在情侣法则中属于情感类、浅层类的情侣名字，若要寻找与之对应的情侣名，则应按照“三七规则”，取心动的首字母进行匹配，而与心动这个情侣名相匹配的正好是燃烧，心动燃烧组成的一个完整的词汇。

把名字加进去的情侣名

天真无邪へ

静候灵归へ

犹记春衫゛

未忘夏辰゛

你已年华老去レ

我却容颜依旧レ

花落执谁人手フ

倾尽谁人残梦フ

情侣好听的昵称

一些好听又撩人的情侣昵称包括

1.亲爱的/心肝宝贝

2.宝贝/小可爱

3.我的唯一/另一半

4.亲亲/宝贝糖

5.甜心/糖果

6.宝贝熊/小熊猫

7.宝贝龙/小龙女

8.阳光/甜蜜

9.玫瑰/蓝色天使

10.星星/月亮。