在combobox1的SelectedIndexChanged事件里写代码:
if e.Form.Controls("ComboBox1").value="生铁" then '如果选择 生铁
e.Form.Controls("textbox6").text="吨" '单位赋值 吨
else
e.Form.Controls("textbox6").text="立方米" '其他的 统统赋值 立方米
endif