excel vba编程制作一个恶作剧小程序
时间:2021-09-22 来源:互联网
今天小编为大家分享excel中使用vba制作一个恶作剧小程序方法,很不错,值得大家学习,推荐过来,一起来学习吧!
软件名称:Excel2003绿色版 EXCEL2003精简绿色版 (附excel2003绿色工具)软件大小:13.3MB更新时间:2012-06-19立即下载
步骤
1、首先我们打开一个工作样表作为例子。
2、使用alt+f11组合快捷键进入vbe编辑器,插入一个新模块,并在模块中输入以下代码:
Option Explicit
Sub 恶作剧()
Dim Num%
Num = InputBox(选择1-5任意一个数字测试你的性格)
MsgBox (Choose(Num, 宅, 腐, 妖, 艳, man))
End Sub
3、我们声明了一个变量Num为整数型,并将其赋值为输入值,并且提示是输入1-5之间任意一个数字。
4、然后在选取之后,我们使用msgbox将其结果显示出来,这里我们使用choose函数来做选择,并给出对应的1-5的选项。
5、这里我们没有对输入的数字进行验证,如果输入小于1,或者是大于5的数字,那么choose函数会因为数字下标超出而报错。
6、所以我们必须对Num变量的输入值进行一个限制,限制的方法可以使用if函数对Num变量值进行判断,如果出现错误则显示错误并且退出过程。
If Num < 1 Or Num > 5 Then MsgBox (输入错误)
If Num < 1 Or Num > 5 Then Exit Sub
以上就是excel vba编程制作一个恶作剧小程序方法介绍,操作很简单的,大家学会了吗?希望能对大家有所帮助!
相关阅读更多 +
-
鸣潮北落野怎么解密-北落野解谜详细步骤 2025-07-29
-
-
Python中format格式化函数详解(定义、语法、参数、作用、用法) 2025-07-29
-
巴别塔圣歌文字怎么解读-五大文明文字特征详解 2025-07-29
-
物华弥新器者指引-新幻彰茶叶生产画详细 2025-07-29
-
什么是IOPn($OPN币)?值得投资吗?OPN币技术架构、代币经济学及投资分析 2025-07-29
最近更新