Hello,


I am using Visual Basic pro ver 6.0. Please see attached the project file
I defined in module1 a type variables as:

Type blox
name As String
ind As Integer
Lx As Double
Ly As Double
Lz As Double
x0 As Double
y0 As Double
z0 As Double
material As String
assigninside As Boolean
xcolor As String
transparency As Double
End Type

In the same module, I define:

Global blocks() As blox

Then, in the main Form1 I have

n=10

Redim blocks(n)

and then

for i=1 to n

call fun(blocks(i))

next i
When it gets to the line
"Call Create_Box_and_Assign_Material(pfln, blocks(indi))"
I get the following error message

"only user-defined types in public object modules can be coerced to or from a variant or passed to late bound functions"

any ideas on how to fix this?

Thank you

Try this:The Global keyword was deprecated with, I believe, VB5, and is only included for backwards compatibility in later versions. Public should be used with VB6.