字符串乘积的实现
vb text1.text=数值 combo1.text= 数值 text2.text= text1.text 与 combo1.text 数值的乘积
If Text2.Text <> "" Then Data1.Recordset.Fields("宿费") = ? ?为 $ + text2.text的数值


text1.text 与 combo1.text 数值的乘积　　代码怎么实现
?为 $ + text2.text的数值　代码怎么实现
　




[解决办法]

if trim(text1.text)="" then exit sub
if trim(combo1.text)="" then exit sub



if trim(text2.text)="" then
text2=cstr( cdbl(text1.text) *cdbl(combo1.text))
Data1.Recordset.Fields("宿费") = cstr($)+ cstr( text2.text)
end if