如何用VB写一个参数数目可变的函数

2001-08-16 11:59:52 844 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

Arduino程序设计（十四）舵机控制实验（SG90）本文介绍SG90舵机控制原理及实验，主要内容有：1、介绍SG90舵机；2、舵机0°~180°来回转动；3、串口控制舵机转动固定角度。（1）舵机是一种位置（角度）伺服的驱动器。舵机只是一种通俗的叫法，其实质是一个伺服马达。在需要角度不断变化并可以保持的控制系统中应用广泛。如遥控机械人、飞机模型等。（2）舵机的转动角度为0~180°，其内部结构包括电机，控制电路和机械结构三部分。电机有三根线引出，分别接VCC、GNG和信号线。阅读详情

就像int printf( const char *format [, argument]... );
可以使用任意数目的参数

...全文

CZT与FFT频谱分析方法对比：从任意频带重采样到高精度频谱分析 M = 85 % 输出点数f0 = 70 Hz % 起始频率DELF = 0.4 Hz % 频率步长频率分辨率提高到0.4 Hz分析带宽聚焦在[70, 103.6]Hz更清晰地分辨出78Hz和82Hz的频率分量。阅读详情

masterz

VB基础类 7,788 成员 197,583 内容

+ 关注 + 加入社区

切换为时间正序

ByTheWay 2001-11-10

打赏
举报

　
在自制的控件中，可能需要对某个属性传递多个值：

Property Let Test (arg1 As String, arg2 As String, arg3 As Integer)
End Property

'用以下的方法传递参数：
Test(arg1,arg2) = arg3

masterz 2001-11-10

打赏
举报

int wsprintf(
LPTSTR lpOut, // output buffer
LPCTSTR lpFmt, // format-control string
... // optional arguments
);

Amoon 2001-11-10

打赏
举报

Faint~~~~~~！还不会用ParamArray ?!!!!!

masterz 2001-11-10

打赏
举报

无聊的问题，大家灌水吧

lanren_me 2001-08-17

打赏
举报

anddee 2001-08-16

打赏
举报

Function Sum(ParamArray intNums() As Variant)
Dim x As Variant
Dim y As Integer
For Each x In intNums
y = y + x
Next x
Sum = y
End Function

hydnoahark 2001-08-16

打赏
举报

masterz的意思指的在C中定义一个函数的参数个数是不固定的，而不是VB中的Option参数的意思
一个变通的方法是你传递一个数组给函数，在数组中包含真正的参数，然后在函数中处理数组以获得真正的参数。

zeng_zhh 2001-08-16

打赏
举报

要不這樣用:
Ｆunction Your_Fun( tt() as Variant )
這樣妳想傳几個就几個,當然調用之前要指定要几個.

it_seeker 2001-08-16

打赏
举报

Public Function CallMethod(MethodName As String, ParamArray arg() As Variant)
肯定能满足你的要求

outer2000 2001-08-16

打赏
举报

你只有自己先定义出来。

masterz 2001-08-16

打赏
举报

失望
default参数我也知道
可是default参数和任意数目参数是有区别的

bicom 2001-08-16

打赏
举报

以上都正确！

zeng_zhh 2001-08-16

打赏
举报

可以自定義一個結构作為參數
Type Your_Name
aa as string=''
bb as ingter=0
cc as byte=0
...
end type
function Your_Fun(Your_Pa as Your_Name)
....
end function

ozw 2001-08-16

打赏
举报

Eunction MutiParameter(byval BiXu as string,Optional opt1 as string="A",Optional opt2 as string="B",Optional opt3 as string="C"...)
....
End Function

以上函数中，第一个参数是必须的（也可以不要，去掉就行了)
后面的参数可选，如果想跳过其中一个（使用默认值），调用的时候光写个，跳过就可以了。

applekiller 2001-08-16

打赏
举报

上面是对的。

masterz 2001-08-16

打赏
举报

你这个函数最多使用1个参数
如何任意？请知道printf用法的大虾回复

y1g1y1 2001-08-16

打赏
举报

Option Explicit

Function k(Optional a As Integer = 1)
MsgBox a
End Function

Private Sub Form_Load()
Call k(100)
Call k
End Sub

chenangle 2001-08-16

打赏
举报

呵呵，都可以阿

hydnoahark 2001-08-16

打赏
举报

但是感觉上ParamArray实际就是传递数组的一个变化，不知道理解对不对？
一个例子：
Dim x As Variant
Dim y As Integer
Dim intSum As Integer

Sub Sum(ParamArray intNums())
For Each x In intNums
y = y + x
Next x
intSum = y
End Sub

Private Sub Command1_Click()
Sum 1
List1.AddItem intSum
End Sub

Salas 2001-08-16

打赏
举报

好象楼上说的都是制定默认的参数值,这样才能达到可选,但是这样的参数数目还是需要定义函数时候来制定的

加载更多回复（6）

如何用VB写一个参数数目可变的函数

相关推荐