اتصال به فیلدی از نوع Money

سابقا در دلفی، اگه به فیلدی از نوع Money وصل میشدی، داخل TextBox عبارت ریال رو مینوشت
الان در VB.NET ، چنین عبارتی رو نمی نویسه ... در ضمن بعد از افزودن رکورد ، سه تا صفر اضافی هم جلوش میندازه !!

        txtName.DataBindings.Add("text", pDataSet, "Product.ProductName")

        txtPrice.DataBindings.Add("text", pDataSet, "Product.ProductPrice")

        txtQty.DataBindings.Add("text", pDataSet, "Product.ProductQty")

               Dim dr As DataRow = pDataSet.Tables(0).NewRow

                dr("ProductName") = txtName.Text

                dr("ProductPrice") = (txtPrice.Text)

                dr("ProductQty") = (txtQty.Text)

                pDataSet.Tables(0).Rows.Add(dr)