就是在用鼠标选择combobox的下拉列表中选项“男”或“女”的时候,怎么样可以把“SWKAnthroSexMale”或“SWKAnthroSexFemale”替换下面这段代码   “Set sWKManikin1 = sWKHmiWorkbench1.CreateManikin("Manikin1", 性别, 50#, 4)” 中的“性别”?
最好说详细点,谢谢了

解决方案 »

  1.   

    不知道你说的是什么,猜意思吧
    Set sWKManikin1 = sWKHmiWorkbench1.CreateManikin("Manikin1", combo1.text, 50#, 4)
      

  2.   

    看了上一帖后,才明白点意思
    if combo1.text="男" then
       SWKAnthroSexMale= SexMale
    else
       SWKAnthroSexMale= SexFemale
    end if
    Set sWKManikin1 = sWKHmiWorkbench1.CreateManikin("Manikin1", SWKAnthroSexMale, 50#, 4)
      

  3.   

    Set sWKManikin1 = sWKHmiWorkbench1.CreateManikin("Manikin1", iif(Combo1.Text="男","SWKAnthroSexMale","SWKAnthroSexFemale"), 50#, 4)”
      

  4.   


       Set sWKManikin1 = sWKHmiWorkbench1.CreateManikin("Manikin1", IIf(Combo1.Text = "男", "male", "female"), 50#, 4)