VB.net通過輸入一個實數(shù)，單擊計算按鈕，輸出該數(shù)的平方，立方

拖三個textbox，一個button

創(chuàng)新互聯(lián)是專業(yè)的陽明網站建設公司，陽明接單;提供網站制作、成都做網站,網頁設計,網站設計,建網站,PHP網站建設等專業(yè)做網站服務;采用PHP框架,可快速的進行陽明網站開發(fā)網頁制作和功能擴展;專業(yè)做搜索引擎喜愛的網站,專業(yè)的做網站團隊,希望更多企業(yè)前來合作!

在窗體上雙擊button1，在自動生成的button1的Click事件中：

textbox2.text=val(textbox1.text)^2

textbox3.text=val(textbox1.text)^3

vb.net求雙平方數(shù)字的的方法

Public?Function?panduan(ByVal?n?As?Integer)?As?Boolean

Dim?res?As?Boolean?=?False

Dim?a,?b,?c,?d,?temp1,?temp2?As?Integer

a?=?n?\?1000

b?=?(n?\?100)?Mod?10

c?=?(n?\?10)?Mod?10

d?=?n?Mod?10

temp1?=?Sqrt(n)

temp2?=?Sqrt(a?+?b?+?c?+?d)

If?temp1?*?temp1?=?n?And?temp2?*?temp2?=?(a?+?b?+?c?+?d)?Then

res?=?True

End?If

Return?res

End?Function

Private?Sub?Button7_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button7.Click

Dim?str?As?String?=?"",?temp?As?Integer?=?0,?sum?As?Integer?=?0,?x?As?Integer

For?i?=?1000?To?9999?Step?1

If?panduan(i)?Then

temp?=?i

Exit?For

End?If

Next

TextBox6.Text?=?temp

End?Sub

VB.net的開方運算

VB的運算順序是：先乘除、后加減，有括號的先算括號內，有負號的先算負號。

請你比較一下這個運算中x和y的值：

Dim n As Single = 4

Dim x As Single

Dim y As Single

x = n + 1

x = x / n

x = x - 1

x = Math.Sqrt(x)

y = Math.Sqrt((n + 1) / n - 1)

這樣就會發(fā)現(xiàn)，你的代碼中括號的位置錯了。

正確的應該是： Math.Sqrt((n + 1) / n - 1)

文章標題：vb.net開平方 vb平方代碼
網頁鏈接：http://chinadenli.net/article12/dogdegc.html

成都網站建設公司_創(chuàng)新互聯(lián)，為您提供服務器托管、營銷型網站建設、動態(tài)網站、App設計、網站維護、商城網站

廣告

聲明：本網站發(fā)布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創(chuàng)新互聯(lián)