怎么用VB做求絕對值

樓主，還得再設置一個文本框來顯示絕對值吧，假設為text2，圖中那兩個分別為text1，command1

創(chuàng)新互聯(lián)專注為客戶提供全方位的互聯(lián)網(wǎng)綜合服務，包含不限于成都做網(wǎng)站、網(wǎng)站建設、雁江網(wǎng)絡推廣、成都微信小程序、雁江網(wǎng)絡營銷、雁江企業(yè)策劃、雁江品牌公關、搜索引擎seo、人物專訪、企業(yè)宣傳片、企業(yè)代運營等，從售前售中售后，我們都將竭誠為您服務，您的肯定，是我們最大的嘉獎；創(chuàng)新互聯(lián)為所有大學生創(chuàng)業(yè)者提供雁江建站搭建服務，24小時服務熱線：18980820575，官方網(wǎng)址：www.cdcxhl.com

代碼：

private

command1.click()

text2=abs(val(text1))

end

代碼就中間一行就行了，abs在vb里邊就是取絕對值的意思~~~val（）是指將（）里邊的數(shù)字字符串轉(zhuǎn)成數(shù)值格式~~

VB.NET 算術表達式求值

1）x+a Mod 3 * (Int(x+y)Mod 2)/4 =

2.5 + 7 Mod 3 *(int(2.5+4.7) Mod 2)/4

=9.5 mod 3*3/4

= 9.5 mod 2

=4

編程求一個數(shù)的絕對值。（一個數(shù)由用戶輸入）VB？

a = InputBox("請輸入一個數(shù):", "提示")

If IsNumeric(a) Then

MsgBox a "的絕對值 = " Abs(Val(a))

End If