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是我的自定义。。。这样做可以么？

请大家帮帮忙啊。。。

是吗  我去试~~~谢谢