excel vba编程制作一个恶作剧小程序

今天小编为大家分享excel中使用vba制作一个恶作剧小程序方法，很不错，值得大家学习，推荐过来，一起来学习吧！

步骤

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编程制作一个恶作剧小程序方法介绍，操作很简单的，大家学会了吗？希望能对大家有所帮助！

赞 (0)

相关推荐

  • 用excel vba编程制作一个三角形面积计算器

    今天小编为大家介绍用excel vba编程制作一个三角形面积计算器方法,操作很简单的,有需要的朋友可以参考一下,希望能对大家有所帮助. 方法 打开excel,进入vbe编程环境. 插入模块. 编程,分 ...

  • Excel表格怎么制作一个随机点名程序?

    execl表格中想要制作一个随机点名程序,该怎么制作呢?下面我们就来看看详细的教程,请看下文详细介绍. 1.在A列单元格里输入同学们的姓名,我这里为方便用百度+数字来表示 2.在另外的单元格先输入函数 ...

  • 微信小程序功能有哪些（怎样自己制作一个微信小程序）

    微信小程序功能有哪些（怎样自己制作一个微信小程序）

    随着小程序的日益普及,许多行业会选择制作微信小程序,以更好的方式为用户服务.如何制作行业微信小程序?让我们看看.一.建立小程序进入小程序制作平台,点击"进到管理"前往小程序管理页面 ...

  • vb6.0怎么制作一个抽奖小程序? vb6.0抽奖器的制作方法

    商场搞活动想要制作一个抽奖程序,今天我们就来看看使用vb6.0制作抽奖小程序的教程. 1.首先启动vb6.0,执行文件-新建命令,弹出新建工程对话框,在该对话框中选择标准的exe后点击打开按钮,进入v ...

  • 利用excel vba编程在窗体上画一个六边形

    利用excel vba编程在窗体上画一个六边形.这篇教程是向朋友们分享利用excel vba编程在窗体上画一个六边形方法,教程很不错,适合新手来学习,推荐大家来看看吧. 步骤1 打开excel表格,进 ...

  • excel vba编程在窗体上画一个八边形

    本节目的:利用excel vba编程,在窗体上画一个八边形,不会的朋友可以参考本文,来看看吧! 步骤 打开excel,进入vbe窗口. 插入模块. 在模块1内编程,声明4个函数,并编写一句显示窗体的程 ...

  • excel vba编程在窗体上画一座房子

    excel vba编程在窗体上画一座房子.这篇教程是向大家介绍利用excel vba编程在窗体上画一座房子方法,教程比较基础,制作出来的效果非常不错,推荐来看看吧. 步骤 打开excel表格,进入vb ...

  • 利用excel vba编程在窗体上画路灯

    今天小编为大家分享利用excel vba编程在窗体上画路灯方法,操作很简单的,喜欢的朋友可以参考本文. 步骤 1.打开excel,进入Visual Basic编辑器. 2.插入模块. 3.模块编程.在 ...

  • excel vba编程画喇叭花方法

    今天小编就为大家分享利用excel vba编程,在窗体上画喇叭花方法介绍,操作很简单的,喜欢的朋友可以参考本文,来看看吧! 步骤 1.打开excel,进入Visual Basic编辑器. 2.插入模块 ...