Bài 3: Web server control

Bài WEB SERVER CONTROL HTML Control Điều khiển HTML (tag HTML) trang ASP.Net xem chuỗi văn bình thường Để sử dụng lập trình phía Server, ta gán thuộc tính runat="Server" cho điều khiển HTML Những điều khiển HTML (tag HTML) có thuộc tính runat="Server" gọi HTML Server Control Các điều khiển HTML công cụ Để chuyển điều khiển HTML thành điều khiển HTML Server, ta chọn Run As Server Control từ thực đơn ngữ cảnh Chuyển điều khiển HTML thành điều khiển HTML Server Ví dụ: Các điều khiển HTML: Label, Textbox, Button Xử lý kiện: Private Sub butTong_ServerClick(…) … txtTong.Value = Val(txtA.Value) + Val(txtB.Value) End Sub Khi thi hành ứng dụng Ví dụ: Upload file với điều khiển HTML File Field Trong ví dụ sau, thực Upload tập tin lên server, cụ thể hơn, tập tin vừa Upload lưu thư mục Upload Chú ý: Để chép tập tin lên thư mục Upload, bạn cần phải cấp quyền cho phép ghi thư mục Upload Màn hình chế độ thiết kế Xử lý kiện: Private Sub butUpload_ServerClick(…, e … ) … Dim sTap_tin As String Dim sTen_file As String sTap_tin = fileTap_tin.PostedFile.FileName 'Phân tích đường dẫn tập tin để lấy tên tập tin sTen_file = sTap_tin.Substring(sTap_tin.LastIndexOf("\") + 1, sTap_tin.Length - sTap_tin.LastIndexOf("\") + 1)) 'Thực chép tập tin lên thư mục Upload fileTap_tin.PostedFile.SaveAs(Server.MapPath("Upload\") & sTen_file) lblThong_bao.InnerHtml = "Thông báo: Bạn upload file thành công" End Sub 2.Asp.Net Web Control Asp.Net Page Đây thành phần giao diện, nơi chứa điều khiển, sử dụng để thể nội dung trang web đến người dùng Sự kiện Chuỗi kiện đối tượng Page Init Sự kiện Page_Init xảy trang web yêu cầu Private Sub Page_Init(…) Handles MyBase.Init 'Do not modify it using the code editor InitializeComponent() End Sub Load Sự kiện nơi mà bạn đặt phần lớn xử lý, giá trị khởi động ban đầu cho trang web Sự kiện xảy trang web yêu cầu Private Sub Page_Load(…) Handles MyBase.Load 'Put user code to initialize the page here End Sub PreRender Sự kiện xảy trang Web chuẩn bị trả cho Client Private Sub Page_PreRender(ByVal sender As Object, …) Handles MyBase.PreRender End Sub Unload Sự kiện đối lập với kiện Page_Init Nếu kiện Page_Init xảy trang Web yêu cầu, đây, Page_Unload xự kiện sau cùng, xảy sau tất kiện khác Private Sub Page_Unload(ByVal sender As Object, …) Handles MyBase.Unload End Sub Thuộc tính IsPostBack Đây thuộc tính kiểu luận lý Giá trị thuộc tính cho biết trạng thái trang Web Load, lần Load đầu tiên, giá trị thuộc tính = False Thuộc tính thường sử dụng kiện Page_Load để kiểm tra trạng thái trang Web Private Sub Page_Load(…) Handles MyBase.Load 'Put user code to initialize the page here If Not IsPostBack Then lblPostBack.Text = "Đây lần yêu cầu đầu tiên" Else lblPostBack.Text = "Đây lần yêu cầu sau." End If End Sub SmartNavigation Trong trường hợp nội dung trang Web vượt kích thước hiển thị hình bạn đọc phần trang Web, ReLoad lại, hình hiển thị phần đầu trang Web Nếu giá trị thuộc tính True, trình duyệt Web giữ ngun vị trí mà bạn đọc sau Reload Đây thuộc tính kiểu luận lý Giá trị mặc định False Điều khiển Dưới lý bạn nên sử dụng ASP.Net Web Control: -Đơn giản, tương tự điều khiển Windows Form -Đồng nhất: Các điều khiển Web server có thuộc tính giống  dễ tìm hiểu sử dụng -Hiệu quả: Các điều khiển Web Server tự động phát sinh tag HTML theo loại Browser Bảng liệt kê thuộc tính chung Web control Thuộc tính Kiểu Ý nghĩa (ID) Chuỗi Qui định tên điều khiển Tên điều khiển AccessKey String Qui định ký tự để di chuyển nhanh đến điều khiển - ký tự xử lý phím nóng Attributes AttributeCollection Tập hợp thuộc tính điều khiển HTML BackColor Color Qui định màu điều khiển BorderColor Color Qui định màu đường viền điều khiển BorderStyle BorderStyle Qui định kiểu đường viền điều khiển BorderWidt h Unit Qui định độ rộng đường viền CssClass String Qui định hình thức hiển thị điều khiển qua tên CSS Enabled Boolean Qui định điều khiển có hiển thị hay không Giá trị mặc định thuộc tính True – phép hiển thị Font FontInfo Qui định Font hiển thị cho điều khiển ForeColor Color Qui định màu chữ hiển thị điều khiển Height Unit Qui định chiều cao điều khiển ToolTip String Dòng chữ hiển thị rê chuột vào điều khiển Width Unit Qui định độ rộng điều khiển Label Label thường sử dụng để hiển thị trình bày nội dung trang web Nội dung hiển thị label xác định thông qua thuộc tính Text Thuộc tính Text nhận hiển thị nội dung với tag HTML Ví dụ: lblA.Text = "Đây chuỗi văn thường" lblB.Text = "Còn chuỗi văn in đậm" HyperLink Điều khiển sử dụng để tạo liên kết siêu văn Các thuộc tính -ImageURL: Qui định hình hiển thị điều khiển -Text: Chuỗi văn hiển thị điều khiển Trong trường hợp thuộc tính ImageURL Text thiết lập, thuộc tính ImageURL ưu tiên, thuộc tính Text hiển thị Tooltip -NavigateUrl: Đường dẫn cần liên kết đến -Target: Xác định cửa sổ hiển thị cho mối liên kết -_blank: Hiển thị trang liên kết cửa sổ -_self: Hiển thị trang liên kết cửa sổ chứa liên kết -_parent: Hiển thị trang liên kết frame cha Ví dụ: hplASP_net.Text = "Trang chủ ASP.Net" hplASP_net.ImageUrl = "Hinh\Asp_net.jpg" hplASP_net.NavigateUrl = "http://www.asp.net" hplASP_net.Target = "_blank" Kết hiển trị trang Web TextBox TextBox điều khiển dùng để nhập hiển thị liệu TextBox thường sử dụng nhiều với ứng dụng windows form Các thuộc tính +Text: Nội dung chứa Textbox +TextMode: Qui định chức Textbox, có giá trị sau: -SingleLine: Hiển thị nhập liệu dòng văn -MultiLine: Hiển thị nhập liệu nhiều dòng văn -Password: Hiển thị dấu * thay cho ký tự có Textbox +Rows: Trong trường hợp thuộc tính TextMode = MultiLine, thuộc tính Rows qui định số dịng văn hiển thị +Maxlength: Qui định số ký tự tối đa nhập vào cho TextBox +Wrap: Thuộc tính qui định việc hiển thị văn có phép tự động xuống dịng kích thước ngang của điều khiển không đủ để hiển thị dòng nội dung văn Giá trị mặc định thuộc tính True - tự động xuống dịng Ví dụ: +AutoPostBack: Thuộc tính qui định điều khiển có phép tự động PostBack Server nội dung Textbox bị thay đổi hay không Giá trị mặc định thuộc tính False - khơng tự động Postback Image Điều khiển dùng để hiển thị hình ảnh lên trang Web Thuộc tính +ImageURL: Đường dẫn đến tập tin hình ảnh cần hiển thị +AlternateText: Chuỗi văn hiển thị tập tin thiết lập thuộc tính ImageURL khơng tồn +ImageAlign: Vị trí hiển thị hình nội dung văn -NotSet -Left -Middle -TextTop -Right Button, ImageButton, LinkButton Các điều khiển Button, ImageButton, LinkButton mặc định nút Submit Button, nhấn vào PostBack Server Khi thiết lập giá tri thuộc tính CommandName cho điều khiển này, gọi tên chung cho điều khiển Command Button Các thuộc tính chung Button, ImageButton, LinkButton Thuộc tính Ý nghĩa Text Chuỗi văn hiển thị điều khiển CommandName Tên lệnh Được sử dụng kiện Command CommandArgument Thông tin bổ sung cho kiện Command CausesValidation Trang web mặc định kiểm tra tính hợp lệ liệu PostBack Các điều khiển Button, ImageButton, LinkButton PostBack Server nhấn  ln kiểm tra tính hợp lệ liệu trang web Muốn trang Web bỏ qua việc kiểm tra liệu nhấn, gán trị cho thuộc tính = False Giá trị mặc định thuộc tính True Chúng ta tìm hiểu thuộc tính CommandName CommandArgument phần sau Ngồi thuộc tính trên, điều khiển ImageButton cịn có thuộc tính ImageURL, ImageAlign AlternateText điều khiển Image Button, LinkButton ImageButton Listbox DropdownList ListBox DropdownList điều khiển hiển thị danh sách lựa chọn mà người dùng chọn nhiều (chỉ dành cho ListBox) Các mục lựa chọn thêm vào danh sách thông qua lệnh cửa sổ thuộc tính (Property Windows) Các thuộc tính +AutoPostBack: Thuộc tính qui định điều khiển có phép tự động PostBack Server số mục chọn bị thay đổi Giá trị mặc định thuộc tính False - không tự động Postback +Items Đây tập hợp chứa mục chọn điều khiển Ta thêm vào mục chọn vào thời điểm thiết kế thông qua cửa sổ ListItem Collection Editor, thông qua lệnh +Rows: Qui định chiều cao ListBox theo số dịng hiển thị +SelectionMode: Thuộc tính xác định cách thức chọn mục ListBox SelectionMode phép thay đổi trình thiết kế, vào lúc thực thi chương trình, thuộc tính đọc -Single: Chỉ chọn mục có danh sách (mặc định) -Multiple: Cho phép chọn nhiều lựa chọn Xử lý mục chọn Các thuộc tính sau giúp bạn xác định số, giá trị mục chọn Trong trường hợp điều khiển cho phép chọn nhiều, ta duyệt qua Item tập hợp Items, sử dụng thuộc tính Selected đối tượng Item để kiểm tra xem mục có chọn hay khơng (Xem ví dụ trang kế tiếp) +SelectedIndex: Cho biết số mục chọn Trong trường hợp chọn nhiều mục, SelectedIndex trả số mục chọn +SelectedItem: Cho biết mục chọn Trong trường hợp chọn nhiều mục, SelectedItem trả mục chọn +SelectedValue: Cho biết giá trị mục chọn Trong trường hợp chọn nhiều mục, SelectedValue trả giá trị mục chọn Tìm hiểu tập hợp Items +Add: Thêm mục vào cuối danh sách, sử dụng phương thức Items.Add Items.Add() Items.Add() +Insert: Thêm mục vào danh sách vị trí đó, sử dụng phương thức Items.Insert Items.Insert(,) Items.Insert(,) +Count: Trả số mục (Item) có danh sách Items.Count +Contains: Kiểm tra xem Item có tập hợp Items hay chưa, có, phương thức trả giá trị True, ngược lại, trả False Items.Contains() +Remove: Xóa đối tượng Item khỏi danh sách Items.Remove() Items.Remove() -Trong trường hợp đối tượng Item kiểu chuỗi, ta truyền vào chuỗi để xóa Nếu có nhiều giá trị giống danh sách, có mục chọn bị xóa -Trong trường hợp đối tượng Item đối tượng, ta truyền vào biến tham chiếu đến item cần xóa +RemoveAt: Xóa item vị trí index khỏi danh sách Items.RemoveAt() +Clear: Phương thức Clear tập hợp Items dùng để xóa tất Item có danh sách Cú pháp Items.Clear Ví dụ: Điều khiển danh sách lstKhu_dl: SelectionMode=Multiple, Rows=4 Khi thiết kế Xử lý kiện: Private Sub Page_Load(…) Handles MyBase.Load If Not IsPostBack Then lstKhu_dl.Items.Add("Vịnh Hạ Long") lstKhu_dl.Items.Add("Phan Thiết - Mũi Né") lstKhu_dl.Items.Add("Nha Trang") lstKhu_dl.Items.Add("Đà Lạt") End If End Sub Private Sub butChon_dia_diem_Click(…) …… Dim i As Integer lblDia_diem.Text = "" For i = To lstKhu_Dl.Items.Count - If lstKhu_dl.Items(i).Selected Then lblDia_diem.Text &= lstKhu_dl.Items(i).Text() & "" End If Next End Sub Khi thi hành Checkbox, RadioButton Các thuộc tính +Checked: Cho biết trạng thái mục chọn - có chọn hay khơng +TextAlign: Qui định vị trí hiển thị điều khiển so với chuỗi văn +AutoPostBack: Thuộc tính qui định điều khiển có phép tự động PostBack Server mục chọn điều khiển bị thay đổi Giá trị mặc định thuộc tính False - khơng tự động Postback +GroupName (RadioButton): Tên nhóm Thuộc tính sử dụng để nhóm điều khiển RadioButton lại thành nhóm Ví dụ Nhóm RadioButton Giới tính, Thu nhập Danh sách điều khiển Điều khiển Loại chkAnh_van CheckBox chkPhap_van RadioButton Giá trị CheckBox rbtNam Thuộc tính Checked True Checked True GroupName Gioi_tinh rbtNu RadioButton GroupName Gioi_tinh rbtThu_nhapA RadioButton GroupName Thu_nhap rbtThu_nhapB RadioButton Checked True GroupName rbtThu_nhapC RadioButton GroupName Thu_nhap Thu_nhap Tạo nhóm cho điều khiển RadioButton CheckBoxList, RadioButtonList Hai điều khiển dùng để tạo nhóm CheckBox/Radio Button Do điều khiển danh sách nên có thuộc tính Items chứa tập hợp mục chọn ListBox/DropDownList Các thao tác tập hợp Items, xử lý mục chọn tương tự ListBox/DropDownList Các thuộc tính -RepeatColumns: Qui định số cột hiển thị -RepeatDirection: Qui định hình thức hiển thị -Vertical: Theo chiều dọc -Horizontal: Theo chiều ngang -AutoPostBack: Thuộc tính qui định điều khiển có phép tự động PostBack Server mục chọn điều khiển bị thay đổi Giá trị mặc định thuộc tính False - khơng tự động Postback Ví dụ Xử lý kiện: Private Sub rblThu_nhap_SelectedIndexChanged(…)… lblThu_nhap.Text = "Bạn chọn thu nhập: " & _ rblThu_nhap.SelectedItem.Text End Sub Liên kết liệu với điều khiển ListBox, DropDownList, CheckBoxList, RadioButtonList Ví dụ: Liên kết liệu với Sortedlist Xử lý kiện: Private Sub Page_Load(…) Handles MyBase.Load If Not IsPostBack Then Dim Ds_Binh_chon As New SortedList Ds_Binh_chon.Add("1", "Nhắn tin SMS") Ds_Binh_chon.Add("2", "Chụp hình") Ds_Binh_chon.Add("3", "Nghe Radio") Ds_Binh_chon.Add("4", "Nghe nhạc MP3") Ds_Binh_chon.Add("5", "Xem Video Clip") Ds_Binh_chon.Add("6", "Lưu trữ") Ds_Binh_chon.Add("7", "Ghi âm") Ds_Binh_chon.Add("8", "Chơi game") Ds_Binh_chon.Add("9", "Internet") rblBinh_chon.DataSource = Ds_Binh_chon rblBinh_chon.DataTextField = "Value" rblBinh_chon.DataValueField = "Key" rblBinh_chon.DataBind() End If End Sub Private Sub rblBinh_chon_SelectedIndexChanged(…) lblBinh_chon.Text = "Bạn chọn chức số " & _ rblBinh_chon.SelectedItem.Value End Sub Thể thăm dị ý kiến Trong ví dụ trên, tạo danh sách bình chọn thơng qua đối tượng SortedList Đối tượng SortedList dùng để lưu trữ danh sách đối tượng tự động xếp đối tượng theo giá trị thuộc tính khóa Để liên kết điều khiển với đối tượng liệu (ở ví dụ đối tượng SortedList), ta sử dụng thuộc tính DataSource để lấy nguồn liệu .DataSource = Hai thuộc tính quan trọng khơng thể thiếu việc thực liên kết liệu là: DataTextField DataValueField DataTextField tên thuộc tính (hoặc tên field) đối tượng liệu mà ta muốn hiển thị DataValueField tên thuộc tính (hoặc tên field) chứa giá trị mà ta muốn nhận người dùng thực chọn mục điều khiển (thơng qua thuộc tính SelectedValue hay SelectedItem.Value) Để hiển thị liệu lên điều khiển trang Load, sử dụng phương thức DataBind Đối tượng ViewState Đối tượng ViewState cung cấp để lưu lại thông tin trang web sau web server gởi kết cho Client Mặc định, trang web tạo cho phép sử dụng đối tượng ViewState thơng qua thuộc tính EnableViewState (của trang web) = True Gán giá trị cho ViewState: ViewState("Tên trạng thái") = Nhận giá trị từ đối tượng ViewState: = ViewState("Tên trạng thái") Ví dụ: Xử lý kiện: Private Sub Page_Load(…) Handles MyBase.Load If Not IsPostBack Then ViewState("So_lan") = Else ViewState("So_lan") += End If lblTB.Text = "Số lần Postback: " + CStr(ViewState("So_lan")) End Sub Private Sub butDem_Click() Handles butDem.Click lblTB.Text = "Số lần Postback: " + CStr(ViewState("So_lan")) End Sub Về chất, giá trị đối tượng ViewState lưu điều khiển hidden giá trị mã hóa Đối tượng ViewState giúp giảm bớt công sức việc lưu trữ truy xuất thông tin mà sử dụng nhiều điều khiển hidden Chọn chức View | Source từ browser Một số điều khiển khác Điều khiển Literal Tương tự điều khiển Label, điều khiển Literal sử dụng để hiển thị chuỗi văn trang Web Nếu muốn hiển thị chuỗi văn trang Web, đánh nội dung trực tiếp vào trang Web mà không cần phải sử dụng điều khiển Chỉ sử dụng điều khiển Labe l, Literal để hiển thị cần thay đổi nội dung hiển thị phía server Điểm khác biệt Label Literal hiển thị nội dung lên trang web (lúc thi hành), điều khiển Literal không tạo thêm tag Html cả, Labe l tạo tag span (được sử dụng để lập trình phía client) Ví dụ: Khi thiết kế Khi thi hành Lệnh xử lý: Private Sub Page_Load(…) Handles MyBase.Load lblLabel.Text = "Đây chuỗi Label" ltrLiteral.Text = "Còn chuỗi Literal" End Sub Chọn chức từ thực đơn View | Source Browser: Đây chuỗi Label Còn chuỗi văn Literal Điều khiển Panel PlaceHolder Hai điều khiển Panel PlaceHolder sử dùng để chứa điều khiển khác Thuộc tính thường dùng điều khiển Visible Nếu giá trị thuộc tính = True, điều khiển chứa bên hiển thị, ngược lại (Visible = False), khơng có điều khiển chứa bên hiển thị Tuy nhiên, điều khiển Panel cho phép kéo điều khiển vào bên lúc thiết kế, cịn điều khiển PlaceHolder khơng Để thêm điều khiển vào bên lúc thi hành, phải thực thơng qua tập hợp Controls điều khiển: Ví dụ: Dim txtSo_A As New TextBox pnl.Controls.Add(txtSo_A) Điều khiển Table Điều khiển Table thường sử dụng để hiển thị liệu theo dòng lệnh cài đặt Điều khiển tạo thành từ tập hợp dịng (thơng qua thuộc tính Rows) - TableRow, dịng tạo thành từ tập hợp ô (thông qua thuộc tính Cells) – TableCell Mỗi - cell (TableCel) Table điều khiển chứa điều khiển khác Ta thao tác với điều khiển ô thông qua tập hợp Controls Ví dụ: Sử dụng điều khiển Table Màn hình thiết kế Xử lý kiện: Private Sub Page_Load(…, e … ) Handles MyBase.Load Ve_bang(3, 3) End Sub Public Sub Ve_bang(ByVal pSo_dong As Integer, ByVal pSo_cot As Integer) Dim r%, c% Dim tr As TableRow, td As TableCell 'Tiến hành tạo bảng liệu For r = To pSo_dong - tr = New TableRow tr.Height = New Unit(20) For c = To pSo_cot - td = New TableCell If r = c Then 'Xử lý thêm Textbox Dim txtTextbox As New TextBox txtTextbox.Text = "Dòng " & r & " cột " & c txtTextbox.BackColor = Color.Yellow txtTextbox.Width = New Unit(90) td.Controls.Add(txtTextbox) Else td.Text = "Dòng " & r & " cột " & c End If tr.Cells.Add(td) Next c tblBang.Rows.Add(tr) Next r End Sub Màn hình thi hành Điều khiển AdRotator Điều khiển AdRotator dùng để tạo banner quảng cáo cho trang web, tự động thay đổi hình ảnh (đã thiết lập trước) có u cầu, PostBack server Thuộc tính AdvertisementFile: Tên tập tin liệu (dưới dạng xml) cho điều khiển Dưới cú pháp tập tin Advertisement (*.xml) Đường dẫn đến tập tin hình ảnh Đường dẫn đến liên kết Chuỗi văn hiển thị Tooltip Từ khóa dùng để lọc hình ảnh Tần suất hiển thị hình ảnh Lưu ý: Phải nhập giá trị tag mẫu Các giá trị tag có phân biệt chữ Hoa chữ thường Trong +ImageUrl: Đường dẫn đến tập tin hình ảnh +NavigateUrl: Đường dẫn đến trang web liên kết đến người dùng nhấn vào hình ảnh hiển thị +AlternateText: Giá trị hiển thị đường dẫn đến tập tin hình ảnh (qua thuộc tính NavigateUrl) khơng tồn Đối với số trình duyệt, tham số hiển thị ToolTip hình quảng cáo +Keyword: Được dùng để phân loại quảng cáo Thông qua giá trị này, ta lọc quảng cáo theo điều kiện +Impressions: Tham số định tầng suất hiển thị hình ảnh Giá trị lớn, khả hiển thị nhiều +KeywordFilter: Được dùng để chọn lọc hiển thị hình quảng cáo có giá trị tham số Keyword = giá trị tham số Giá trị tham số mặc định không thiết lập  Hiển thị tất hình có tập tin XML Trong trường hợp khơng có hình có giá trị Keyword giá trị thuộc tính này, khơng có hình hiển thị +Target: Qui định cửa sổ hiển thị trang liên kết -_blank: Trang liên kết mở cửa sổ -_self: Trang liên kết mở cửa sổ chứa điều khiển -_parent: Trang liên kết mở cửa sổ cha Sự kiện AdCreated: Xảy điều khiển tạo quảng cáo Ví dụ: Tạo Quảng cáo sử dụng điều khiển AdRotator Bước 1.Thiết kế giao diện Bước 2.Tạo tập tin liệu: Hinh.xml -Sử dụng chức Add New Item… từ thực đơn ngữ cảnh -Chọn XML File hộp thoại Add New Item -Nhập vào cú pháp qui định cho tập tin Hinh.xml (theo cú pháp tập tin Advertisement) Hinh\Asp_net.jpg http://www.asp.net Trang chủ Asp.net Hoc_tap 10 -Chuyển hình qua trang Data, nhập liệu trực tiếp hình Nhập thơng tin hình ảnh quảng cáo Bước 3.Thiết lập thuộc tính cho điều khiển adQuang_cao -AdvertisementFile: Hinh.xml -Target: _blank  Khi nhấn vào hiển thị liên kết cửa sổ -KeywordFilter: Khơng thiết lập  Hiển thị tất hình ảnh Bước Thi hành ứng dụng Khi thi hành Điều khiển Calendar Một điều chắn điều khiển Calendar quen thuộc với bạn lập trình ứng dụng windows, có giao diện trực quan, vậy, người dùng chọn ngày dễ dàng Thuộc tính +DayHeaderStyle: Qui định hình thức hiển thị tiêu đề ngày tuần +DayStyle: Qui định hình thức hiển thị ngày điều khiển +NextPrevStyle: Qui định hình thức hiển thị tháng trước/sau tháng chọn +SeleltedDayStyle: Qui định hình thức hiển thị ngày chọn +SeleltedDate: Giá trị ngày chọn điều khiển +TitleStyle: Qui định hình thức hiển thị dòng tiêu đề tháng chọn +TodayDayStyle: Qui định hình thức hiển thị ngày hành (trên server) +WeekendDayStyle: Qui định hình thức hiển thị ngày cuối tuần (thứ 7, chủ nhật) +OtherMonthDayStyle: Qui định hình thức hiển thị ngày khơng nằm tháng hành Sự kiện +SelectionChanged: Xự kiện xảy bạn chọn ngày khác với giá trị ngày chọn hành +VisibleMonthChanged: Xự kiện xảy bạn chọn tháng khác với tháng hành Ví dụ: Khi thiết kế Xử lý kiện: Private Sub Page_Load(…) Handles MyBase.Load lblHom_nay.Text = "Hôm ngày " & Date.Today.ToString("dd/MM/yyyy") End Sub Private Sub calLich_SelectionChanged(…) Handles… Dim lSo_ngay As Integer lSo_ngay = Math.Abs(DateDiff(DateInterval.Day, Date.Today, calLich.SelectedDate)) If calLich.SelectedDate > Date.Today Then lblThong_bao.Text = "Còn " & lSo_ngay & ngày đến ngày sinh nhật bạn." ElseIf calLich.SelectedDate = Date.Today Then lblThong_bao.Text = "Hôm ngày sinh nhật bạn" Else lblThong_bao.Text = "Sinh nhật bạn qua " & lSo_ngay & " ngày." End If End Sub ... dụng ASP.Net Web Control: -Đơn giản, tương tự điều khiển Windows Form -Đồng nhất: Các điều khiển Web server có thuộc tính giống  dễ tìm hiểu sử dụng -Hiệu quả: Các điều khiển Web Server tự động... lưu lại thông tin trang web sau web server gởi kết cho Client Mặc định, trang web tạo cho phép sử dụng đối tượng ViewState thơng qua thuộc tính EnableViewState (của trang web) = True Gán giá trị... CausesValidation Trang web mặc định kiểm tra tính hợp lệ liệu PostBack Các điều khiển Button, ImageButton, LinkButton PostBack Server nhấn  ln kiểm tra tính hợp lệ liệu trang web Muốn trang Web bỏ qua việc