cara install visual basic 6 di windows 7 64 bit

Visual Basic 6- Chương 7- Dùng Control List - Phần 2

Visual Basic 6- Chương 7- Dùng Control List - Phần 2

Ngày tải lên : 04/11/2013, 21:15
... cái file và mất hết những gì nó chứa trước đây). Sub DisplayInHEX(inString) Dim Mess, LogFileName ' Convert ASCII to Hex Mess = HexDisplay(inString) ' Prefix with date and time ... dùng method RemoveItem. Ta sẽ viết code cho Sub CmdDeleteSelectedItems_Click() như sau: Private Sub CmdDeleteSelectedItems_Click() Dim i For i = 0 To lstNames.ListCount - 1 If lstNames.Selected(i) ... whole content of the listbox Const MaxLinesPerPage = 50 Dim msg, i, j, PageNo, NumLines, HasSome, Margin HasSome = False ' Flag indicating existence of data Margin = Space(10) ' Make...
  • 7
  • 451
  • 1
Các loại dữ kiện trong Visual Basic 6

Các loại dữ kiện trong Visual Basic 6

Ngày tải lên : 28/08/2012, 15:46
... 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 nữa, nhớ rằ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 ... 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ố...
  • 9
  • 1K
  • 5
Dùng List Controls trong visual Basic 6

Dùng List Controls trong visual Basic 6

Ngày tải lên : 28/08/2012, 15:46
... List1.ItemData(List1.NewIndex) = 62 310 List1.AddItem "Tran The Tam" List1.ItemData(List1.NewIndex) = 42859 List1.AddItem "Alan Bradshaw" List1.ItemData(List1.NewIndex) = 63 73 2 List1.AddItem ... sau: Private Sub CmdLoad_Click() Dim i, Pos Dim FileName, FileNumber, anItem Dim sFirstName As String * 10 ' fixed length string of 10 characters Dim sSurName As String * 10 ' ... khi display mỗi Item đều có FisrtName bên trái. Code để sort tên theo SurName cũng giống như CmdSort_Add nhưng thêm thắt chút ít như sau: Private Sub lblSurName_Click() Dim i, anItem Dim...
  • 23
  • 985
  • 7
Tự tạo Object trong lập trình Visual Basic 6

Tự tạo Object trong lập trình Visual Basic 6

Ngày tải lên : 28/08/2012, 15:46
... ' Declare an object of Class StdFont of VB6 Dim myFont As StdFont Set myFont = New StdFont myFont.Name = "Arial" myFont.Bold = True Dim myBox As clsBox Set myBox = New clsBox ... thể tạo ra hai, ba Objects của Class 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 ... ấy. Chắc bạn đã để ý thấy trong VB6 từ dùng hai từ Class và Object lẫn lộn nhau. Đều nầy cũng không quan trọng, miễn là bạn nắm vững ý nghĩa của chúng. VB6 có yểm trợ Class mà ta có thể triển...
  • 9
  • 878
  • 7
Database trong Visual Basic 6

Database trong Visual Basic 6

Ngày tải lên : 28/08/2012, 15:46
... (reports). Kèm theo với Visual Basic 6. 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, Visual Basic 6. 0 không thích NULL value nên ta phải thử một field với Function IsNULL() để đảm bảo nó ... cách nhất định. Ta sẽ dùng Access Database biblio.mdb, nằm ở C:\Program Files\Microsoft Visual Studio\VB98\biblio.mdb để minh họa các ý niệm cần biết về cơ sở dữ liệu. Trong database nầy...
  • 9
  • 1.1K
  • 7
Viết code trong Visual Basic 6

Viết code trong Visual Basic 6

Ngày tải lên : 28/08/2012, 15:46
... 4 to 16 with Step=2 Total = Total + i ' Add the number to the Total Next 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 ... 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. Kết quả là Total=15 và được display trong Textbox txtTotal, sau khi được ... đó. Thí dụ trong Form2 ta có định nghĩa DisplayData là: Public Sub DisplayData . . . . End Sub Trong Form1, ta gọi DisplayDta như sau: 9 ToNo =6 nên execution sẽ đi qua cái FOR loop 3 lần....
  • 10
  • 3.6K
  • 49
Giáo trình Visual Basic 6.0

Giáo trình Visual Basic 6.0

Ngày tải lên : 08/10/2012, 14:41
... tạo Visual Basic 6. 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 Visual basic ... sở dữ liệu 130 12.1 .6 Dùng Visual Basic để 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 Visual Basic 6. 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 Visual basic 6. 0 2.2.1 Khái quát vắn tắt về Visual basic 6. 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...
  • 260
  • 1.5K
  • 16