... ôn nầy là statement For i = 0 To lstNames.ListCount - 1. VB6 chỉ tính value của lstNames.ListCount -1 một lần lúc khởi sự For Loop mà thôi (tức là lstNames.ListCount -1 = 6) , nó không lưu ý ... then use this as an indication to force a new page If NumLines > 0 Then ' Add extra blank lines to make up a page before inserting page number For j = NumLines - 1 To MaxLinesPerPage ... hề được processed.Bạn có thể download program có bug nầy để chạy thử cho biết. Sub CmdDeleteSelectedItems_Click cần phải được viết lại để dùng While Loop, thayvì For Loop. Trong While Loop,...
... Solution Trang: 26/ 265 Giáo trình đào t o VisualBasic6. 0ạ 7. 3.3 H p danh sách t p tinộ ậ 78 7. 4 Đi u khi n richtextboxề ể 78 7. 4.1 Ph ng th c loadfileươ ứ 79 7. 4.2 Ph ng th c savefileươ ứ 79 8 S d ... Software Solution Trang:35/ 265 Giáo trình đào t o VisualBasic6. 0ạ13 .6 T o đ i t ng đ thao tác trên c u trúc c a m t CSDLạ ố ượ ể ấ ủ ộ 177 13 .6. 1 T o m t CSDLạ ộ 177 13 .6. 2 S d ng đ i t ng TableDef ... Explorerử ổ 26 3.2.3 T o đ ánạ ề 26 3.2.4 Đ i thu c tính đ ánổ ộ ề 26 3.2.5 L u và đ t tên đ ánư ặ ề 27 FPT Software Solution Trang:1/ 265 Giáo trình đào t o VisualBasic6. 0ạc a VisualBasic cũng...
... 1 .66 666 66 5 \ 3 cho ta 1 Function Round đuợc dùng để bỏ bớt các con số nằm phía sau decimal point. Thí dụ: Round ( 12.34 5 67 89, 4 ) chỉ giữ lại 4 con số sau decimal point và cho ta 12.34 57 ... trong memory để chứa một con số nguyên từ -32 76 8 đến 32 76 7 . Ðể ý là 32 76 8 = 2^15 (2 lũy thừa 15) , tức là trong memory các con số từ 32 76 8 đến 65 535 được dùng để biểu diễn các số âm. Một lần ... computer như thế nào. 5 Còn Long dùng 4 byte để để chứa một con số nguyên từ -21 474 8 364 8 đến 21 474 8 364 7. Nếu bạn dùng Integer mà bị Oveflow error khi làm toán nhân thì assign các con số...
... FileNumber = FreeFile ' Open the FileName as an output file , using FileNumber as FileHandle Open FileName For Output As FileNumber ' Now iterate through each item of lstNames For i ... đó bạn phải tránh gọi FreeFile liên tiếp hai lần, vì OS sẽ cho bạn cùng một con số. Tức là, sau khi gọi FreeFile phải dùng nó ngay bằng cách Open một File rồi mới gọi FreeFile lần kế để có một ... "'" then use this as an indication to force a new page 17 Ta biết rằng ListBox có thể chứa rất nhiều hàng text (con số hàng tối đa là 65 535). Ta đã quen với việc hiển thị content...
... frmMyForm cùng một lúc như trong thí dụ sau: Dim firstForm As frmMyForm Dim secondForm As frmMyForm Set firstForm = New frmMyForm Set secondForm = New frmMyForm firstForm.Show secondForm.Show ... declare firstForm và secondForm là những Objects của Class frmMyForm. Sau đó ta làm nên (instantiate) các Objects firstForm và secondForm bằng statements Set = New firstForm và secondForm còn được ... Ngay cả một form tên frmMyForm mà ta viết trong VB6 chẳng hạn, nó cũng là một Class. Thường thường ta dùng thẳng frmMyForm như sau: frmMyForm.Show Trong trường hợp nầy thật ra frmMyForm tuy...
... (reports). Kèm theo với VisualBasic6. 0 khi ta mua là một copy của Database Engine của MSAccess. Tên nó là Jet Database Engine, cái lõi của MSAccess DBMS. Các chương trình VB6 có thể truy cập database ... đầu, nếu không cho trị số của một field, thì field ấy có trị số là NULL. Thường thường, VisualBasic6. 0 không thích NULL value nên ta phải thử một field với Function IsNULL() để đảm bảo nó ... version 97, 2000 và 2002. Nếu cần phải convert từ version nầy qua version khác, bạn có thể dùng Access DBMS Menu Command Tools | Database Utilities | Convert Database | To Access 2002 File Format...
... 9 ToNo =6 nên execution sẽ đi qua cái FOR loop 3 lần. Lần thứ nhất i=4, lần thứ nhì i=5 ,và lần thứ ba thì i =6. Sau đó, khi i =7 thì nó lớn hơn ToNo ( =6) nên execution nhảy ra khỏi FOR loop. ... 4 to 16 with Step=2 Total = Total + i ' Add the number to the TotalNext Total sẽ bằng 4 +6+ 8+10+12+14+ 16= 70 . Trong thí dụ trên ta cũng có thể dùng STEP số âm như sau: For i = 16 To 4 ... số chẳn từ 4 đến 16 ta có thể làm cho i tăng value lên 2 (thay vì 1) mỗi khi đến cuối loop. Tức là i=4 ,6, 8 .v.v Ta sẽ thêm chữ STEP trong FOR statement như sau: For i = 4 To 16 Step 2 '...
... tạo VisualBasic6. 0 FPT Software Solution Trang:15/ 260 2.3.8 Trợ giúp Không những làm chủ ngôn ngữ lập trình Visual basic, bạn cũng cần phải sử dụng thuần thục môi trường Visualbasic ... sở dữ liệu 130 12.1 .6 Dùng VisualBasic để tạo một cơ sở dữ liệu 130 12.1 .7 Các mối quan hệ 140 Giáo trình đào tạo VisualBasic6. 0 FPT Software Solution Trang:50/ 260 Grouping line ... Label1.Caption = Time End Sub 2.2 Các tính năng mới trong Visualbasic6. 0 2.2.1 Khái quát vắn tắt về Visualbasic6. 0 Nếu bạn chưa quen với Visual basic, tựa đề của phần này có thể làm nhầm lẫn đôi...
... -1 .79 76 9 3134 862 32E+308 - 1 .79 76 9 3134 862 32E+308. Kiểu dữ liệu này được gọi là độ chính xác kép. Currency Dữ liệu tiền tệ chứa các giá trị số từ -922.3 37. 203 .68 5. 477 ,5808 - 922.3 37. 203 .68 5. 477 ,58 07. ... trị số nguyên từ 0 – 255 Integer Các giá trị số nguyên từ -32 76 8 – 32 76 7 Long Các giá trị số nguyên từ -21 474 8 364 8 – 21 474 8 364 7. Kiểu dữ liệu này thường được gọi là số nguyên dài. Single ... chương trình kết quả là: Trang 40 VisualBasic I. Giới thiệu về VisualBasic6. 0 Visual Basic6. 0 (VB6) là một phiên bản của bộ công cụ lập trình VisualBasic (VB), cho phép người dùng tiếp...