currency sign changing - in vb.net

本文介绍了一个使用VB.NET进行应用程序文化设置的例子。通过修改当前线程的文化信息,可以实现不同区域格式的显示,例如货币格式。代码展示了如何在窗体加载时设置意大利文化,并在按钮点击事件中以该文化特定的格式显示货币。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

Option Strict On

Imports System.Globalization

Imports System.Threading







Public Class Form1

    Dim c As CultureInfo



    Sub New()



        ' 此调用是 Windows 窗体设计器所必需的。

        InitializeComponent()



        ' 在 InitializeComponent() 调用之后添加任何初始化。







        'Notes : this is running on the current thread only. so means if your current system setting is US , it won't be overwritten.

        System.Threading.Thread.CurrentThread.CurrentCulture = New System.Globalization.CultureInfo("it-IT")            'zh-TW 台湾 zh-CN 大陆, zh-hk 香港 , it-IT 意大利, fr-FR

    End Sub



    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Me.TextBox1.Text = Format(900.58, "Currency")

        'Dim MyInt As Integer = 100

        'Thread.CurrentThread.CurrentUICulture = New CultureInfo("fr-FR")

        'Dim MyString As String = MyInt.ToString("C", CultureInfo.InvariantCulture)

        'MessageBox.Show(MyString)

    End Sub

End Class

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值