WPS巧用表格制作趣味小游戏 用WPS表格制作表白黑科技：新建表格，打开VBA编辑器，插入用户窗体并设置属性。通过工具箱插入图像、标签、按钮控件并设置相关属性，输入代码。最后插入结尾图片并设置，文件保存为Excel启用宏的工作簿，一个只能点击接受的表白小游戏就完成了，快来为心仪的人制造惊喜吧！下面是小编精心整理编写的关于“ WPS巧用表格制作趣味小游戏 ”的详细教程，请大家仔细阅览学习：
WPS巧用表格制作趣味小游戏
在日常办公中，WPS表格是我们常用的工具之一。你可能不知道，WPS表格还有一个独特的表白黑科技，快来学习一下，用它向心仪的人表白吧！
1. 新建一个WPS表格，然后按ALT + F11打开VBA编辑器。接下来，点击VBAProject右键，选择插入 – 用户窗体。
2. 在属性窗口中设置窗体属性，找到Caption项。Caption项的作用是可以自定义窗口左上角显示的文字。比如，你可以将其修改为：WPS学院。
3. 接下来设置用户窗体的高度和宽度。Height项即用户窗体的高度，Width项即用户窗体的宽度。将Height项输入600，Width项输入800。
4. 点击窗口，在弹出的工具箱中找到插入图像控件。点击图像控件，并在窗口随机画出一个区域，然后设置图像控件的属性。点击Picture项右面的3个点的按钮，插入你想要的图片。同样，将Height项输入600，Width项输入800。left项设置为0，这表示与用户窗体左侧边框对齐。Top项设置为0，意味着与用户窗体顶端边框对齐。
5. 再次点击窗口，在弹出的工具箱中找到插入标签控件，插入两个标签控件。在标签Label1的属性窗口中修改Caption项为对方的名字，例如迪丽热巴。你可以自行设置字体、标签尺寸等。在标签Label2的属性窗口中修改Caption项为你的寄语。比如输入：天青色等烟雨，而我在等你。
6. 继续点击窗口，在弹出的工具箱中找到插入按钮控件。设置属性Caption分别为接受和不接受。
7. 将光标定位在工程窗口，双击ThisWorkbook，在右侧窗口输入以下代码：
Private Sub Workbook_Open()
Application.WindowState = xlMinimized
UserForm1.Show
End Sub
8. 点击UserForm1右键选择查看代码，输入以下代码：
Private Sub CommandButton1_Click()
Image2.Visible = True
End Sub
Private Sub CommandButton2_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
Sheet1.Range(“C1”) = Sheet1.Range(“C1”) + 1
If Sheet1.Range(“C1”) Mod 10 = 0 Then
MsgBox prompt:=“你已经尝试拒绝我” & Sheet1.Range(“C1”) & “次了，“真的这么绝情，点一下喜欢我试试呗”, Title:=“我很受伤”
End If
a = Int(Rnd() * 10)
i = a Mod 2
If i = 1 Then
j = Int(Rnd() * 200)
Else
j = Int(Rnd() * 200) * -1
End If
CommandButton2.Move Left:=CommandButton2.Left – j, Top:=CommandButton2.Left – j
If CommandButton2.Left < 0 Or CommandButton2.Left > 700 Then
CommandButton2.Left = 400
End If
If CommandButton2.Top < 0 Or CommandButton2.Top > 300 Then
CommandButton2.Top = 200
End If
9. 最后，将光标定位在窗口。点击工具栏中的图像控件插入最后结尾的图片。将Height项输入600，Width项输入800。left项设置为0，与用户窗体左侧边框对齐。Top项设置为0，与用户窗体顶端边框对齐。同时，将Visible设置为False。
10. 文件保存类型选择Excel启用宏的工作簿。这样，一个只能点击接受的表白小游戏就制作完成了。通过这个独特的WPS表格表白黑科技，为你的表白增添一份创意和惊喜吧！
关于《WPS巧用表格制作趣味小游戏》这篇文章的具体内容就介绍到这里，希望能对大家有所帮助。更多相关资讯和教程请关注 wps自学网-wps office下载!