Warning: file_get_contents(/data/phpspider/zhask/data//catemap/2/facebook/9.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vb.net 保持逗号顺序_Vb.net - Fatal编程技术网

Vb.net 保持逗号顺序

Vb.net 保持逗号顺序,vb.net,Vb.net,我试图让值保持逗号顺序,如123456789减去值。以下是当前代码: Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim health As Integer health = lblHPPlayer.Text lblHPPlayer.Text = Val(health) - 1000 End Sub 这就是我想要改变的价值* lblhplaye

我试图让值保持逗号顺序,如123456789减去值。以下是当前代码:

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim health As Integer
    health = lblHPPlayer.Text
    lblHPPlayer.Text = Val(health) - 1000
End Sub
这就是我想要改变的价值*


lblhplayer.Text=“9850000”

使用数字格式说明符

lblHPPlayer.Text = (Val(health) - 1000).toString("N0")

创建名为
运行状况
的表单级属性。你可以保密。现在,只要您需要更新
Heath
,也可以更新
lblhplayer
中的文本。这样,您就不需要解析文本——它只会向您显示适当整数属性的值

大概是这样的:

Private _health As Integer

Public Property Health() As Integer
    Get
        Return _health
    End Get
    Set(ByVal value As Integer)
        _health = value
        lblHPPlayer.Text = _health.ToString("N0")
    End Set
End Property

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Me.Health -= 1000
End Sub

创建名为
运行状况
的表单级属性。你可以保密。现在,只要您需要更新
Heath
,也可以更新
lblhplayer
中的文本。这样你就不需要解析文本-它只会显示一个适当整数属性的值。好吧,我是VB新手,我正在做最后一个项目,所以你能解释一下这意味着什么吗?我已经发布了一个显示代码的答案。谢谢。那么.tostring(“否”)是什么呢?我以为是一个巨魔这么说的。
.ToString(“N0”)
将整数转换成带逗号的字符串。这也是答案。