  | 
              
	              
	                
  
    |   | 
   
  
    
        
        ผมจะทำโปรแกรม ตรวจสอบผลการเรียนนะครับ โดย ฐานข้อมูล เป็น sql server 2005  โปรแกรมที่ใช้เขียนเป็น Visual Basic 2008 ภาษา Basic     | 
   
  
    |   | 
   
 
 
 
              
  
          
		
     
		
	  
        
             | 
            | 
            | 
             | 
         
        
             | 
                       | 
          
            
               
                 Code (VB.NET) 
	Dim Total As Double = 0
        For i As Integer = 0 To DataGridView1.RowCount - 1
                Total += DataGridView1.Rows(i).Cells(2).Value
        Next
 
 
ประมาณนี้ครับ                        
               
               | 
             
            
              
			  			  
			                              
                              
              
                
                     | 
                     | 
                     | 
                 
                
                     | 
                  
                      
                        | Date :
                            2012-04-04 10:25:02 | 
                        By :
                            webmaster | 
                         
                    | 
                     | 
                 
                
                     | 
                     | 
                     | 
                 
                | 
             
           
			         | 
             | 
         
        
             | 
            | 
             | 
             | 
         
          
	    
     
               
		
     
		
	  
        
             | 
            | 
            | 
             | 
         
        
             | 
                       | 
          
            
               
                 พี่ครับ งง เลยครับ 
 
พี่อันแรกผมต้องหาผลรวมขอกการบวกทุกบรรทัดนะ ของ คอลัม Credit  อยากไห้ผลออกมาทาง TextBox2  
 
แล้ว เอา Credit คูณ Gradename  อยากไห้ผลออกมาทาง TextBox3                        
               
               | 
             
            
              
			                              
                              
              
                
                     | 
                     | 
                     | 
                 
                
                     | 
                  
                      
                        | Date :
                            2012-04-04 22:58:30 | 
                        By :
                            หม่ฮั่น | 
                         
                    | 
                     | 
                 
                
                     | 
                     | 
                     | 
                 
                | 
             
           
			         | 
             | 
         
        
             | 
            | 
             | 
             | 
         
          
	    
     
               
		
     
		
	  
        
             | 
            | 
            | 
             | 
         
        
             | 
                       | 
          
            
               
                 Code (VB.NET) 
Total += DataGridView1.Rows(i).Cells(1).Value * DataGridView1.Rows(i).Cells(2).Value 
  
 
เอาตัวแปร Total ไปใช้เลยครับ                          
               
               | 
             
            
              
			  			  
			                              
                              
              
                
                     | 
                     | 
                     | 
                 
                
                     | 
                  
                      
                        | Date :
                            2012-04-05 10:37:15 | 
                        By :
                            webmaster | 
                         
                    | 
                     | 
                 
                
                     | 
                     | 
                     | 
                 
                | 
             
           
			         | 
             | 
         
        
             | 
            | 
             | 
             | 
         
          
	    
     
               
		
     
		
	  
        
             | 
            | 
            | 
             | 
         
        
             | 
                       | 
          
            
               
                 พี่ครับ ทำได้แล้วขอบคุณมากมาย ครับ 
 
แต่ยังไม่จบครับพี่ ลบกวนต่อหน่อยครับ พี่ๆ 
 
Visual Basic 2008 ภาษา Basic มันมี app บน windows mobile  
 
ผมต้องทำทุกที่ทำไป ทำลง app windows mobile  แต่ทำมาจนถึงโค้ดจะเอามาคำนวน มันกับใช่ด้วยกันไม่ได้ผมต้องใช้คำสั่งยังไงครับ 
   ((จะทำเหมือนเดิมแต่เป็นบน windows mobile (ฐานข้อมูลตัวเดิ่ม )))  
 
 รบกวนด้วยครับ                         
               
               | 
             
            
              
			                              
                              
              
                
                     | 
                     | 
                     | 
                 
                
                     | 
                  
                      
                        | Date :
                            2012-04-05 18:29:50 | 
                        By :
                            หม่ฮั่น | 
                         
                    | 
                     | 
                 
                
                     | 
                     | 
                     | 
                 
                | 
             
           
			         | 
             | 
         
        
             | 
            | 
             | 
             | 
         
          
	    
     
               
		
     
		
	     
	    
     
               
		
     
		
	  
        
             | 
            | 
            | 
             | 
         
        
             | 
                       | 
          
            
               
                   
 
1 ผมต้องการหาผลรวมของ คอลัมน์Credit ไห้ออกมาทาง TextBox1 
 
2 แล้วเอา คอลัมน์ Credit คูณ  คอลัมน์ Gradena   ไห้ออกมาทาง TextBox2 
 
Code (VB.NET) 
 Dim Total As Double = 0
        Dim Tota As Double = 0
        Dim Tmp1, Tmp2, Tmp3, Tmp4, Tmp5, Tmp6 As Double
        For i As Integer = 0 To [color=blue]View_2DataGridView.RowCount - 1
            Total += View_2DataGridView.Rows(i).Cells(12).Value
            Tmp1 = View_2DataGridView.Rows(i).Cells(12).Value
            Tmp2 = View_2DataGridView.Rows(i).Cells(21).Value
            Tota += Tmp1 * Tmp2
            TextBox2.Text = Tmp3
        Next
        TextBox1.Text = Total
        TextBox2.Text = Tota
        Tmp4 = TextBox1.Text
        Tmp5 = TextBox2.Text
        Tmp6 = Tmp5 / Tmp4
        TextBox4.Text = Tmp6
 
 
ผมใช่โค้ดนี้ครับ มานได้ผลตามต้องการทุกประการใน windows form (WindowsApplication) 
แต่พอเอามาใส่ใน windows mobile มานใช่ไม่ได้อะครับ  มานบองว่า (('RowCount' is not a member of system.windows.forms.Grid))                        
               
               | 
             
            
              
			                              
                              
              
                
                     | 
                     | 
                     | 
                 
                
                     | 
                  
                      
                        | Date :
                            2012-04-06 22:22:23 | 
                        By :
                            หม่าฮั่น | 
                         
                    | 
                     | 
                 
                
                     | 
                     | 
                     | 
                 
                | 
             
           
			         | 
             | 
         
        
             | 
            | 
             | 
             | 
         
          
	    
     
               
		
     
		
	  
        
             | 
            | 
            | 
             | 
         
        
             | 
                       | 
          
            
               
                 Code (VB.NET) 
Dim Total As Double = 0
       Dim Tota As Double = 0
       Dim Tmp1, Tmp2, Tmp3, Tmp4, Tmp5, Tmp6 As Double
       For i As Integer = 0 To View_2DataGrid.RowCount - 1
           Total += View_2DataGrid.Rows(i).Cells(12).Value
           Tmp1 = View_2DataGrid.Rows(i).Cells(12).Value
           Tmp2 = View_2DataGrid.Rows(i).Cells(21).Value
           Tota += Tmp1 * Tmp2
           TextBox2.Text = Tmp3
       Next
       TextBox1.Text = Total
       TextBox2.Text = Tota
       Tmp4 = TextBox1.Text
       Tmp5 = TextBox2.Text
       Tmp6 = Tmp5 / Tmp4
       TextBox4.Text = Tmp6
                        
               
               | 
             
            
              
			                              
                              
              
                
                     | 
                     | 
                     | 
                 
                
                     | 
                  
                      
                        | Date :
                            2012-04-06 22:25:54 | 
                        By :
                            หม่าฮั่น | 
                         
                    | 
                     | 
                 
                
                     | 
                     | 
                     | 
                 
                | 
             
           
			         | 
             | 
         
        
             | 
            | 
             | 
             | 
         
          
	    
     
               
		
     
		
	  
        
             | 
            | 
            | 
             | 
         
        
             | 
                       | 
          
            
               
                 Code (VB.NET) 
Dim Total As Double = 0
       Dim Tota As Double = 0
       Dim Tmp1, Tmp2, Tmp3, Tmp4, Tmp5, Tmp6 As Double
       For i As Integer = 0 To View_2DataGrid.RowCount - 1
           Total += View_2DataGrid.Rows(i).Cells(12).Value
           Tmp1 = View_2DataGrid.Rows(i).Cells(12).Value
           Tmp2 = View_2DataGrid.Rows(i).Cells(21).Value
           Tota += Tmp1 * Tmp2
           TextBox2.Text = Tmp3
       Next
       TextBox1.Text = Total
       TextBox2.Text = Tota
       Tmp4 = TextBox1.Text
       Tmp5 = TextBox2.Text
       Tmp6 = Tmp5 / Tmp4
       TextBox4.Text = Tmp6
 
 
ผมใช่โค้ดนี้ครับ มานได้ผลตามต้องการทุกประการใน windows form (WindowsApplication) 
แต่พอเอามาใส่ใน windows mobile มานใช่ไม่ได้อะครับ มานบองว่า (('RowCount' is not a member of system.windows.forms.Grid)) 
ทั้งๆที่มานเป็น vb.net เหมือนกานนิครับ แนะนำด้วยครับพี่ๆๆ                        
               
               | 
             
            
              
			                              
                              
              
                
                     | 
                     | 
                     | 
                 
                
                     | 
                  
                      
                        | Date :
                            2012-04-09 19:44:45 | 
                        By :
                            หม่าฮั่น | 
                         
                    | 
                     | 
                 
                
                     | 
                     | 
                     | 
                 
                | 
             
           
			         | 
             | 
         
        
             | 
            | 
             | 
             | 
         
          
	    
     
               
		
     
		
	  
        
             | 
            | 
            | 
             | 
         
        
             | 
                       | 
          
            
               
                 ขอคุณ มากมาย ครับ                        
               
               | 
             
            
              
			                              
                              
              
                
                     | 
                     | 
                     | 
                 
                
                     | 
                  
                      
                        | Date :
                            2012-05-18 20:05:56 | 
                        By :
                            หม่าฮั่น | 
                         
                    | 
                     | 
                 
                
                     | 
                     | 
                     | 
                 
                | 
             
           
			         | 
             | 
         
        
             | 
            | 
             | 
             | 
         
          
	    
     
      		  
	
     | 
   
 
                 |