ASP.NET專題實務 WebForm + MVC線上教學影片 -- MIS2000Lab.

MIS2000 Lab.已推出20餘本電腦書，曾任資策會專任講師與微軟MVP。自.NET 1.x起，已出版15本ASP.NET (Web Form)書籍，也有遠距教學 線上教程 教學影片

2008-12-01

[習題]CheckBoxList 與 「小」線上測驗系統（線上考試系統、答對得分）

利用 CheckBoxList做一些簡單的練習。
這個範例使用同一段程式碼去修改，就能改出不同花樣！

很多初學者搞不定這樣的範例，都是因為市面上的入門書「忽略」基礎Web控制項
如果連基礎都學不好，都然遇見問題寫不出來啊！

市面上，唯一扎扎實實地

為基礎的 Web控制項，寫了一百多頁的範例與常用屬性，每一個都有提供範例的，
就是我的書 -- ASP.NET專題實務（松崗出版）





不瞞您說，我在 Yahoo知識+ 看到這個問題（如下圖，求人家幫忙寫程式），

第一個感覺跟大家一樣，

這麼基礎、簡單的問題，也敢來問！    

太不用功了，這連基礎都沒學、恐怕連書都沒有翻開看吧？

 

     

 

所謂的「線上問卷」、「線上考試（測驗）」一點都不難。

其實他就是「投票區」加上「得分」功能而已！

我也提供了很多投票區的範例，您可以從這裡學起！

http://www.dotblogs.com.tw/mis2000lab/Tags/%E6%8A%95%E7%A5%A8%E5%8D%80/default.aspx

 

大概過了十分鐘，我突然有另外一種想法。

      如果我能趁這機會，作一連串的小習題，

      把他從不會教到會，那也是一種小小成就。

 

==================================================================

很多初學者搞不定這樣的範例，都是因為市面上的入門書「忽略」  基礎Web控制項  

如果連基礎都學不好，都然遇見問題寫不出來啊！

 

市面上，唯一扎扎實實地

    為基礎的 Web控制項，寫了一百多頁的範例與常用屬性，每一個都有提供範例的，

    就是我的書 （上集）-- ASP.NET 專題實務（.NET 4.0 由松崗出版）

==================================================================

 

 

Web控制項裡面， ChecBox / RaddioButton / ListBox / DropDownList這幾個東西都很類似，用法也都差不多。

廣告一下！請看本書（上集）-- ASP.NET 專題實務（.NET 4.0 由松崗出版）第三章，將近一百頁的說明。隨手COPY一個範例就能解這問題！

 

重點就是：

  • 透過 For迴圈，來找出使用者點選了哪一個子選項？
  • 使用者點選的那個子選項的「值（Value）」是啥？

只要會作上面這兩個東西，問題就解決了！而這兩個東西，程式碼是固定的，Copy回去改一下就好啦～

 

第一個範例，點選後，可以加總計算出得到的總分～

     

 

畫面上的HTML設定，

最重要的是每一個「子選項（ListItem）」的值（Value）與文字（Text）

     

 

後置程式碼如下：

       

      因為 CheckBoxList是一種「複選」功能，我們無法得知使用者到底選了哪幾個子選項？

      所以要透過 For迴圈來運作，每一個子選項（CheckBoxList.Item(第幾個)）都要進去檢查一次

      如果某一個子選項有被點選（.Selected），那就累計這個子選項的分數！

很簡單吧！這段程式COPY回家慢慢用，就像我說的---- ChecBox / RaddioButton / ListBox / DropDownList這幾個東西都很類似，用法也都差不多。

 

 

 

==================================================================

與其給你魚吃，不如教會你釣魚  自己謀生

學會了上面的範例後，下面是一個簡單的小小問卷系統。

每一題都是複選，所以使用 CheckBoxList來作。 

  • 答對了，才有分數。
  • 如果是複選題，必須所有子選項都正確，才能得分（否則這題不算分）

     

 

最後一題，必須複選兩個答案才算正確，才能得分

這部份我作得不太好，請見諒。

     

 

後置程式碼如下：

2011/12/16 修正

01
02     Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
03         Dim u_summary As Integer = 0
04
05         Label1.Text = ""
06         For i As Integer = 0 To (CheckBoxList1.Items.Count - 1)
07             If CheckBoxList1.Items(i).Selected Then
08                 If CheckBoxList1.Items(i).Value <> "0" Then
09                     Label1.Text = "<font color=darkgreen>答對！</font>"
10                     u_summary += CInt(Left(CheckBoxList1.Items(i).Value, 1))
11                 Else
12                     Label1.Text += "<font color=red>有錯誤喔～</font>"
13                 End If
14             End If
15         Next
16         '----------------------------------------------------------------------------
17         Label2.Text = ""
18         For j As Integer = 0 To (CheckBoxList2.Items.Count - 1)
19             If CheckBoxList2.Items(j).Selected Then
20                 If CheckBoxList2.Items(j).Value <> "0" Then
21                     Label2.Text = "<font color=darkgreen>答對！</font>"
22                     u_summary += CInt(Left(CheckBoxList2.Items(j).Value, 1))
23                 Else
24                     Label2.Text += "<font color=red>有錯誤喔～</font>"
25                 End If
26             End If
27         Next
28         '----------------------------------------------------------------------------
29         '-- 這個題目裡面，必須複選兩個才算正確 --
30         Label3.Text = ""
31         Dim u_summary_3 As Integer = 0
32
33         For k As Integer = 0 To (CheckBoxList3.Items.Count - 1)
34             If CheckBoxList3.Items(k).Selected Then
35                 If CheckBoxList3.Items(k).Value <> "0" Then
36                     u_summary_3 += CInt(CheckBoxList3.Items(k).Value)
37                 Else
38                     Label3.Text = "<font color=red>有錯誤喔～</font>"
                           u_summary_3 = 0     '-- 2011/12/16修正
                           Exit For
39                 End If
40             End If
41         Next
42
43         If u_summary_3 = "6" Then
44             Label3.Text += "<font color=darkgreen>答對！</font>"
45         End If
46
47         u_summary += CInt(u_summary_3)
48
49         '----------------------------------------------------------------------------
50         Label_summary.Text = u_summary
51     End Sub

 

真的很難嗎？

真的看過書了嗎？隨便一本ASP.NET的書都會介紹到 Web控制項吧？

 

如果是書本上沒講，那買我的書吧！

    在Web控制項方面，我自認為收錄了不少小範例。不然怎麼湊出100多頁的各種範例？

    一個有用的小範例，可以幫你千變萬化。

    上面的範例不就是第一個 For迴圈不斷修改而成的嗎？

 

不要怕！動手作！

初學者應該多作、少思考！   ......[給初學者的話] 與其想得太多，不如立刻動手作

因為初學者不動手，只是想想而已的東西，都是有害的！沒營養的！

（例如：好難喔，我不會～哪裡有範例可以抄？～～哪個同學已經作完了可以給我抄～～我就是數學不好，所以不會寫程式～～我邏輯不強～～我不是寫程式的料～～）

 

  

如果您是初學者，卻看不懂上面的範例。

    第一，您的基礎不穩，很多基本動作都不熟練。

    第二，我在BLOG上面無法解釋太詳細，這是我的錯。

              BLOG上面放太多圖片，文章排版很容易亂掉。很麻煩、速度也會很慢。

 

永遠不要認為自己看不懂，就是「笨」、就是「沒有寫程式的天分」

別放棄自己！

遇見好的指引、好書的帶領，您也有機會立即開竅！

 

我將思想傳授他人， 他人之所得，亦無損於我之所有；

猶如一人以我的燭火點燭，光亮與他同在，我卻不因此身處黑暗。----Thomas Jefferson

線上課程教學，遠距教學 (Web Form 約 51hr)  https://dotblogs.com.tw/mis2000lab/2016/02/01/aspnet_online_learning_distance_education_VS2015

線上課程教學，遠距教學 (ASP.NET MVC 約 135hr)  https://dotblogs.com.tw/mis2000lab/2018/08/14/ASPnet_MVC_Online_Learning_MIS2000Lab

 

寫信給我，不要私訊 --  mis2000lab (at) yahoo.com.tw  或  school (at) mis2000lab.net

 (1) 第一天 ASP.NET MVC5 完整影片（5.5小時 / .NET 4.x版）免費試聽。影片 https://youtu.be/9spaHik87-A 

 (2) 第一天 ASP.NET Core MVC 完整影片（3小時 / .NET Core 6.0~8.0）免費試聽。影片 https://youtu.be/TSmwpT-Bx4I 

[學員感言] mis2000lab課程評價 - ASP.NET MVC , WebForm  。 https://mis2000lab.medium.com/%E5%AD%B8%E5%93%A1%E6%84%9F%E8%A8%80-mis2000lab%E8%AA%B2%E7%A8%8B%E8%A9%95%E5%83%B9-asp-net-mvc-webform-77903ce9680b  


ASP.NET遠距教學、線上課程（Web Form + MVC）。 第一天課程， "完整" 試聽。 

.........   facebook社團   https://www.facebook.com/mis2000lab   ......................

.........  YouTube (ASP.NET) 線上教學影片  https://www.youtube.com/channel/UC6IPPf6tvsNG8zX3u1LddvA/

 

Blog文章 "附的範例" 無法下載，請看 https://dotblogs.com.tw/mis2000lab/2016/03/14/2008_2015_mis2000lab_sample_download

請看我們的「售後服務」範圍（嚴格認定）。

...................................................................................................................................................... 

ASP.NET MVC  => .NET Core MVC 線上教學  ...... 第一天課程 完整內容 "免費"讓您評估 / 試聽

[遠距教學、教學影片] ASP.NET (Web Form) 課程 上線了！MIS2000Lab.主講   事先錄好的影片，並非上課側錄！   觀看時，有如「一對一」面對面講課。

 

 

 

贊助商連結

BloggerAds