查看会员资料
用 户 名：gon***
发送消息- Email：用户隐藏
- Icq/MSN：
- 电话号码：
- Homepage：
- 会员简介：
最新会员发布资源
ActiveXP_Alpha_v0.1
- XP样式的菜单控件非常方便 Friend Sub Store(ByRef tMI() As tMenuItem, ByVal iMenuCount As Long) Dim iItem As Long m_iMenuCount = iMenuCount If (m_iMenuCount > 0) Then ReDim m_tMI(1 To m_iMenuCount) As tMenuItem For iItem = 1 To m_iMenuCount