Register Register Member Login Member Login Member Login Forgot Password ??
PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone
 

Registered : 109,037

HOME > .NET Framework > Forum > ช่วยดูโค้ดให้หน่อยค่ะ ใส่จำนวนไปแล้วเมื่อกดเมนูจะเรียกดูค่า max และ min มันไม่ขึ้น



 

ช่วยดูโค้ดให้หน่อยค่ะ ใส่จำนวนไปแล้วเมื่อกดเมนูจะเรียกดูค่า max และ min มันไม่ขึ้น

 



Topic : 051862



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



สถานะออฟไลน์
Facebook



ช่วยดูโค้ดให้หน่อยค่ะ ใส่จำนวนไปแล้วเมื่อกดเมนูจะเรียกดูค่า max และ min มันไม่ขึ้น

Code (VB.NET)
Module Module1

    Sub Main()
        Dim x As Integer
        Dim i As Integer
        Dim score As Integer
        Dim NumF, NumD, NumDD, NumA As Integer
        Dim max, min, max2, min2, sum As Integer
        max = 0
        min = 100
        Dim avg As Double

        While x <> 6
            Console.WriteLine(" ")
            Console.WriteLine("Menu")
            Console.WriteLine("*****************************")
            Console.WriteLine("1. Input and show grade")
            Console.WriteLine("2. Max and SecondaryMax score")
            Console.WriteLine("3. Min and SecondaryMin score")
            Console.WriteLine("4. Average score")
            Console.WriteLine("5. Show Frequency of each grade")
            Console.WriteLine("Enter choice : ")

            x = Console.ReadLine
            If x = 1 Then
                Console.WriteLine("Input and show grade")
                For i = 1 To 10 Step 1
                    'รับค่า

                    Console.Write("Enter int score no :" & i & " ")
                    score = Console.ReadLine

                    While score < 0 Or score > 100
                        Console.WriteLine("Invalid")
                        Console.Write("Enter int score no :" & i & " ")
                        score = Console.ReadLine
                    End While


                    sum = sum + score
                    Select Case score
                        Case 0 To 50
                            Console.WriteLine("F")
                            NumF += 1 'นับสะสมทีละ1
                            'NumF = NumF + 1'
                        Case 51 To 60
                            Console.WriteLine("D")
                            NumD += 1
                        Case 61 To 70
                            Console.WriteLine("D+")
                            NumDD += 1
                        Case 71 To 100
                            Console.WriteLine("A")
                            NumA += 1
                    End Select
                Next
            End If
            If x = 2 Then
                Console.WriteLine("Max and SecondaryMax score")
                Console.WriteLine("- - - - - - - - - - - - - -")
                If score > max Then
                    max2 = max
                    max = score
                ElseIf score > max2 Then
                    max2 = score
                End If
            End If
            If x = 3 Then
                Console.WriteLine("Min and SecondaryMin score")
                Console.WriteLine("- - - - - - - - - - - - - -")
            ElseIf score < min Then
                min2 = min
                min = score
            ElseIf score < min2 Then
                min2 = score
            End If
            'End If
            If x = 4 Then
                Console.WriteLine("Average score")
                Console.WriteLine("- - - - - - - - - - - - - - -")
                avg = sum / 10
                Console.WriteLine("Average score = " & avg)
            ElseIf x = 5 Then
                Console.WriteLine("Show Frequency of each grade")
                Console.WriteLine("- - - - - - - - - - - - - - -")
                Console.WriteLine("Number of grade A = " & NumA)
                Console.WriteLine("Number of grade D+ = " & NumDD)
                Console.WriteLine("Number of grade D = " & NumD)
                Console.WriteLine("Number of grade F = " & NumF)

            End If

        End While

    End Sub

End Module



ปล.
ตัวแปร max คือ ค่าที่มากที่สุด
ตัวแปร max2 คือ ค่าที่มากรองลงมา

ตัวแปร min คือ ค่าที่น้อยที่สุด
ตัวแปร min2 คือ ค่าที่น้อยที่สุดรองลงมา


ช่วยหน่อยนะค่ะ ลองทำหลายรอบมากไม่ได้จริงๆ



Tag : .NET, VB.NET







Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 2010-11-19 02:33:16 By : badtzyui View : 1103 Reply : 3
 

 

No. 1



โพสกระทู้ ( 74,058 )
บทความ ( 838 )

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Twitter Facebook

หัดเขียน ลองผิดลองถูก ถ้าไม่ได้ตรงไหนค่อยๆ ถามครับ






แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2010-11-19 06:38:22 By : webmaster
 


 

No. 2



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



สถานะออฟไลน์


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

ความพยายามอยู่ที่ไหน ความพยายามก็อยู่ที่นั่นแหละ
พยายามต่อไป เพื่อครั้งต่อไปจะยิ่งพยายามมากขึ้น

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2010-11-19 09:40:51 By : nooknoname
 

 

No. 3



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



สถานะออฟไลน์


ถามก่อนว่า
1) จขกท ต้องกดเลขอะไรมันถึงจะขึ้นค่า Max หรือ Min
2) ในกรณีที่กดไปแล้วมันจะแสดงข้อความออกมาแม้ว่าไม่แสดงค่า Max หรือ Min แต่มันต้องแสดงอะไรออกมา
3) ลองทำของ จขกท คือการกด Run แล้วกด 1,2,3... หรือการเข้าไปแก้ Code
4) Code นี้ จขกทไม่ได้เขียนเองใช้หรือไม่
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2010-11-19 11:39:35 By : kaimuk
 

   

ค้นหาข้อมูล


   
 

แสดงความคิดเห็น
Re : ช่วยดูโค้ดให้หน่อยค่ะ ใส่จำนวนไปแล้วเมื่อกดเมนูจะเรียกดูค่า max และ min มันไม่ขึ้น
 
 
รายละเอียด
 
ตัวหนา ตัวเอียง ตัวขีดเส้นใต้ ตัวมีขีดกลาง| ตัวเรืองแสง ตัวมีเงา ตัวอักษรวิ่ง| จัดย่อหน้าอิสระ จัดย่อหน้าชิดซ้าย จัดย่อหน้ากึ่งกลาง จัดย่อหน้าชิดขวา| เส้นขวาง| ขนาดตัวอักษร แบบตัวอักษร
ใส่แฟลช ใส่รูป ใส่ไฮเปอร์ลิ้งค์ ใส่อีเมล์ ใส่ลิ้งค์ FTP| ใส่แถวของตาราง ใส่คอลัมน์ตาราง| ตัวยก ตัวห้อย ตัวพิมพ์ดีด| ใส่โค้ด ใส่การอ้างถึงคำพูด| ใส่ลีสต์
smiley for :lol: smiley for :ken: smiley for :D smiley for :) smiley for ;) smiley for :eek: smiley for :geek: smiley for :roll: smiley for :erm: smiley for :cool: smiley for :blank: smiley for :idea: smiley for :ehh: smiley for :aargh: smiley for :evil:
Insert PHP Code
Insert ASP Code
Insert VB.NET Code Insert C#.NET Code Insert JavaScript Code Insert C#.NET Code
Insert Java Code
Insert Android Code
Insert Objective-C Code
Insert XML Code
Insert SQL Code
Insert Code
เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

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

Notice

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

   
  เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง
 
โดย
อีเมล์
บวกค่าให้ถูก
<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)







Exchange: นำเข้าสินค้าจากจีน, Taobao, เฟอร์นิเจอร์, ของพรีเมี่ยม, ร่ม, ปากกา, power bank, แฟลชไดร์ฟ, กระบอกน้ำ

Load balance : Server 00
ThaiCreate.Com Logo
© www.ThaiCreate.Com. 2003-2024 All Rights Reserved.
ไทยครีเอทบริการ จัดทำดูแลแก้ไข Web Application ทุกรูปแบบ (PHP, .Net Application, VB.Net, C#)
[Conditions Privacy Statement] ติดต่อโฆษณา 081-987-6107 อัตราราคา คลิกที่นี่