這裡有沒有人懂"Visual Basic"的程式....?

書上有很多這樣的範例
你的需求用 Access 就可以做了

如果用 VB 的話
要建立一個輸入的界面
透過 Crystal Report 就可以了

Julianma:

我們是初次接觸這樣子的東西

所以應該老師上的還算是基礎

你說的那些我都不懂ㄟ...

我給你看一個程式..

private sub command1_click
Dim X(4)
for i = 0 to 4
x(i)=val(inputbox("請輸入第"&i&"份資料")
next
min=x(0)
max=x(0)
for i = 1 to 4
if x(i)<min then min = x(i)
if x(i)<max then max = x(i)
next
print"最大值=";max,"最小值=;min

這個程式執行隻後可以讓你輸入成績
但是列印出來的只是最高分和最低分....
納要怎樣才能讓他變呈由高至低排列嗎....?
真的很謝謝你...
幫我解答^^

你是要改這個程式嗎？
將
min=x(0)
max=x(0)
for i = 1 to 4
if x(i)<min then min = x(i)
if x(i)<max then max = x(i)
next
print"最大值=";max,"最小值=;min

改成

temp = x(0)
for i = 1 to 4
for j = 0 to i
if x(i) < x(j) then
temp = x(i)
x(i) = x(j)
x(j) = temp
next
next

for i = 0 to 4
print x(i)
next

我不太記得vb的code怎樣寫
但大致應該是這樣
這是最簡單的sort

看起來彤影寫的是對的
我把它想的太複雜一點

我以為是要寫入資料庫
再用 SQL 的 Order By ...

彤影....Julianma

謝謝你們唷^^

真是幫了我一個好大好大的忙....