منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : في القريد فيو يتم احتساب الارقام او الاعداد
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم

في القريد فيو يتم احتساب وجمع  الارقام  او الاعداد كما هو في الكود بالاسفل

كي يتم احتساب عدد الكلمات من نوع  مثلا كم عدد الذكور

PHP كود :
       
        TextBox5
.Text "0"
 
       For i As Byte 0 To DataGridView1.RowCount 1

            TextBox5
.Text CDbl(Val(TextBox5.Text)) + CDbl(DataGridView1.Rows(i).Cells(11).Value 
        Next
       TextBox5
.Text TextBox5.Text Val(10
(09-10-20, 10:15 PM)عمور2016 كتب : [ -> ]السلام عليكم

في القريد فيو يتم احتساب وجمع  الارقام  او الاعداد كما هو في الكود بالاسفل

كي يتم احتساب عدد الكلمات من نوع  مثلا كم عدد الذكور

PHP كود :
       
        TextBox5
.Text "0"
 
       For i As Byte 0 To DataGridView1.RowCount 1

            TextBox5
.Text CDbl(Val(TextBox5.Text)) + CDbl(DataGridView1.Rows(i).Cells(11).Value 
        Next
       TextBox5
.Text TextBox5.Text Val(10

PHP كود :
 Dim f As Integer
        Dim m 
As Integer
        f 
0
        m 
0

        Dim i 
As Integer
        For i 
0 To dg.Rows.Count IIf(dg.AllowUserToAddRows21)
 
           If dg.Rows(i).Cells(0).Value.ToString "female" Then
                f 
+= 1
            ElseIf dg
.Rows(i).Cells(0).Value.ToString "male" Then
                m 
+= 1
            End 
If

 
       Next
        MsgBox
("الاناث: " vbNewLine " الذكور: " mMsgBoxStyle.Information""
الله يكتب اجرك

والف الف شكرا اخي سعود

الله يحفظك تحياتي