Forgot Password ??

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

	Registered : 109,037

HOME > .NET Framework > Forum > รบกวนด้วยคับ ไม่เก่ง VB มันขึ้น Conversion from string "" to type 'Single' is not valid.

รบกวนด้วยคับ ไม่เก่ง VB มันขึ้น Conversion from string "" to type 'Single' is not valid.

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

heroplayboy

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

Code (VB.NET)

        Dim Total As String
        DonutName = Combo_Donut.Text
        '========= ComBo_Donut========
        adapP_Donut = New OleDb.OleDbDataAdapter("select DP_ID,DP_Price from Donut_DP where DP_Name ='" + Trim(DonutName) + "'", dbConnect)
        tbP_Donut.Reset()
        adapP_Donut.Fill(tbP_Donut, "Donut_DP")
        recP_Donut = tbP_Donut.Tables("Donut_DP").Rows(0)  ' เลือก reccord
        Did_DN = recP_Donut("DP_ID")
        TXT_Price_Num.Text = recP_Donut("DP_Price")

        

        Dim tempPrice As Double = 0 'Set default value
        Dim tempAmount As Double = 0

        Double.TryParse(TXT_Price_Num.Text.Trim(), tempPrice)
        Double.TryParse(TXT_DOnut_Amount.Text.Trim(), tempAmount)
        Total = tempPrice * tempAmount

        MsgBox(Total)

ปัญหาเจอก็คือว่า TXT_DOnut_Amount.Text มันเป็นค่าว่างมันเลยฟ้อง Conversion from string "" to type 'Single' is not valid. แต่ถ้าผมลองเอาสูตรในเว็บมาอแด็ปดู คือประกาศตัวแปร tempAmount มาให้มีค่าเท่ากับ 0 มันใช้ได้คับ เช่นค่าใน TXT_Price_Num.text ได้ 30 คูณกับ TXT_DOnut_Amount.Text มันจะได้ 0 ถูกใช่ไหมคับ

แต่ที่นี้ผมจะสร้างเงื่อนไขยังไงให้มันรับค่าจาก TXT_DOnut_Amount คือเปลี่ยนจาก 0 ให้เป็นค่าที่เราพิมพ์ลงไปและเอามาคำนวณ
รบกวนตอบที่คับ ไม่เก่ง VB จริงๆ

Tag : .NET, VB.NET

Date : 2014-01-11 10:54:25

By : heroplayboy

View : 1245

Reply : 6

No. 1

Mr.T-Bag

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

ลองฟังก์ชัน cdbl() ดูครับ แปลงจาก text เป็นตัวเลขก่อนค่อยคำนวณ

Date : 2014-01-11 11:57:37

By : Mr.T-Bag

No. 2

0100 0010

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

อีกทางเลือกคือ Default TXT_DOnut_Amount.Text ให้มีค่า = 0 ก่อนครับ

Date : 2014-01-11 12:13:47

By : 01000010

No. 3

Guest

ยังไงอ่ะคับช่วยอธิบายนิดนึงคับ

Date : 2014-01-11 14:10:18

By : heroplayboy

No. 4

0100 0010

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

ตอบความคิดเห็นที่ : 3 เขียนโดย : heroplayboy เมื่อวันที่ 2014-01-11 14:10:18

รายละเอียดของการตอบ ::

คำสั่ง Double.TryParse(TXT_DOnut_Amount.Text.Trim(), tempAmount) คือคำสั่งแปลง

ค่าที่อยู่ใน TXT_DOnut_Amount.Text เป็นตัวเลขชนิดทศนิยม(Double)

ซึ่งในกรณีที่มันว่าง ('') มันแปลงไม่ได้เพราะค่าว่างไม่ใช่ตัวเลข

ทีนี้ผมจึงเสนอให้กำหนด TXT_DOnut_Amount.Text เป็น 0 ไว้ก่อนในหน้า Design

ถ้าผู้ใช้ไม่ได้กรอก มันก็มีค่าเท่ากับ 0 ใช่ไหมละครับ

แต่ถ้าต้องการเช็คว่า มันว่าง และให้มันเท่ากับ 0 เราก็ใช้ IF ครับไม่ยากหลอก

ลองดูครับ

Date : 2014-01-11 14:55:39

By : 01000010

No. 5

Guest

ลองทำตามคำแนะนำหลายท่านแล้วคับ ก็ยังไม่ได้ T_T ผมเลยลองวิธีเก่า มันก็ทำงานได้นะคับ แต่พอกดลบมันก็ฟ้องเหมือนเดิม

Code (VB.NET)

    Private Sub TXT_DOnut_Amount_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TXT_DOnut_Amount.KeyUp
        Select Case Asc(e.KeyCode)
            Case 48 To 57 ' key โค๊ด ของตัวเลขจะอยู่ระหว่าง48-57ครับ 48คือเลข0 57คือเลข9ตามลำดับ
                e.Handled = False
                TXT_Old_Price.Text = Trim(TXT_Price_Num.Text) * TXT_DOnut_Amount.Text
            Case 8, 13, 46 ' ปุ่ม Backspace = 8,ปุ่ม Enter = 13, ปุ่มDelete = 46

                e.Handled = False

            Case Else
                e.Handled = True
                'MessageBox.Show("สามารถกดได้แค่ตัวเลข")
        End Select

    End Sub

รูปตัวอย่างคับ
ตัวอย่างที่มันฟ้อง

Date : 2014-01-11 21:15:42

By : heroplayboy

No. 6

Ton Army

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

ลองใช้ Val ดูครับ ถ้าครอบ Trim แล้วมันจะเป็น String เปล่า

     'MsgBox(Val(Trim(TextBox1.Text)) * Val(Trim(TextBox2.Text)))

Date : 2014-01-11 22:59:19

By : Downrung

ค้นหาข้อมูล

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

Re : รบกวนด้วยคับ ไม่เก่ง VB มันขึ้น Conversion from string "" to type 'Single' is not valid.

รายละเอียด

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

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

Notice

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

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

โดย

อีเมล์

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