important problems in visual basic

[harishpatel]

Hello guys,

Many greetings,

I have some problem in visual basic, which are listed below : -

1) How to create a function with N number of parameters?
2)When array is created , it's intitial value is set from 0 , i want to start from 5 instead of zero.

[RobDog888]

Welcome to the forums.
You mean like...

Private Function MyFunct(ByVal sParam1 As String, ByVal iParam2 As Integer, bParam3 As Boolean)
    
    'Your code here
 
End Function

Private Sub Form_Load()
 
    Dim arMyArray() As Long
 
    ReDim arMyArray(10) As Long
    arMyArray(0) = 5
 
End Sub

HTH

[hypermax]

Originally posted by harishpatel
1) How to create a function with N number of parameters?
2)When array is created , it's intitial value is set from 0 , i want to start from 5 instead of zero.

You might try to use this:

Option Explicit

Public Function Test(ByVal arg1 As Long, Optional ByVal arg2 As Long = 5) As Long
    Test = arg1 + arg2
End Function

Private Sub Form_Load()
    MsgBox Test(1)
End Sub

See more about Function Statement: Function Statement - Visual Basic for Applications Reference

You should search allways MSDN online Library before asking help.

Have fun!

[Bregalad]

if N is unknown, you could also do it like this:

Private Sub Command1_Click()
   MsgBox Test(1203, 123, 123)
End Sub
 
Private Sub Command2_Click()
   MsgBox Test(1203, 4873)
End Sub
 
Private Function Test(ParamArray Params()) As Integer
   Test = UBound(Params)
End Function