代碼:a=Convert.toDouble(textbox1.Text)*6/100,先轉(zhuǎn)換字符串格式為雙精度型,再和數(shù)字相乘獲得結(jié)果,但結(jié)果是雙精度型,你若要顯示出來必須轉(zhuǎn)換成字符串,比如textbox2.Text=a.toString(),希望對你有幫助
創(chuàng)新互聯(lián)建站主要為客戶提供服務(wù)項目涵蓋了網(wǎng)頁視覺設(shè)計、VI標(biāo)志設(shè)計、全網(wǎng)營銷推廣、網(wǎng)站程序開發(fā)、HTML5響應(yīng)式重慶網(wǎng)站建設(shè)公司、成都做手機網(wǎng)站、微商城、網(wǎng)站托管及成都網(wǎng)站維護、WEB系統(tǒng)開發(fā)、域名注冊、國內(nèi)外服務(wù)器租用、視頻、平面設(shè)計、SEO優(yōu)化排名。設(shè)計、前端、后端三個建站步驟的完善服務(wù)體系。一人跟蹤測試的建站服務(wù)標(biāo)準。已經(jīng)為成都玻璃隔斷行業(yè)客戶提供了網(wǎng)站開發(fā)服務(wù)。
如控件自身無法設(shè)置滾動條,那就在父容器控件中(如FORM)使用滾動條解決問題。另外,也可將日期控件放在彈出窗口中,
點回餅圖以后 設(shè)置如下:
chart.Series.LegendText="#PERCENT{P1}"; //C# 設(shè)置圖例,如果想設(shè)置其他則修改相對應(yīng)的對象
VB語法不熟。。。希望能幫到你
一句話就搞定了??!如下
Private Sub Command1_Click()
Text1.text = Format(Text1.Text, "0.00%")
'注意哦,text1.text中輸入內(nèi)容并沒有作限制也沒有判斷的,可以自行判斷。
End Sub
Private Sub Command1_Click()
Dim a, b, c, d, e, f
a = "0.1322548"
b = Len(a)
f = b - InStr(a, ".") + 1
If f = 4 Then
c = b - 3
d = Left(a, c)
e = d * 100 "%"
Else
e = a * 100 "%"
End If
Print a " 轉(zhuǎn)化為百分數(shù)是: " e
End Sub
或者也可以
a = "0.1322548"
b = Format(a, "0.00%")
后一種會四舍五入,前一種不會。
Private?Sub?Command1_Click()
Text2.Text?=?Val(Text2.Text)?/?Val(Text1.Text)?*?100??"%"
End?Sub