vb中的小问题，关于字符串的，高手来

[wang_hengheng]

就是在用鼠标选择combobox的下拉列表中选项“男”或“女”的时候，怎么样可以把“SWKAnthroSexMale”或“SWKAnthroSexFemale”替换下面这段代码

“Set sWKManikin1 = sWKHmiWorkbench1.CreateManikin("Manikin1", 性别, 50#, 4)”

中的“性别”？
最好说详细点，谢谢了

[licuixiu]

看看。

[yimins]

到处重复发帖，还没将问题说清楚，唉～～幸好我先看了上一贴才进来的。

[孤独剑_LPZ]

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

[孤独剑_LPZ]

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

[东方之珠]

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

[king06]

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

[Jelly_tracy]

你的帖子招来这么多星星，厉害

[lovessll]

[Quote=引用 2 楼 asftrhgjhkjlkttttttt 的回复:]
看了上一帖后,才明白点意思
if combo1.text="男" then
SWKAnthroSexMale= SexMale
else
SWKAnthroSexMale= SexFemale
end if
Set sWKManikin1 = sWKHmiWorkbench1.CreateManikin("Manikin1", SWKAnthroSexMale, 50#, 4)……
[/Quote]
这个应该可以实现楼主的想法

[嗷嗷叫的老马]

.........路过