Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,038

HOME > .NET Framework > Forum > ช่วยแก้ให้หน่อยนะค่ะ มันติดError ค่ะ มันขึ้นว่า Conversion from string "" to type 'Double' is not valid.

[.NET] ช่วยแก้ให้หน่อยนะค่ะ มันติดError ค่ะ มันขึ้นว่า Conversion from string "" to type 'Double' is not valid.

เริ่มหัวข้อใหม่

krong

โพสกระทู้ ( 40 )
บทความ ( 0 )

มันขึ้นว่า Conversion from string "" to type 'Double' is not valid.

นี่ตัวอย่างโค้ด :
Private Sub CalculateTotal()
Dim Total As Double = 0
Dim Dc As Single = 0.0
Total = CDbl(lblPrice.Text) * CInt(txtAmount.Text)
'lbltotal.Text = Total.ToString("#,##0")
Dc = CSng(Total * CDbl(txtDec.Text) / 100) *มันติดตรงนี้อ่ะค่ะ*
Total = Total - Dc
lbltotal.Text = Total.ToString("#,##0")
End Sub

ช่วยแก้ให้หน่อยนะค่ะ ขอบคุณค่ะ

Tag : - - - -

Date : 2010-03-05 16:04:18

By : pakakrong

View : 1709

Reply : 5

No. 1

So(v)oOo

โพสกระทู้ ( 137 )
บทความ ( 0 )

Dim Total As Double = 0
Dim Dc As Single = 0.0
Total = CDbl(Val(lblprice.Text)) * CInt(Val(txtamount.Text))
'lbltotal.Text = Total.ToString("#,##0")
Dc = CSng(Total * CDbl(Val(txtdec.Text)) / 100) '//*มันติดตรงนี้อ่ะค่ะ*
Total = Total - Dc
lbltotal.Text = Total.ToString("#,##0")

ลองดูนะค่ะ

Date : 2010-03-05 16:16:16

By : somooo

No. 2

NJnignt

โพสกระทู้ ( 108 )
บทความ ( 0 )

ก่อนคำนวณ ต้องเช็คว่า text box เป็นค่าว่าง หรือเปล่าคะ
ค่าว่างแปลงเป็น int หรือ Dbl หรือ Sng ไม่ได้ค่ะ

Code (VB.NET)

Private Sub CalculateTotal()
Dim Total As Double = 0
Dim Dc As Single = 0.0
if txtAmount.Text<>"" and txtDec.Text<>"" then 'หรืออาจจะตรวจสอบถ้าเป็นค่าว่างให้ =0 ก็ได้ค่ะ
Total = CDbl(lblPrice.Text) * CInt(txtAmount.Text)
'lbltotal.Text = Total.ToString("#,##0")
Dc = CSng(Total * CDbl(txtDec.Text) / 100) '*มันติดตรงนี้อ่ะค่ะ*  บางที txtDec.Text อาจเป็นค่าว่างค่ะ 
Total = Total - Dc
lbltotal.Text = Total.ToString("#,##0")
end if
End Sub

Date : 2010-03-05 16:42:32

By : njnight

No. 3

krong

โพสกระทู้ ( 40 )
บทความ ( 0 )

รันได้แล้วค่ะ
ขอบคุณมากเลยนะค่ะ

Date : 2010-03-05 16:56:13

By : pakakrong

No. 4

NJnignt

โพสกระทู้ ( 108 )
บทความ ( 0 )

แต่ว่าแนะนำตามที่คุณ somooo ง่ายกว่านะคะ
อันนี้แนะนำเป็นอีกทางเลือก

Date : 2010-03-05 16:56:25

By : njnight

No. 5

krong

โพสกระทู้ ( 40 )
บทความ ( 0 )

มันไม่สามารถคิดส่วนลดได้ค่ะ
คือพอเราใส่ส่วนลดทีหลังมันไม่ยอมคิดให้ ต้องใส่ส่วนลดก่อนที่จะใส่ชื่อสินค้าอ่ะมันถึงจะคิดให้
ช่วยแก้ให้หน่อยนะค่ะ ขอบคุณค่ะ

นี่โค้ด
Private Sub CalculatePaid()
Dim i As Integer = 0
Dim tmpPaidTotal As Double = 0
Dim tmpNetTotal As Double = 0
Dim tmpDc As Single = 0.0
For i = 0 To lsvProductList.Items.Count - 1
tmpPaidTotal += CDbl(lsvProductList.Items(i).SubItems(5).Text.Trim())
Next
lblPaid.Text = tmpPaidTotal.ToString("#,##0")

tmpDc = CSng(tmpPaidTotal * CDbl(Val(txtDc.Text)) / 100)
tmpNetTotal = tmpPaidTotal - tmpDc
lblNet.Text = tmpNetTotal.ToString("#,##0")

End Sub

Date : 2010-03-06 16:47:14

By : pakakrong

ค้นหาข้อมูล

แสดงความคิดเห็น

Re : ช่วยแก้ให้หน่อยนะค่ะ มันติดError ค่ะ มันขึ้นว่า Conversion from string "" to type 'Double' is not valid.

รายละเอียด

เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง

โดย

อีเมล์

บวกค่าให้ถูก

<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)

Registered : 109,038

document.write("<font color=996600>[.NET]</font>"); [.NET] ช่วยแก้ให้หน่อยนะค่ะ มันติดError ค่ะ มันขึ้นว่า Conversion from string "" to type 'Double' is not valid.

No. 1

No. 2

No. 3

No. 4

No. 5

ค้นหาข้อมูล

อัพโหลดแทรกรูปภาพ

Notice

[.NET] ช่วยแก้ให้หน่อยนะค่ะ มันติดError ค่ะ มันขึ้นว่า Conversion from string "" to type 'Double' is not valid.