VBA自定义函数参数类型不符的错误

作者:iamlaosong

1、问题提出

编程中发现一个问题,系统总是提示编译错误,ByRef 参数类型不符,

可实际上参数定义没问题,原因在哪儿呢?

2、问题环境

假定函数定义如下:

Function get_kind(addr As String) As Integer

......

End Function

调用过程:

Sub check_address()

Dim addr, new_addr(10000) As String

......

addr = new_addr(i)

......

kk = get_kind(addr)

......

End Sub

3、问题原因

addr赋值后类型就不对了,虽然都是字符串,数组变量和单个变量不一样,编译系统就是报错。

找到原因问题就容易解决了:

方法一:强制转换,用Cstr(addr)

方法二:换个变量,先赋值myaddr=addr,再调用kk = get_kind(myaddr)

4、问题扩展

其它类型数组也存在同样的问题,这算不算是个BUG?

VBA自定义函数参数类型不符的错误,布布扣,bubuko.com

时间: 07-05

VBA自定义函数参数类型不符的错误的相关文章

一个可以使用多个正则表达式进行多次尝试匹配,并进行替换的Excel VBA自定义函数(UFD)

以下代码可使用多个正则表达式对目标单元格进行多次匹配尝试,如匹配成功,将停止尝试匹配其他正则表达式,并且使用该正则表达式相对应的替换表达式进行替换,返回替换结果. 使用前需要做Early Binding.即在VBE编辑器中,选择菜单栏中的Tool - Reference,如图: 弹出如下图的对话框后,选择Microsoft VBSscript Regular Expression 5.5,打钩,点OK. 此UDF的使用方法为: Text参数:需要进行处理的原始文字或单元格. MatchPatte

Excel VBA自定义函数编写(UDF, User-Defined Function)

虽然知道Microsoft Office Excel可以支持用VB语言来进行复杂的编程和自定义函数的编写,但是一直以来都没有这个需求. 这次遇到的问题是要根据一列数组计算出一个值,但计算过程又比较复杂,需要经过几步,如果不编程的话总要经过一些中间单元格来完成计算,但这又会使得整个表格变得很臃肿,并且不方便添加新列. 在这种情况下,编写自定义函数几乎成了唯一的出路.所幸,也并不太麻烦. 1. 首先,可能要在选项里启用下开发工具,保存文件的类型也得换成xlsm. 2. 打开VB编辑器编写代码,添加模

第九讲 自定义函数参数预定义

首先自定义函数可有形参,也可以无形参. 也可以给一些参数设定一定的值,在函数调用的时候,可以对已设定预定值的参数不做赋值,也可以对已设定预定值的参数重新传入一个新值. 注:面向对象开发中也有这个性质 语法结构: def funC(para1,para2...parai=default_i,paran=default_n) code... code... ... return value1,value2...valuen eg1: def test_e(n1,n2=15):    n=n1+n2 

SQL 自定义函数(Function)——参数默认值

sql server 自定义函数分为三种类型:标量函数(Scalar Function).内嵌表值函数(Inline Function).多声明表值函数(Multi-Statement Function) 标量函数:标量函数是对单一值操作,返回单一值. 内嵌表值函数:内嵌表值函数的功能相当于一个参数化的视图.它返回的是一个表,内联表值型函数没有由BEGIN-END 语句括起来的函数体. 多声明表值函数:它的返回值是一个表,但它和标量型函数一样有一个用BEGIN-END 语句括起来的函数体,返回值

基类中定义的虚函数在派生类中重新定义时,其函数原型,包括返回类型、函数名、参数个数、参数类型及参数的先后顺序,都必须与基类中的原型完全相同 but------> 可以返回派生类对象的引用或指针

您查询的关键词是:c++primer习题15.25 以下是该网页在北京时间 2016年07月15日 02:57:08 的快照: 如果打开速度慢,可以尝试快速版:如果想更新或删除快照,可以投诉快照. 百度和网页 http://bbs.csdn.net/topics/380238133 的作者无关,不对其内容负责.百度快照谨为网络故障时之索引,不代表被搜索网站的即时页面. 首页 精选版块 移动开发 iOS Android Qt WP 云计算 IaaS Pass/SaaS 分布式计算/Hadoop J

javascript函数参数、返回值类型检查

实现带参数.返回值类型声明的js函数: 类型定义:window.Str = Type.Str = Type.define('STRING', Type.isStr);var Per = Type.define('PERSON', function(p){    return p && p.type === 'person' && p.name;}); 定义函数:var addStr = Str(function(a, b){  return a + b;}, Str, St

自定义函数中的参数返回值 “-> (Int -> Int)”的问题

func makeIncrementer() -> (Int -> Int) { func addOne(number: Int) -> Int { return 1 + number } return addOne } var increment = makeIncrementer() println(increment(7)) 这里为什么要写两个 Int->Int 这里是返回值是参数,左边是参数,右边是返回值的意思. 自定义函数中的参数返回值 "-> (Int

JavaScript函数命名空间、参数类型重载实现

有时候使用doFunc({arg1: xxx, arg2:xxx});不方便,还是得在参数表重载,而重载情况又多种多样弄得晕头转向,结果就试着写了这么个东西,也不知道有没有地方能用上: <!DOCTYPE html> <html lang="zh"> <head> <meta http-equiv="Content-Type" content="text/html;charset=utf-8" />

Oracle自定义函数1

用户定义函数是存储在数据库中的代码块,可以把值返回到调用程序.调用时如同系统函数一样,如max(value)函数,其中,value被称为参数.函数参数有3种类型. IN 参数类型:表示输入给函数的参数. OUT 参数类型:表示参数在函数中被赋值,可以传给函数调用程序. IN OUT参数类型:表示参数既可以传值也可以被赋值. 1.语法格式: SQL语法方式创建的语法格式为: CREATE OR REPLACE FUNCTION function_name         /*函数名称*/(Para