vb.net用法問(wèn)題

0表示 value

網(wǎng)站建設(shè)哪家好，找創(chuàng)新互聯(lián)！專(zhuān)注于網(wǎng)頁(yè)設(shè)計(jì)、網(wǎng)站建設(shè)、微信開(kāi)發(fā)、小程序開(kāi)發(fā)、集團(tuán)企業(yè)網(wǎng)站建設(shè)等服務(wù)項(xiàng)目。為回饋新老客戶(hù)創(chuàng)新互聯(lián)還提供了宣化免費(fèi)建站歡迎大家使用！

1表示power

2表示clng(math.pow(value,power))

012即表示writeline后續(xù)這三個(gè)參數(shù)的索引。

：n表示將索引2以千位分隔符表示，后面的0表示保留0位小數(shù)。

{2：x}將索引2轉(zhuǎn)換為十六進(jìn)制。

VB 中如何將數(shù)值（或是一位數(shù)，或是兩位數(shù)）轉(zhuǎn)換成字符型并在之前補(bǔ)0至千位

Private Sub Command1_Click()

Dim a As Integer

a = Text1.Text

s = Str(a)

s = Format(s, "0###")

Print s

End Sub

也可以直接用Format(s, "0###") 就行，因?yàn)镕ORMAT就是把任何數(shù)據(jù)類(lèi)型格式化成字符型的

我在用VB.net做一個(gè)計(jì)算程序，遇到一個(gè)問(wèn)題。一個(gè)數(shù)15563，需要取出萬(wàn)位和千位（1500）

dim a as integer

a=15563

萬(wàn)位=a\10000

千位=a\1000 mod 10

百位=a\100 mod 10

if a mod 105 then 百位+=1

在vb中，如何將在text文本框中輸入的數(shù)據(jù)自動(dòng)顯示為千位分隔符。。

兩種方法，第一種是在屬性對(duì)話(huà)框中選擇FONT，雙擊它進(jìn)行設(shè)置。

第二種方法就是在代碼里面設(shè)置，用FORMATE函數(shù)。

VB怎樣讓文本框輸入多位數(shù)字后顯示千位分離符

其實(shí)實(shí)質(zhì)就是從個(gè)位開(kāi)始，每隔3位加一個(gè)符號(hào)“，”，直至最高位。Dim a As String, n As Long '定義變量方便書(shū)寫(xiě)

Private Sub Command1_Click()

a = Text1.Text

n = Len(a) '確認(rèn)位數(shù)

If n = 4 Then '確認(rèn)有無(wú)增添分隔符號(hào)的必要

Text1.Text = ""

Do

Text1.Text = Mid$(a, n - 2, 3) "," Text1.Text '以每3個(gè)數(shù)為一份，增添逗號(hào)并重組

n = n - 3

Loop Until n = 3

If n 0 Then Text1.Text = Mid$(a, 1, n) "," Text1.Text

Text1.Text = Mid$(Text1.Text, 1, Len(Text1.Text) - 1) '去除第一次額外增添的逗號(hào)End If

End Sub

在vb中怎樣將文本框中的數(shù)字格式化成千分位？怎樣格式化成數(shù)字格式？

Standard 標(biāo)準(zhǔn)，即帶千位分隔號(hào)和兩位小數(shù)

format$("100123","Standard") '返回值 100,123.00

例如：

Dim a As Integer

a = 12345

Label1.Caption = a '一般格式

Label2.Caption = Format(a, "Standard") '帶千分位和兩位小數(shù)