vb2010,vs2010程式陣列怎麼寫?救救我呀!

明天要考試了,我不想再延畢啦,但是自學看課本又看不懂!!

總共兩題。

如果可以,告訴我完整的程式碼;如果不行,請告訴我「大概」怎麼做。

例:  Dim 幾個數字......之類的

20點奉上,感激不盡!!

考試是用visual studio2010!!!

第一題:

如下表有books書籍名稱字串陣列及sales銷售量整數陣列;請如下圖依照銷售量來進行由小到大排序,並列出排名。

books sales

青春無悔   671

暮光之城   506

人生不設限 174

心靈雞湯 892

祕密旅行 758

完成後的樣子

www.xu-sheng.com.tw/vs1.jpg

第二題:

程式執行時先詢問使用者欲輸入的收入筆數,接著再將所輸入的每筆

金額進行加總,最後請算出總金額及平均並顯示出來。

例如:輸入4表示要輸入四筆收入,接著輸入四筆收入之後,

算出四筆收入的總金額及平均並顯示出來。

完成後的樣子

www.xu-sheng.com.tw/vs2.jpg

Update:

第一題大概懂了,謝謝。

但是第二題因為「筆數」是變數,會因為輸入的值不一定,連帶影響輸入的金額筆數,導致console.writeline、總金額和平均也會不同。

課本上沒有類似的範例。

謝謝兩位大大的熱心,我再研究看看。感恩。

2 Answers

Rating
  • John
    Lv 7
    8 years ago
    Favorite Answer

    My computer cannot handle chinese characters, you could fill it in by yourself.

    Imports System

    Imports System.Linq

    Imports System.Collections.Generic

    Module Questions

    Sub Main()

    Question1()

    Question2()

    Console.ReadKey()

    End Sub

    Public Sub Question1

    Dim books As New Dictionary(Of String, Double)

    books.Add("five", 174)

    books.Add("three", 671)

    books.Add("two", 758)

    books.Add("one", 892)

    books.Add("four", 506)

    Dim booksSortedByPrice = (From entry In books Order By entry.Value Descending Select entry)

    ' Report...

    Console.WriteLine("=== List Of Books ===")

    Console.WriteLine("{0,-10} {1}", "Books", "Sale")

    For Each item As KeyValuePair(Of String, Double) In booksSortedByPrice

    Console.WriteLine("{0,-10} {1}", item.Key, item.Value)

    Next

    End Sub

    Public Sub Question2

    Console.Write("Enter number of entry? ")

    Dim idx As Integer = CInt(Console.ReadLine())

    Dim total As Double = 0

    Console.WriteLine("Enter {0} amount(s)", idx)

    For i As Integer = 1 To idx

    Console.Write("{0} of {1}? ", i, idx)

    Dim amount As Double = CDbl(Console.ReadLine())

    total = total + amount

    Next

    Console.WriteLine("Result")

    Console.Write("Total: {0} Average: {1}", total, total / idx)

    End Sub

    End Module

    Source(s): myself
  • 8 years ago

    我學過vb不過很久沒碰了

    大概說一下其中一種做法...如果說明有錯就請指教一下...

    順便讓我學習一下正確的程式..謝謝

    *第一題

    這一題請查詢課本中的說明,通常會舉例 班級成績排名,這作法是相同的

    利用陣列中的迴圈

    --

    比對陣列中銷售量大小後

    依照銷售量最高的排在前面的順序

    將陣列中的資料調換成正確順序取出再輸入

    --

    不斷重複以上步驟直到順序都是正確的為止

    然後在利用迴圈將整個陣列的內容顯示出來

    *第二題

    建立陣列; 文字 金額

    建立放入總和的變數

    建立放入平均的變數

    輸入的筆數達到相應的筆數,顯示輸入統計結果(總金額 以及 平均數)

    請求輸入筆數

    得到輸入的筆數數字後

    建立相應數量的的陣列

    輸入筆數後,請求輸入金額,顯示目前輸入的筆數及金額(重複,次數由筆數而定)

    輸入的筆數達到相應的筆數,顯示輸入統計結果(總金額 以及 平均數)

    得到輸入的金額後將其放入陣列,利用迴圈重複(需重複直到輸入筆數達到需求量)

    利用迴圈取出所有的數字加總,完成後放入總和的變數中

    將總和變數除以輸入的數量,完成後在放入平均的變數中

    顯示出所有內容

Still have questions? Get your answers by asking now.