關於使用VB寫一個考試系統

Home Home
引用 | 編輯 catname
2009-05-10 15:54
樓主
推文 x0
這是一個期末個人專題作業,題目是自行發揮,所以我就想要做一個題庫系統。
手邊已經有一本書(Visual Basic 2008最佳實務講座,羅慧真 著,恆逸資訊)了,不過我想還需要再去借幾本回來看。

開發環境(語言): VB ; 資料庫: Access

一開始的構想是,
可以讓使用者自行選擇考試年度、題數,
之後再從資料 ..

訪客只能看到部份內容,免費 加入會員



獻花 x0
引用 | 編輯 oryeh
2009-05-10 16:02
1樓
  
時間夠,就兩種想法分別寫出來
寫程式就是要不斷的嚐試不同的方向
多寫有益的

獻花 x1
引用 | 編輯 catname
2009-05-10 16:17
2樓
  
下面是引用 oryeh 於 2009-05-10 16:02 發表的 : 到引言文
時間夠,就兩種想法分別寫出來
寫程式就是要不斷的嚐試不同的方向
多寫有益的


不過...5/20之前就要交,
算時間不太夠! 表情


謝謝你!   表情

獻花 x0
引用 | 編輯 catname
2009-05-12 12:29
3樓
  
試了好久不沒辦法做成我所想的樣子,
所以就只能按照書上所寫的做,
現在面臨到另一個問題,
怎麼樣計算分數? 表情

獻花 x0
引用 | 編輯 三仙
2009-05-12 14:19
4樓
  
下面是引用 catname 於 2009-05-12 12:29 發表的 : 到引言文
試了好久不沒辦法做成我所想的樣子,
所以就只能按照書上所寫的做,
現在面臨到另一個問題,
怎麼樣計算分數? 表情


建議你把程式po上來
讓大大們幫你看
要怎麼改或怎麼寫

獻花 x1
引用 | 編輯 catname
2009-05-12 14:34
5樓
  
下面是引用 三仙 於 2009-05-12 14:19 發表的 : 到引言文
 

建議你把程式po上來
讓大大們幫你看
要怎麼改或怎麼寫

書上寫的都是一些設定的步驟,沒有程式碼@@"
拉一拉、設定完之後就可以查詢了...
    將欄位拉至 Form 設計頁面,就會自動產生 DataSet、TableAdapter、
    BindingNavigator 和 BindingSource 了。    

我看 Form.vb 裡面也都沒有程式碼(只是一些載入資料庫幾行程式碼而已!)

表情

所以我不知道怎麼開始寫...

我ㄧ開始是想...
先讀取 Access 的 Table,
然後在每個 Label、RadioButton 上面連結我要所要對應的欄位,
然後在"交卷"這個 Button 寫上計算分數的程式碼 !

RadioButton 需要和資料庫裡設定的值比對,
如果相符合就表示得2分,如果沒有就是得0分。

不知道我有沒有哪裡想錯,
之後開始動手要寫的時候,
發現我根本不懂函式該怎麼寫...
不知道參數怎麼連到欄位...

表情

題外話:
第一次寫較大的程式,
之前作業都只是小程式,
有時候太難根本想不出來就只好交屍體...
最後發現,
我根本不會寫程式= =


獻花 x0
引用 | 編輯 三仙
2009-05-12 18:26
6樓
  
下面是引用 catname 於 2009-05-12 14:34 發表的 : 到引言文
書上寫的都是一些設定的步驟,沒有程式碼@@"
拉一拉、設定完之後就可以查詢了...
    將欄位拉至 Form 設計頁面,就會自動產生 DataSet、TableAdapter、
    BindingNavigator 和 BindingSource 了。    
我看 Form.vb 裡面也都沒有程式碼(只是一些載入資料庫幾行程式碼而已!)



所以我不知道怎麼開始寫...

我ㄧ開始是想...
先讀取 Access 的 Table,
然後在每個 Label、RadioButton 上面連結我要所要對應的欄位,
然後在"交卷"這個 Button 寫上計算分數的程式碼 !

RadioButton 需要和資料庫裡設定的值比對,
如果相符合就表示得2分,如果沒有就是得0分。

不知道我有沒有哪裡想錯,
之後開始動手要寫的時候,
發現我根本不懂函式該怎麼寫...
不知道參數怎麼連到欄位...



題外話:
第一次寫較大的程式,
之前作業都只是小程式,
有時候太難根本想不出來就只好交屍體...
最後發現,
我根本不會寫程式= =
    
.......


1.書上寫的都是一些設定的步驟,沒有程式碼@@"拉一拉、設定完之後就可以查詢了...
A.如果用物件設定精靈,很難學會"寫"程式的

2.我ㄧ開始是想...
A.怎麼想都ok,但常看、常改、常寫才是最好的方式

3.就只好交屍體...
A.這句話好像以前學校系主任常說

建議你到vb研究小站->vb語言資料庫介面  去看一下 http://vb.ncis.com.tw/
還有你要的功能用sql語法是可以很快帶出來的
不一定要用物件設定精靈


獻花 x1
引用 | 編輯 catname
2009-05-13 15:26
7樓
  
下面是引用 三仙 於 2009-05-12 18:26 發表的 : 到引言文
 

1.書上寫的都是一些設定的步驟,沒有程式碼@@"拉一拉、設定完之後就可以查詢了...
A.如果用物件設定精靈,很難學會"寫"程式的

2.我ㄧ開始是想...
A.怎麼想都ok,但常看、常改、常寫才是最好的方式

3.就只好交屍體...
A.這句話好像以前學校系主任常說

建議你到vb研究小站->vb語言資料庫介面  去看一下 http://vb.ncis.com.tw/
還有你要的功能用sql語法是可以很快帶出來的
不一定要用物件設定精靈


謝謝你!
之前有看過這個網站,
但還有個疑問是...
VB6 和 VB2005 應該是有通的吧XD ?

獻花 x0
引用 | 編輯 catname
2009-05-14 20:21
8樓
  
放棄連資料庫了,
決定把資料先放在程式碼裡(陣列)! 表情

不知道是不是少安裝什麼東西,
載入資料庫的程式碼都一直出現未定義! 表情 (有照VB研究小站裡的寫)

獻花 x0
引用 | 編輯 三仙
2009-05-15 01:33
9樓
  
 
下面是引用 catname 於 2009-05-14 20:21 發表的 : 到引言文
放棄連資料庫了,
決定把資料先放在程式碼裡(陣列)! 表情

不知道是不是少安裝什麼東西,
載入資料庫的程式碼都一直出現未定義! 表情 (有照VB研究小站裡的寫)


1.放棄連資料庫
A.這麼快就放棄了哦表情

2.載入資料庫的程式碼都一直出現未定義
A.未定義??你的步驟能夠說一下嗎表情

獻花 x0
引用 | 編輯 catname
2009-05-15 09:43
10樓
  
下面是引用 三仙 於 2009-05-15 01:33 發表的 : 到引言文
 

1.放棄連資料庫
A.這麼快就放棄了哦表情

2.載入資料庫的程式碼都一直出現未定義
A.未定義??你的步驟能夠說一下嗎表情


1.因為時間快來不及了@@"
  所以只能先放棄使用連結資料庫這個方法...

2.

首先我打了這段程式碼載入資料庫,


Private Sub Command1_Click
  Set Cn = CreateObject("ADODB.Connection")
  Set Rs = CreateObject("ADODB.Recordset")
End Sub


是Cn和Rs 出現綠色彎曲底線。(我想是下面要再用到Cn和Rs底線才會消失)

之後我試了VB研究小站 提供的 "透過OLEDB載入MDB資料庫" 程式碼,
但是它的 ADODB.Connection 和 ADODB.Recordset 一直出現有藍色彎曲底線,
(型別 'ADODB.Connection' 未定義 和型別 'ADODB.Connection' 未定義)
然後 ADODB.Connection 有建議我應該改成 Odbc.OdbcConnection 或 Data.Odbc.OdbcConnection 或 OleDb.OleDbConnection 或 Data.OleDbConnection
ADODB.Recordset 則沒有建議,只顯示未定義。

VB研究小站有提供另外一個連資料庫的方法,但是我一直找不到它上面說的引用項目,所以這個方法就不能用。

所以可能是我哪裡沒有設定好,或是哪個東西沒有安裝的問題吧! 表情


知道不能一步登天,
但時間急迫,
所以就先放棄連資料庫了! 表情

現在是用 Select Case 方法把資料打上去,再做連結!

獻花 x0
引用 | 編輯 catname
2009-05-15 12:41
11樓
  

這是目前設計的頁面,
"上一題"、"下一題"和"答案"的 Button 都可以按了。
答案可以顯示對或錯。

我想到,
設一組陣列來儲存每一題的分數,
最後再將陣列裡的分數做加總!

但有一個問題是,

假如我在第一題選第二個選項後再按下一題的選項會停留在第二個選項,
又假如在第二題選了第一個選項後,
想要再回上一題更改選項,
會發現原先的第一個的選項會發現變成第一個選項!

不知道要怎麼把RadioButton的選項傳到我設的陣列裡。

怎樣固定 RadioButton ?

獻花 x0
引用 | 編輯 三仙
2009-05-15 14:02
12樓
  

圖 1.
單選題目與答案1
圖 2.
單選題目與答案2
圖 3.
vb6.0程式碼
圖 4.
access題庫1
圖 5.
access題庫2

資料亂數取樣不多
所以放棄多按幾次就會跑第二題了
圖片的部份供你參考
完整的程式等我市場批貨回來
再開新帖上傳

獻花 x1
引用 | 編輯 三仙
2009-05-15 17:52
13樓
  
下面是引用 catname 於 2009-05-15 12:41 發表的 : 到引言文
[attachment=520623]
這是目前設計的頁面,
"上一題"、"下一題"和"答案"的 Button 都可以按了。
答案可以顯示對或錯。

我想到,
設一組陣列來儲存每一題的分數,
最後再將陣列裡的分數做加總!

但有一個問題是,

假如我在第一題選第二個選項後再按下一題的選項會停留在第二個選項,
又假如在第二題選了第一個選項後,
想要再回上一題更改選項,
會發現原先的第一個的選項會發現變成第一個選項!

不知道要怎麼把RadioButton的選項傳到我設的陣列裡。

怎樣固定 RadioButton ?


你講得很亂表情
不過不知道要怎麼把RadioButton的選項傳到我設的陣列裡
這個建議你用click事件來處理

獻花 x1
引用 | 編輯 catname
2009-05-15 19:22
14樓
  
非常感謝你! 表情

但是都會有藍色的彎曲底線...

我想會不會是 VB6 和 VB2005 的寫法是不一樣的呢?

獻花 x0
引用 | 編輯 三仙
2009-05-15 22:17
15樓
  

圖 1.
VB2003部份截圖,cn並無錯誤,供你參考

下面是引用 catname 於 2009-05-15 19:22 發表的 : 到引言文
非常感謝你! 表情

但是都會有藍色的彎曲底線...

我想會不會是 VB6 和 VB2005 的寫法是不一樣的呢?


上一篇的程式碼是可以將VB6.0轉成2003的

其他版本照理說應該也是可以的吧

M$的東西大概都是"向下"相容

獻花 x1
引用 | 編輯 catname
2009-05-16 14:02
16樓
  






   

我發現 VB2005 有個內建的自動升級 VB6 的程式碼,

但升級完後 connection 還是會有藍色彎曲底線! @@"

然後 set 打上去後,會自動消失~~

獻花 x0
引用 | 編輯 三仙
2009-05-16 18:31
17樓
  

圖 1.
引用adodc元件1.jpg
圖 2.
定義adodb時出視的下拉選項.jpg
圖 3.
定義adodb時出視的下拉選項2.jpg
圖 4.
定義adodb時出視的下拉選項3.jpg
圖 5.
定義完成.jpg

下面是引用 catname 於 2009-05-16 14:02 發表的 : 到引言文






   

我發現 VB2005 有個內建的自動升級 VB6 的程式碼,

但升級完後 connection 還是會有藍色彎曲底線! @@"

然後 set 打上去後,會自動消失~~


我看了你的圖後
才發現你沒有引用元件
上傳引用方法供你參考

獻花 x1