Private Declare Function send Lib "Winsock.dll" (ByVal s As Integer, buf As Any, ByVal buflen As Integer, ByVal flags As Integer) As Integer

type usk
a as string
b as string
c as string
end type
dim ad as usk
ad.a ="hellow"
ad.b = "sub"
ad.c = "on"
private sub command1_click()
st=send (sock,byval ad,len(ad),0)
end sub


那个ＢＹＶＡＬ后是ＡＮＹ的类型，，而ad是我的自定义。。。这样做可以么？

请大家帮帮忙啊。。。

感覺是可行的, 沒試過字串的, 不過下面的是可行的,

GetWindowRect ( ByVal hWnd as long, lprect As Any) As long

Dim arect[10];
GetWindowRect me.hwnd, arect[0]
-----------------------------------------------------
原因是成員或元素地址是連續的吧.
.
沒有試過字串的, 有時間去試下~~

any是万能类型,应该可以的.
你要想传递什么值的话,也可以将any改为某个类型

不簡單的是傳遞的問題, 是函式能不能接收, 如果一個函式需要的是一些數位, 你仍然可以用 Any 傳遞一個 string, 但結果就不可預料

是吗  我去试~~~谢谢