从品牌网站建设到网络营销策划,从策略到执行的一站式服务
a = InputBox("请输入一个数:", "提示")
创新互联主要为客户提供服务项目涵盖了网页视觉设计、VI标志设计、全网营销推广、网站程序开发、HTML5响应式重庆网站建设公司、移动网站建设、微商城、网站托管及成都网站维护、WEB系统开发、域名注册、国内外服务器租用、视频、平面设计、SEO优化排名。设计、前端、后端三个建站步骤的完善服务体系。一人跟踪测试的建站服务标准。已经为混凝土搅拌机行业客户提供了网站推广服务。
If IsNumeric(a) Then
MsgBox a "的绝对值 = " Abs(Val(a))
End If
楼主,还得再设置一个文本框来显示绝对值吧,假设为text2,图中那两个分别为text1,command1
代码:
private
command1.click()
text2=abs(val(text1))
end
代码就中间一行就行了,abs在vb里边就是取绝对值的意思~~~val()是指将()里边的数字字符串转成数值格式~~
问题不清楚,你是要求一个数的绝对值还是是“|”这个符号?
如果是求绝对值,比如x=-30,则y=abs(x),那么y就等于30。
如果是输入“|”这个符号?那么就是 tempstr=“|”。
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图