مقدار ارزش افزوده

[djhooman]

سلام

همونطور که میدونید طبق قانون مالیات بر ارزش افزوده ، هر سال 1 درصد به نرخ مالیات بر ارزش افزوده ، اضافه می شود .
سال 89 = 3%
سال 90 = 4%
سال 91 = 5%
و .......
من توی برنامم مجبور شدم تو دیتابیسم یع قسمت بذارم توش درصد مالیات ارزش افزوده وارد بشه ...

یعنی یه فرم دارم ، فیلد ارزش افزوده رو از دیتاست کشیدم و وارد فرم کردم .
حالا میخوام مقدار ارزش افزوده ای که تو فرم هام اتوماتیک محاسبه میشه ، با توجه به آخرین تغییر روی فیلد ارزش افزودم مححاسبه بشه ...
یعنی اگه یه رکورد با مبلغ 1000 ریال وارد شد الان که 4 % هستش ارزش افزودش رو 1040 ریال محاسبه کنه و اگر مقدار ارزش افزوده رو به مثلا 5% تغییر دادیم مبلغ به 1050 تغییر کنه ...

من این کد و استفاده کردم اما نشد ...


Dim tanzimateasli As New TanzimateAsli
Me.ArzeshAfzoodeLabel1.Text = (Me.MablaghTextBox.Text) * (tanzimateasli.ArzeshAfzoodeTextBox.Text) / 100

اررور زیر رو میده : Conversion from string "" to type 'Double' is not valid

در ضمن ، DataType ام از جنس nVarchar هستش ...

از کد زیر هم استفاده کردم و دوباره اررور بالا رو داد ...




Me.ArzeshAfzodeLabel1.Text = CType(Val(Me.MablaghTextbox.Text) * (Me.tanzimateasli.arzeshafzoodetextbox.text), Integer)

[hadi.khosrawzade]

سلام داداش قسمت اول می شود:



Dim tanzimateasli As New TanzimateAsli
Me.ArzeshAfzoodeLabel1.Text = (Me.MablaghTextBox.Text / 100) * (tanzimateasli.ArzeshAfzoodeTextBox.Text) + (Me.MablaghTextBox.Text)

[hadi.khosrawzade]

در مورد ارور :


Dim tanzimateasli As New TanzimateAsli
Me.ArzeshAfzoodeLabel1.Text = ((Me.MablaghTextBox.Text / 100) * (tanzimateasli.ArzeshAfzoodeTextBox.Text) + (Me.MablaghTextBox.Text)).ToString



باید تبدیل شه به String نه به Integer
اگه بازم مشکل داشت من در خدمتم.

[djhooman]

باز هم اررو Conversion from string "" to type 'Double' is not valid و میده ××!!! :گریه::گریه::گریه:

دیتاتیپ دیتابیس ام هز نوع nVarchar هستش ...
در حین انجام عملیات هم تبدیلی انجام ندادیم که بخواد به جنس تکست باکسامون گیر بده

مشکل از چیه ؟

[djhooman]

پیشنهاد شما چیست برای حل این مشکل ؟؟؟؟؟

[klinton]

Dim tanzimateasli As New TanzimateAsli
Me.ArzeshAfzoodeLabel1.Text = val(val(Me.MablaghTextBox.Text / 100) * val(tanzimateasli.ArzeshAfzoodeTextBox.Text)) + val(Me.MablaghTextBox.Text))

[djhooman]

باز هم همون اررو و میده ....

فیلد مربوط به Mablagh و ArzeshAfzoode ، هر دو از جنس String هستن !!!!

چرا این اررو و میده ؟

Conversion from string "" to type 'Double' is not valid

[فرید نجفلو]

باز هم همون اررو و میده ....

فیلد مربوط به Mablagh و ArzeshAfzoode ، هر دو از جنس String هستن !!!!

چرا این اررو و میده ؟

Conversion from string "" to type 'Double' is not valid

عزیز من چرا بحث عجیب غریب می کنید!
این خطا ربطی به فرمول نداره!
مشکل شما اینه که Text یکی(یا بیشتر) از کنترل های شما خالیه!
دیباگ کنید ببنید تو خط کدوم تکست خالی نشون می ده