Solved

Sub problem

Posted on 1998-10-07
9
171 Views
Last Modified: 2010-04-30
I do something in a Sub for a String array
Sub (S() As String)
   S(0)=...
   ...
End Sub
I need to do the very similar thing for an Integer array as well. How can I use the same array with a littel bit changing?
0
Comment
Question by:victorlong
9 Comments
 
LVL 1

Expert Comment

by:blwatkins
ID: 1438633
if you are saying that you are trying to pass two arrays in and out, such as: "Sub (S() as string, I() as integer)", then change the sub to a function instead of a sub..
0
 

Author Comment

by:victorlong
ID: 1438634
No, I want pass only one array each time.
My question realy is how to make the following two Subs into one Sub.
Sub (S() As String)
       S(0)=...
       ...
End Sub
Sub (I() As Integer)
       I(0)=...
       ...
End Sub
 
0
 

Author Comment

by:victorlong
ID: 1438635
To  blwatkins:

Sorry. I found something wrong in my question, I should say
"How to use the same Sub with a littel bit changing to deal with another array with different declearation"?

You are wellcome to re-answer my question, or ask me to explain more clearly.
0
Live: Real-Time Solutions, Start Here

Receive instant 1:1 support from technology experts, using our real-time conversation and whiteboard interface. Your first 5 minutes are always free.

 
LVL 12

Expert Comment

by:mark2150
ID: 1438636
Sub( I() as variant )

0
 

Author Comment

by:victorlong
ID: 1438637
To mark2150:

Thank you, I will try. However, do you think variant need much more memory or much slow?
0
 

Author Comment

by:victorlong
ID: 1438638
I have tried

dim I() As Integer, S() As String
Test I()
Test S()
Sub Test( I() as variant )
..
End Sub

and got error!

0
 
LVL 15

Expert Comment

by:Eyal
ID: 1438639
can you send the code you are writen so far?
0
 
LVL 6

Expert Comment

by:andyclap
ID: 1438640
don't forget to declare them byval, so that vb can convert them to variants...

sub Test(byval v() as variant)

Variants are fairly slow compared to ints. We could get into a wonderful discussion on polymorphism here, but I'm about to go home!
0
 
LVL 13

Accepted Solution

by:
Mirkwood earned 40 total points
ID: 1438641
Just declare it like
private Sub MySub(S as variant)

0

Featured Post

Live: Real-Time Solutions, Start Here

Receive instant 1:1 support from technology experts, using our real-time conversation and whiteboard interface. Your first 5 minutes are always free.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Introduction I needed to skip over some file processing within a For...Next loop in some old production code and wished that VB (classic) had a statement that would drop down to the end of the current iteration, bypassing the statements that were c…
If you have ever used Microsoft Word then you know that it has a good spell checker and it may have occurred to you that the ability to check spelling might be a nice piece of functionality to add to certain applications of yours. Well the code that…
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…

776 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question