当前位置:编程学习 > VB >>

VB 代码请教

Val(Text1) * Val(Text2) * 0.00018  我想将Txte1的数和Txte2的数乘起来 再乘0.00018 希望最后得到进整数 算出来不管是83.0001- 83.9999 最后结果都是进整数84  应该怎么编辑最后的进整数VB代码 VB高手请加 925660952 学习

答案:

点击计算按钮,第四个文本框中显示你要的进位数

private sub 计算_click()

   text4.text=int(val(text1.text)*val(text2.text)* 0.00018)+1   '化成不大于原来数的整数后再加1

end sub

上一个:vb如何截取另一个程序的内容??
下一个:VB按键触发

CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,