Câu lạc bộ Visual Basic

Các bạn cho mình xin code khi chọn một form khác thì form đang được mở sẽ bị thoát để trả bộ nhớ cho chương trình Vừa rồi mình có làm một cái bài tập lớn lớn. Mình mô tả các form như sau: - Đăng nhập (form này chỉ ẩn, không unload, trừ khi End) - Form chính (để chọn các chức năng) - Các form chức n...

italy0789 wrote:vậy thì nhờ bạn cho mình xem form vb của bạn đc ko ? (project ý)

Ôi trời ơi! Lỗi rồi! Lỗi rồi! Để mình mò lại đã...
Cái thuật toán chưa thông được. Mà sao bà con CLBVB không vào giúp em một tay với!

mình có thử chứ ! Thứ nhất, cảm ơn bạn vì đã ủng hộ bài trả lời của mình. Thứ hai, chân thành xin lỗi, vì trong mã nguồn có thiếu một vài ký tự, khiến cho kết quả không được chính xác hoàn toàn. Ở đoạn mã nguồn thứ 2, thay vì viết: Caption = Caption & arr(i) thì phải viết: Caption = Caption &am...

mình muốn khi nhập dãy X thì nó là ngẫu nhiên chứ ko phải là gán sẵn giá trị như của bạn Ơ lạ nhỉ!? Gán từ kết quả trả về từ inputBox thì nó không phải là ngẫu nhiên thì là sao? Mình cũng đã nói đến mức tối ưu là cho người ta tự chọn ký tự cắt nữa rồi!!! Thật sự thì kể từ khi học VB6 tới giờ, mình ...

bạn có thể viết cụ thể hơn hộ mình đc ko ? ... hy vọng bạn giúp đc mình thank! Giúp đỡ thì không có gì. Nhưng hàm inputBox thì đâu có gì khó khăn nhỉ? Nó cũng như msgBox vậy thôi. Theo mình, bạn nên cho InputBox nhảy ra 2 lần: lần 1 để cho người ta chọn ký tự dùng tách phần tử của mảng lần 2: nhập ...

góp vui với bạn[/vb] Nếu là "góp vui" thì mình có cái này: Dim clickCount As Byte Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button <> 1 Then Exit Sub Caption = clickCount + 1 & "." & clickCount + 2 & "." &...

Dùng MOUSE_EVENT bạn à. Vừa rồi mình có làm một cái module định dùng nhưng sau lại không cần. Trên diễn đàn này có đó, hình như bài của bác truongphu thì phải. Bạn chịu khó tìm nhé. Nếu không thấy thì mình sẽ gửi sau, gửi nhiều sợ chồng lên nhau. Bạn có thể tham khảo hàm GetCursorPos, SetCursorPos v...

Bạn thả vào form Label1 và Text1 rồi chép mã này vào nhé: [vb] Private Sub Form_Load() Label1 = "Nhap day so cach nhau dau " & Chr$(34) & ";" & Chr$(34) & ":" Text1 = "" End Sub Private Sub Text1_Change() Dim arr() As String, i As Integer arr =...

Mình nghĩ câu hỏi 4 của bạn là thế này: [vb]Private Sub Combo1_Click() Text1 = "" If Combo1.ListIndex = 1 Then Text1 = "Dang lam viec o vi tri: " & Combo1.List(Combo1.ListIndex) End Sub Private Sub Form_Load() For i = 1 To 4 Combo1.AddItem i Next Combo1.ListIndex = 0 End Sub ...

Giúp mình một tý^^ Mình đang dùng cái combobox của bạn Hưng nhưng mà có một số thắc mắc sau: - load data từ access ra thì hiện thị tiếng việt tốt. giờ tớ muốn code cho một cái combobox để nó hiện thị tiếng việt thì gõ theo kiểu như thế nào unicombobox.additem ("d9o62 ho5a") code như trên ...

Bạn Hưng Cho mình hỏi tí: Làm thế nào để thay picture cho Command trong lúc chạy chương trình vậy? Cái quickInfo nó báo là: Picture As ListImage, nhưng ko biết lôi ra thế nào?

Vì vậy bạn nên hạn chế dùng nó, chỉ những cái nào cần nhập unicode thì hãy cho nó vào (và nên cho UseTab=True để có thể dùng phím Tab di chuyễn focus), còn nếu chỉ cần nhập số hay chữ thường thì nên dùng Textbox chuẫn. Nếu ngại giao diện không đồng nhất thì bạn có thể tạo file manifest cho file exe...

Sau khi tạo treeview, làm thế nào để 1 node trên treeview được tự động chọn vậy bác DQHung? Ban đầu mình "tập luyện" với cái UniTreeView này cũng thấy khó khăn thật, vì đã quen với việc sử dụng Key và Node của Tree chuẩn. Nhưng dần làm quen được rồi, thấy rất thú vị... Thế này nhé bạn: Gi...

Cảm ơn bạn Dương Quốc Hưng đã liên lục cập nhập và chia sẻ UFC cho mọi người. Mình có ý kiến là bạn hãy thêm vào UniCombo thuộc tính Background colour (màu nền). Mình đang làm cho các textbox đổi màu khi nhận và mất focus. Nhưng khi đến combo thì không làm được. Mình theo dõi mấy lần cập nhật gần đâ...

Đọc một số bài viết về việc chuyển phông chữ trên diễn đàn, thấy hay hay, và đã làm được. Nhưng mình lại gặp phải trục trặc rồi, mong các bạn chỉ giúp: Mình làm phông .vnTime, mà phông mặc định là Tahoma. Về kích cỡ thì rõ ràng phông Tahoma to hơn .vnTime nhiều, nên khi chạy, chương trình hiện ra ch...

Hôm rồi tìm trên mạng mãi, mình kiếm được mấy đoạn code để tắt tiến trình, có nhiều cái thì tắt theo PID, nhưng mình cần nó tìm PName để tắt cơ. Lọ mọ mãi, ơn trời, cuối cùng cũng tìm ra. Từ khóa tìm kiếm: terminate process vb6 Mình nghĩ cho nó chạy ẩn liên tục xóa tiến trình đó thì OK thôi, hoặc ki...

Cái này thì dùng Tab thì hay hơn đó bạn.
Vào Components, chọn Microsoft Forms 2.0 Object hoặc MS tabbed Dialogue Control 6.0

Mình đang làm một cái chương trình quản lý nhỏ có sử dụng đến TreeView. Mò mẫm mãi cũng chỉ ra được một chút bên TreeView, còn cái ImageList thì bó tay luôn. Mình có xem rất nhiều ví dụ mẫu nhưng vẫn không thể hiểu được cái ImageList nó lấy icon ở chỗ nào. Các bạn chỉ giúp mình cách đặt icon vào từn...

Bạn ơi, vậy mình có thể chạy một thủ tục theo một thời gian nhất định không. Ví dụ: trong chương trình có thủ tục sao lưu csdl: saoluu. cứ 1 tuần, hay 1 tháng... là tự động sao lưu csdl 1 lần có được không Mình nghĩ là hoàn toàn được. Bạn đặt nó cứ đến thời gian đó thì chạy nó lên, nhưng chắc bạn p...

Chào bác truongphu, cháu đọc thấy các bài viết của bác rất hay và dễ hiểu nữa. Cháu có ý này không biết mọi người thấy thế nào, cháu đang hơi bận nên không thử ngay được, để lấy tên các file hay folder có tên na ná giống nhau, ta quét lấy tên tất cả các đối tượng (cùng loại file hay folder) trong cù...