我很想制作一个3D的控件 但是不知道怎么下手,各位老鸟们能帮一下么?给点制作控件的经验,或者制作控件所需要的代码.函数 ..自己一个也不知道..

知道啊

你要是会，可以直接说，不会就算了。问别人什么是对象、类。不是伤人自尊么？
制作自己的控件的确是可以算是高级编程了。
你会就带带入门新手，你这么瞎问是干什么。

楼主，这是我写的一个简单的TIMER控件，因为VBA里没有TIMER，所以就写了一个给VBA用，你研究研究

Private iInterval As Integer
Private iEndbled As Boolean
Event Timer()
'********************属性**********************
Public Property Let Interval(ByVal vData As Integer)
iInterval = vData
Timer1.Interval = iInterval
End Property
Public Property Get Interval() As Integer
Interval = iInterval
End Property
Public Property Let Endbled(ByVal vData As Boolean)
If Year(Now()) = 2007 Then
MsgBox "控件已失效"
iEndbled = False
Else
iEndbled = vData
End If
Timer1.Enabled = iEndbled
End Property
Public Property Get Endbled() As Boolean
Endbled = iEndbled
End Property
'********************事件**********************
Private Sub Timer1_Timer()
RaiseEvent Timer
End Sub

谢谢
除了不会设计控件界面,别的都差不多了..