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,036

HOME > .NET Framework > Forum > ช่วยคิดโค้ด VB หน่อยนะค่ะ จะได้ส่งแล้ววววว โจทย์อยู่ข้างในค่ะ



 

ช่วยคิดโค้ด VB หน่อยนะค่ะ จะได้ส่งแล้ววววว โจทย์อยู่ข้างในค่ะ

 



Topic : 055517



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



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




Code (VB.NET)
จงเขียนโปรแกรมสำหรับคำนวณค่า Mean และ Standard Deviation (Std.) โดยอ่านข้อมูลจากแฟ้มข้อมูล ในตารางที่กำหนดให้ โดยสิ่งที่ต้องแสดงประกอบด้วย
-	Expected Value 
          o	Mean
          o	Std.
-	Actual Value
          o	Mean
          o	Std.

DATA1.TXT		DATA2.TXT
Estimate Proxy Size		Development Hours
160		                      15.0
591		                     69.9
114		                        6.5
229		                     22.4
230		                    28.4
270		                      65.9
128		                          19.4
1657		                   198.7
624		                   38.8
1503		                  138.2
ตัวอย่างข้อมูล











ผลลัพธ์จากแฟ้ม DATA1.TXT
	*******************************************************************************
	PLEASE INPUT FILE: DATA1.TXT
	*******************************************************************************
	 MEAN
	*******************************************************************************
	 EXPECTED VALUE = 550.6
	 ACTUAL VALUE = (นิสิตต้องคำนวณค่า MEANเอง)	*******************************************************************************
	 STANDARD DEVIATION
	*******************************************************************************
	 EXPECTED VALUE = 572.03
	 ACTUAL VALUE = (นิสิตต้องคำนวณค่า Std. เอง)	*******************************************************************************

ผลลัพธ์จากแฟ้ม DATA2.TXT
	*******************************************************************************
	PLEASE INPUT FILE: DATA2.TXT
	*******************************************************************************
	 MEAN
	*******************************************************************************
	 EXPECTED VALUE = 60.32
	 ACTUAL VALUE = (นิสิตต้องคำนวณค่า MEANเอง)	*******************************************************************************
	 STANDARD DEVIATION
	*******************************************************************************
	 EXPECTED VALUE = 62.26
	 ACTUAL VALUE = (นิสิตต้องคำนวณค่า Std. เอง)	*******************************************************************************





Tag : .NET, VB.NET







Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 2011-02-03 19:21:32 By : ModZaa View : 1374 Reply : 8
 

 

No. 1



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



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


คือผมอ่าน โจทย์ยังงงเลยครับ

ข้อมูลใน DATA1.TXT คืออะไร ???
ข้อมูลใน DATA2.TXT คืออะไร ???
Mean EXPECTED VALUE เอามาจากไหน ???
Mean ACTUAL VALUE คำนวนยังไง ???
STANDARD EXPECTED VALUE เอามาจากไหน ???
STANDARD ACTUAL VALUE คำนวนยังไง ???

ผมอยากช่วยนะครับ แต่เจอโจทย์แบบนี้ มันเกินความสามารถของผมจริงๆ ครับ

จงสู้ต่อไปนะครับ จีบัน






แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2011-02-04 08:34:59 By : kaimuk
 


 

No. 2

Guest


DATA1.TXT คือ Column ทางซ้ายไงคะ ฉะนั้น DATA.TXT คือ column ที่ 2
แต่หลักใหญ่ใจความทั้งสองไฟล์จะมีแต่ตัวเลข line/number
ส่วน Expected คือค่าที่คาดหวังหรือควรจะเป็น น่าจะมาจากระบบเดิมที่คำนวนค่ามาตรฐานมาแล้ว
และ Actual หมายถึงค่าที่ได้จิงๆ จากการคำนวนจ้อมูลดิบจากทั้งสองไฟล์ค่ะ
อะไม่ยากแลัวคุณไข่มาก ลองทำดิคะ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2011-02-04 11:20:53 By : สาวเอ๋อ (ก้อคนมานเอ๋อ)
 

 

No. 3



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



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


Code (VB.NET)
Imports System.IO
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtMean.Click
        _Load(ListBox1)
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtStandard.Click
        _Load(ListBox2)
    End Sub

    Sub _Load(ByRef _Listbox As ListBox)
        OpenFileDialog1.Filter = "Text Files | *.txt"
        If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            Dim strFileName As String
            strFileName = OpenFileDialog1.FileName
            Dim file_name As New FileInfo(strFileName)
            Dim myReader As StreamReader

            myReader = New StreamReader(strFileName, System.Text.UnicodeEncoding.Default)

            Do

                _Listbox.Items.Add(myReader.ReadLine())

            Loop Until myReader.Peek = -1
        End If
    End Sub

    Private Sub BtCal_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtCal.Click
        Dim _dub As Double
        For i = 0 To ListBox1.Items.Count - 1
            _dub += ListBox1.Items.Item(i)
        Next
        txtMean.Text = _dub / ListBox1.Items.Count
        _dub = 0
        For i = 0 To ListBox2.Items.Count - 1
            _dub += ListBox2.Items.Item(i)
        Next
        txtStandard.Text = _dub / ListBox2.Items.Count
    End Sub
End Class

Cal

***คือผมไม่รู้ว่า
Mean EXPECTED VALUE, STANDARD EXPECTED VALUE เอามาจากไหน จขกท. บอกเอามาจากระบบเดิม ผมหาระบบเดิมไม่เจอผมไม่ใส่นะครับ
และผมก็ไม่รู้ว่า Mean ACTUAL VALUE, STANDARD ACTUAL VALUE คำนวนยังไง ??? ผมเลยมั่วเอาค่าเฉลี่ยแทน

ผิดยังไง จขกท. น่าจะแก้ได้นะครับ จงสู้ต่อไปนะครับ จีบัน
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2011-02-04 11:51:50 By : kaimuk
 


 

No. 4

Guest


คุนไข่มากเก่งจังเลย ถ้าตั้งใจก้อทำได้นี่คะ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2011-02-04 12:01:52 By : สาวเอ๋อ (ก้อคนมานเอ๋อ)
 


 

No. 5



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



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


ตอบความคิดเห็นที่ : 4 เขียนโดย : สาวเอ๋อ (ก้อคนมานเอ๋อ) เมื่อวันที่ 2011-02-04 12:01:52
รายละเอียดของการตอบ ::
น้องกระต่าย พูดอย่างกับผมเป็นคนตั้งกระทู้



ประวัติการแก้ไข
2011-02-04 13:07:56
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2011-02-04 13:06:15 By : kaimuk
 


 

No. 6

Guest


KaimuK ผมว่ามันอ่านว่า "ใข่มุก" นะครับ อ่านไปได้ยังไง "ไข่มาก"
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2011-02-04 16:26:47 By : iSad
 


 

No. 7



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



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


ตอบความคิดเห็นที่ : 6 เขียนโดย : iSad เมื่อวันที่ 2011-02-04 16:26:47
รายละเอียดของการตอบ ::
น้องกระต่ายทำอะไรก็ไม่ผิดครับ ถึงผิดจริงก็ให้รอลงอาญาไว้

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2011-02-04 16:42:02 By : kaimuk
 


 

No. 8



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



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


ขอบคุณทุกคนมักมากนะค่ะ ที่เข้ามาช่วย ทำเสร็จแล้ว ส่งเรียบร้อยแล้วคร้า ขอบคุณมากนะค่ะ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2011-02-09 10:45:17 By : ModZaa
 

   

ค้นหาข้อมูล


   
 

แสดงความคิดเห็น
Re : ช่วยคิดโค้ด VB หน่อยนะค่ะ จะได้ส่งแล้ววววว โจทย์อยู่ข้างในค่ะ
 
 
รายละเอียด
 
ตัวหนา ตัวเอียง ตัวขีดเส้นใต้ ตัวมีขีดกลาง| ตัวเรืองแสง ตัวมีเงา ตัวอักษรวิ่ง| จัดย่อหน้าอิสระ จัดย่อหน้าชิดซ้าย จัดย่อหน้ากึ่งกลาง จัดย่อหน้าชิดขวา| เส้นขวาง| ขนาดตัวอักษร แบบตัวอักษร
ใส่แฟลช ใส่รูป ใส่ไฮเปอร์ลิ้งค์ ใส่อีเมล์ ใส่ลิ้งค์ 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 01
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 อัตราราคา คลิกที่นี่