緊急VB顯示純小數點時不顯示零，如何解決？ 10

我知道您的問題未輸入到文字控制項中".123213"，如何顯示為""

建議設定乙個雙精度變數，先給雙精度變數值，然後再格式化變數。

下面是乙個示例：（表單中有 cmdcommand1 和 txttext1 控制項） private sub cmdcommand1 click（）dim d as double

d = val(

msgbox format(d, "###########end sub

通過測試（vb6+sp6），您可以滿足您的要求。 當然，這個例子並不完美，如果小數位數多於位數，就會四捨五入。

因為你已經把它轉換成乙個字串。

這與VB的轉換機制有關。

正數和負數都去掉小數點前的零。

我沒辦法，所以讓我們在轉換後自己新增它。

dim i as single

dim istr as string

if i > 0 and i < 1 thenistr = format(i, ""0 位數是小數位數。

print istr

elseistr = cstr(i)

print istr

end if

只需以類似的方式進行操作即可。

例如：x1 = h + sqr（z）） 2 * g）x2 = h - sqr（z）） 2 * g）= x1=" x1

x2=" x2

可以改為： x1 = h + sqr（z）） 2 * g）x2 = h - sqr（z）） 2 * g）if x1>0 和 x1<1 則= x1=" format(x1,"")

x1=" x1

end if

if x2>0 and x2<1 then= x2=" format(x2,"")

x2=" x2

end if

您還可以使用 format（x1，"0.####"），刪除最後乙個 0。

方法都是相似的。

沒關係，這是由 Windows 的設定引起的。 擁有任何資訊都是沒有用的。

開始 - 控制面板 - 區域和語言選項。

自定義 - 零開始顯示手柄7 改成剛剛好。

有兩種方法可以製作顯示器。

一：挖吶喊，判斷賣百搭格式（）。 具體用途：

r=print format(r,"0.二：調暗a、b、c為longc=a*b

if a * b < 0 then

c = 仿製 0" &a * b

end if

你是對的。。。

這是VB的潛規則。 氏族虛空。

你可以用這個缺失的答案方法來嘗試 y=format（a Fu Sui Hui B，"")

1）使用格式函式格式顯示小數。

format 函式，它返回乙個變體 （String），其中包含乙個表示式，該表示式根據格式表示式中的說明進行格式化。

private sub form_click()format(4 / 10, "")

format(1 / 7, "0.######")end sub

2）開始選單 - 控制面板 - 時間，語言和地區 - 更改日期，時間或數字格式 - 其他設定 - 零開始顯示 - 選擇。

你要他展示還是不展示？

顯示：列印格式（1 3，""） 或列印格式（1 3，"0.####

不顯示：列印格式（1 3，".0000"） 或列印 round（1， 3,4）。

不得顯示，應使用 format 命令。

在"控制面板"下"時鐘、語言和地區"之"地區和語言"選擇"時間或數字格式"中等調整。

或更改：

private sub command1_click()print format(, "0.#######text1 = format(, "0.#######end sub

VB在顯示純小數位時預設不顯示小數點前0，如果必須在小數點前顯示0，請使用VB的格式化功能：A

format(a,"")

然後文字框將顯示：