Question

VB自定义函数

什么是自定义函数？
能举几个例子并说说代码的功能吗？

Answer 1

VB的自定义函数也就是自己根据自己的需求编制一个符合自己格式的函数
自定义函数一般都是把许多VB自带的函数编制一个符合自己需要的函数
例如制作一个辨别一个数是否为素数的函数
工具-添加过程-单选函数项
我输入的函数名为：ssif
格式为 只有一个参数为整型
是素数返回真 不是返回假

Public Function ssif(Nos As Integer) As Boolean
For i = 2 To Nos
If Nos Mod i = 0 Then
ssif = False
Exit For
End If
Next i
ssif = True
End Function

Answer 2

自定义函数就是程序员自己写的、不是vb自带函数

比如说year(日期)，就是一个返回输入日期中年份的函数，但是这个vb自带的函数

function MyYear(日期)
MyYear = "公元" & year(日期) & "年"
end function
以上就是一个自定义函数，大的功能是显示输入日期中年份是“公元XXXX年”