人才评测

<t></t>

人才评测
．变革意识测试	．测试你的成功倾向	．处理公务关系水平测试
．个人创造能力自测	．个人能力自测	．个人倾向测试表
．工作压力测试	．沟通能力测试	．记忆能力测试
．举止规范程度测试	．你处理公务水平如何	．你处理问题的能力测试
．你的成功指数有多少	．你的工作是否称职	．你的适应能力强吗
．你对目前工作满意吗	．你关心他人吗	．你能抵制诱惑吗
．你能正确评估下属的工作吗	．你善于调动部下积极性吗	．你善于化解与上司的冲突吗
．你善于交际吗	．你善于与人交流吗	．你是否乐于从事与人打交道的工作
．你是否有良好的记忆力	．你是否自卑	．你是个求安稳的人吗
．你是个有领导能力的人吗	．你是理性投资者吗	．你是胸怀大志的人吗
．你适合干什么工作	．你适合做创造性工作还是研究性工作	．你有可能获得升迁吗
．情商（EQ）测试	．情绪稳定性测试	．心理年龄自测
．自信心测试	．EQ自测	．测测你的沟通能力
．从鞋底的耗损测试个性	．公关能力测试	．精神状态测试
．你处理问题的能力强吗	．你的工作情商是多少	．你的人缘如何
．你了解自己的职业兴趣吗	．你能当老板吗	．你是否感情用事
．你是受欢迎的人吗	．你适合干什么工作	．你有变革意识吗
．你有什么吸引力	．你与同事相处得如何	．情绪类型测试
．人际关系的测试	．是否有知心朋友测试	．心理抗压能力测试
．性格类型测试	．自信心测试

<!-- Sub window_onLoad ' The DirectAnimation library. Set m = DAControl.MeterLibrary numGeos = 15 Set speed = m.Div(m.LocalTime, m.DANumber(2.5)) ' Define transformation variables. Set offX = m.Mul(m.DANumber(.04),m.Sin(speed)) Set offY = m.Mul(m.DANumber(.04),m.Sin(speed)) Set rotX = m.Mul(speed, m.DANumber(2)) Set rotY = m.Mul(speed, m.DANumber(2)) Set rotZ = m.Mul(speed, m.DANumber(2)) Set lrotX = m.Mul(m.DANumber(.02),speed) Set lrotY = m.Mul(m.DANumber(.02),speed) Set lrotZ = m.Mul(m.DANumber(.02),speed) Set scale = m.DANumber(1) ' Create an animated color. Set half = m.DANumber(0.5) Set hue = m.Abs(m.Sin(m.Div(speed,m.DANumber(2)))) Set clr = m.colorHslAnim(hue, half, half) Set xfID = m.IdentityTransform2 Set xfsc = m.Scale2UniformAnim(scale) ' Use the above created variables to construct three dimensional rotations. ' Then use the ParallelTransform2 method to cast an orthographic projection ' of these rotations onto the X-Y plane. Set xflr = m.Compose3(m.Compose3(m.Rotate3Anim(m.xVector3,lrotX), _ m.Rotate3Anim(m.yVector3,lrotY) ), m.Rotate3Anim(m.zVector3,lrotZ) ).ParallelTransform2() Set xfwt = m.Compose3(m.Compose3(m.Rotate3Anim(m.xVector3,rotX), _ m.Rotate3Anim(m.yVector3,rotY) ), m.Rotate3Anim(m.zVector3,rotZ) ).ParallelTransform2() ' Create an two dimensional translation. Set xflt = m.Translate2Anim(offX, offY) ' Combine the translation with the rotations. Set xf = m.Compose2(xfwt, m.Compose2(xflt, m.Compose2( xflr, xfsc ) ) ) ' Create a rectangle with animated color. Set rect = m.Rect(.015,.015) Set recImg = m.SolidColorImage(clr).Clip(m.FillMatte(rect)) ' Create each of the five squares (numGeos), wait xfID.Duration(i*.3) ' and then apply final transformation (xf) to each of them. Set finalImg = m.EmptyImage For i = 0 To numGeos Set delay = xfID.Duration(i*.3) Set newImg = recImg.Transform(m.Sequence(delay,xf)) Set finalImg = m.Overlay(newImg,finalImg) Next ' Set the image into the control DAControl.Image = finalImg ' Set the background in case of a non-windowless browser (like IE3). DAControl.BackgroundImage = m.SolidColorImage(m.Blue) ' Start the animation. DAControl.Start() End Sub -->