Tự học lập trình cơ sở dữ liệu với Visual Basic 5 trong 21 ngày ấn phẩm 2


Những nguyên tắc cho các kiểu form của Win95



tải về 0.58 Mb.
trang13/13
Chuyển đổi dữ liệu26.04.2018
Kích0.58 Mb.
#37160
1   ...   5   6   7   8   9   10   11   12   13



Những nguyên tắc cho các kiểu form của Win95.
Có một vài các quy tắc chung đối với sự phát triển các kiểu form của Win95. Các khu vực chính được cân nhắc như danh sách trong bảng 4.2. Bảng này mô tả những khổ chuẩn được đề nghị của Microsoft cho các điều khiển của form. Nó cũng bao hàm khoảng trắng cho các điều khiển này được đề nghị. Tham khảo hình 4.1 khi đang đọc đoạn này. Hình này cho bạn xem một ví dụ của một mục nhập dữ liệu mà nó được xây dựng được sử dụng các cái chuẩn của Win95 được mô tả trong đoạn này.
Hình 4.11 : Một kiểu form nhập của Win95 :
Màu của form mặc định khi bạn lần đầu tiên bắt đầu với form, đặt thuộc tính BackColor của nó là light gray. Đặt thuộc tính BackStyle cho các Label là Transparent do vậy mầu nền có thể trông trong suốt. Đối với các điều khiển không có thuộc tính BackStyle ( ví dụ như Checkbox và Radio ), hãy đặt thuộc tính BackColor là light gray. Những tông màu gray là dễ dàng hơn trong việc đọc các ánh sáng khác nhau. Việc sử dụng các tông màu gray cũng làm giảm các sự cố mà một người sử dụng đã tải qua những màu mù sẽ có những sự khó khăn với màn hình nhập của bạn. Việc sử dụng điều khiển SSPanel để đưa các vùng nhập lên một vị trí hiện thị tất cả các điều khiển. Đừng đặt các nút hoặc điều khiển dữ liệu trên bảng màu (palette) trừ phi chúng hành động như một phần của hộp hội thoại nhập ( xem hình 4.11 ). Chỉ sử dụng một bảng màu trên form. Bảng màu không giống như một bố cục quanh một bộ các điều khiển. SSPanel là một điều khiển Sheridan 3D. Nó có thể không xuất hiện trong hộp công cụ (toolbox) của bạn khi lần đầu tiên bắt đầu với Visual Basic 5. Để thêm nó vào, hãy kích chuột phải vào Toolbox và chiọn Component... Bây giờ hãy lấy vào một đánh dấu tiếp theo đến các điều khiển Sheridan 3D. Nếu bạn không nhìn thấy các điều khiển Sheridan 3D thì kích vào nút Browse và tìm tập tin cho chúng –THREED32.OCX. Font mặc định sử dụng 8 point sans serif, regular (not bold ) như font mặc định cho tất cả các điều khiển. Nếu bạn sử dụng kiểu lớn hơn cho một tiêu đề, cho ví dụ, hãy làm đơn giản thôi. (thiếu ?)
Hình 4.12 : Đề án color-switching.
Bảng 4.3 : Các điều khiển cho Đề án color-switching :


Control

Property

Setting

Form

Caption

Color-Switching




Name

FrmColor

SSPanel

Caption

(set to blank)




Name

PnlPalette

Text box

Name

TxtOneLine




FontBold

False




Height

300




Width

1800

SSPanel

Name

PnlDisplayOnly




FontBold

False




Height

300




Width

1800




Caption

SSPanel1




BevelInner

1 – Inset




BorderWidth

1




Alignment

1 – LeftMiddle

Label

Caption

Prompt1:




FontBold

False




BackStyle

2 – Transparent

Label

Caption

Prompt2:




FontBold

False




BackStyle

2 – Transparent

Data Control

Caption

Data




FontBold

False




Height

300




Width

1800

Command Button

Name

CmdDefault




Caption

&Default




FontBold

False




Height

300




Width

1200

Command Button

Name

CmdSystem




Caption

&System




FontBold

False




Heigth

300




Width

1200

Command Button

Name

CmdCustom




Caption

&Custom




FontBold

False




Height

300




Width

1200

Command Button

Name

CmdExit




Caption

E&xit




FontBold

False




Height

300




Width

1200

Hãy lưu form là COLORS.FRM và đề án là COLORS.VBP. Bạn đã xây dựng xong một form có ba nút lệnh : Default, System và Custom. Bạn sẽ thêm đoạn mã đến đề án để làm thay đổi sắp xếp màu của từng nút của form. Đầu tiên, bạn sẽ thêm vào đoạn mã đó để đặt màu là mặc định theo Win95 : light gray. Những mầu chuẩn đầu tiên, tạo ra các hằng số giữ các giá trị hex, đây là đoạn mã :


Option Explicit

`

` constant for colors



Const LIGHT_GRAY = &HC0C0C0

Const WHITE = &HFFFFFF

Const BLACK = &H0

Tiếp theo thêm một thủ tục mới, SetColors, mà nó đặt các màu của form. Bởi vì bạn sẽ dùng đoạn mã này để đặt thêm màu, hãy thêm một tham số để gọi nSet đến đầu thủ tục. Đoạn mã sau đặt thuộc tính BackColor của form và điều khiển dữ liệu là light gray :


Sub SetColors (nSet As Integer)

`

` set to default colors



If nSet = 0 Then

pnlDisplayOnly.BackColor = LIGHT_GRAY

pnlPalette.BackColor = LIGHT_GRAY

frmColor.BackColor = LIGHT_GRAY

Data1.BackColor = LIGHT_GRAY

`

txtOneLine.BackColor = WHITE



txtOneLine.ForeColor = BLACK

End If


End Sub
Cuối cùng, hãy thêm một dòng đơn để mặc định nút lệnh thực hiện thủ tục SetColor :
Sub cmdDefault_Click ()

SetColors 0

End Sub
Hãy lưu và chạy đề án. Bây giờ bạn sẽ nhìn thấy màu nền cho form và điều khiển dữ liệu được đặt là light gray khi bạn kích vào nút Dfault. Bạn có thể muốn đặt các màu cho riêng bạn. Đoạn mã sau sẽ làm điều đó. Giả sử bạn muốn mầu nền là red và màu chữ là blue.
Đầu tiên, hãy thêm các hằng cho màu red và màu blue được định nghĩa trong đoạn sau :
Option Explicit

`

` constant for colors



Const LIGHT_GRAY = &HC0C0C0

Const WHITE = &HFFFFFF

Const BLACK = &H0

Const BLUE = &H800000

Const RED = &H80
Tiếp theo, hãy thay đổi thủ tục SetColors bao gồm các mầu mới của bạn. Chú ý rằng bây giờ bạn cần đặt hai thuộc tính ForeColor và BackColor của tất cả các điều khiển theo thuộc tính BackColor của form. Lần này bạn sẽ đặt các màu theo ý thích nếu tham số được đặt là 1. Đây là đoạn mã :
Sub SetColors (nSet As Integer)

`

` set to default colors



If nSet = 0 Then

pnlDisplayOnly.BackColor = LIGHT_GRAY

pnlPalette.BackColor = LIGHT_GRAY

frmColor.BackColor = LIGHT_GRAY

Data1.BackColor = LIGHT_GRAY

`

txtOneLine.BackColor = WHITE



txtOneLine.ForeColor = BLACK

End If


`

` set to custom colors

If nSet = 1 Then

pnlDisplayOnly.BackColor = RED

pnlPalette.BackColor = RED

frmColor.BackColor = RED

Data1.BackColor = RED

`

txtOneLine.BackColor = WHITE



txtOneLine.ForeColor = BLUE

End If


End Sub
Bây giờ hãy thêm đoạn mã sau vào nút Custom :
Sub cmdCustom_Click ()

SetColors 1



End Sub
Hãy lưu và chạy chương trình để xem kết quả




Каталог: file -> downloadfile5 -> 169
file -> CỘng hòa xã HỘi chủ nghĩa việt nam độc lập Tự do Hạnh phúc
file -> CỘng hòa xã HỘi chủ nghĩa việt nam độc lập Tự do Hạnh phúc
file -> TIÊu chuẩn quốc gia tcvn 7790-5 : 2008 iso 2859-5 : 2005
file -> Qcvn 81: 2014/bgtvt
file -> UỶ ban nhân dân cộng hòa xã HỘi chủ nghĩa việt nam
file -> VIỆn chăn nuôi trịnh hồng sơn khả NĂng sản xuất và giá trị giống của dòng lợN ĐỰc vcn03 luậN Án tiến sĩ NÔng nghiệp hà NỘI 2014
downloadfile5 -> Đề tài báo cáo Thực trạng hoạt động quản trị bán hàng và 1 số giải pháp nhằm nâng cao công tác quản trị bán hàng tại công ty A. D. A
downloadfile5 -> English 12 – Vocabulary + Grammar review cách nhận biết từ loại

tải về 0.58 Mb.

Chia sẻ với bạn bè của bạn:
1   ...   5   6   7   8   9   10   11   12   13




Cơ sở dữ liệu được bảo vệ bởi bản quyền ©hocday.com 2024
được sử dụng cho việc quản lý

    Quê hương