Easy 4ever كتب :مثل ما قال الأخ Abu Ehab

أو إذا كنت لا تريد تغيير نوع الحقل LengthM إلى رقمي أستخدم هذا الكود بدلا من السابق
ولاكن لو غيرتها إلى رقمي بيكون أفضل لأنك تتعامل مع أرقام في هذا الحقل وتقارن قيمها

shado1796 كتب :

اخي كنت استخدم خانات كثيره في برنامجي Int رقمي ،،، لكن واجهتني مشاكل بسببها وهي اني انا اريد استخدام الفواصل مثل 1،5 1.5
تظهر مشاكل عند الاضافة فإذطريت الى تغييرها ،،،، والان الكود الثاني هذا

كود :

ListView5.Items.Clear()

        Conn.Open()
        Dim cmd5 As New SqlCommand("select * from Table2 where LengthM<='" & 4 & "'", Conn)
        Dim myReader5 As SqlDataReader = cmd5.ExecuteReader(CommandBehavior.CloseConnection)
        While myReader5.Read() = True
            Dim item5 As New ListViewItem()
            item5.Text = myReader5.Item("ID").ToString()
            item5.SubItems.Add(myReader5.Item("NameCloth").ToString())

            ListView5.Items.Add(item5)
        End While
        Conn.Close()

للاسف اخي ان الكود يظهر ارقام فوق 4 بكثير فقد اظهر 30 20 5 8
ما هو الحل جزاك الله خير.

Easy 4ever كتب :

PHP كود :

ListView5.Items.Clear()

Conn.Open()
Dim cmd5 As New SqlCommand("select * from Table2 where LengthM<=" & 4 & "", Conn)
Dim myReader5 As SqlDataReader = cmd5.ExecuteReader(CommandBehavior.CloseConnection)
While (myReader5.Read() = True
)Dim item5 As New ListViewItem()
item5.Text = myReader5.Item("ID").ToString()
item5.SubItems.Add(myReader5.Item("NameCloth").ToString())

ListView5.Items.Add(item5)
End While
Conn.Close() 


Easy 4ever كتب :دام إنك تستخدم أرقام عشريه أستخدم الكود الأول إللي حطيته لك بالمشاركه إللي هو هذا






مع المراعاه بأن تغيير نوع الحقل LengthM إلى هذا النوع decimal(10,2)

* ملاحظة:
1- هذا النوع يعني عدد كسري رقم 10 هو عدد أعلى الخانات قبل الفاصلة إي الصحيحه 2 عدد أعلى الخانات بعد الفاصلة إي الخانات الكسرية

مثال يقبل هذا العدد ( 1234500000.02 ) قبل كحد أعلى 10 خانات قبل الفاصلة و خانتين بعد الفاصلة

2- تستطيع زيادة الخانات اليسرى ( الصحيحة ) و الخانات اليمنى ( الكسرية ) بالرقم الذي تريد

3- هذا النوع يقبل الأرقام من

( 0.00000000000000000000000000000000000001 )

حتى رقم ( 10,000,000,000,000,000,000,000,000,000 )

shado1796 كتب :

[/COLOR]

اشكرك اخي جدا على التوضيح ،، وقد قرأت عن هذا الموضوع من قبل ،،لكن ما اقصده اني عندما غيرت نوع الحقل يجب انا اغير كثير في البرنامج مثل الاضافة وهذا الكود

كود :

Dim Cmd2 As New SqlCommand("insert into Table2 (LengthM,LengthY) values ([color=#FF0000]'[/color]" & [color=#FF0000]Trim[/color](TextBox72.Text) & "[color=#FF0000]'[/color] , [color=#FF0000]'[/color]" & [color=#FF0000]Trim[/color](TextBox85.Text) & "[color=#FF0000]'[/color] )", Conn)

انا اريد اقتراحك ونصيحتك في استخدام Trim ام Val ،، مع العلم اني استخدم ارقام صحيحة وارقام عشرية فقط عند الاضافة مثل :
4
3.5
3
...

،شكرا ،،،[/SIZE]

Easy 4ever كتب :بالطبع استخدم Val
ولاتنسى بحذف هذي العلامه ( ' ) من الجهى اليمنى واليسرى

الكود بعد التعديل

كود :

Dim Cmd2 As New SqlCommand("insert into Table2 (LengthM,LengthY) values (" & [color=#ff0000]Val[/color](TextBox72.Text) & " , " & [color=#FF0000]Val[/color](TextBox85.Text) & ")", Conn)

shado1796 كتب :شكرا وجاري التجربة

shado1796 كتب :نجح الكود بشكل ممتاز ،،، جزاك الله الف خير انت والاخوان