• Vui lòng đọc nội qui diễn đàn để tránh bị xóa bài viết
  • Tìm kiếm trước khi đặt câu hỏi

Các thắc mắc thường gặp VB6 và VBS

Góc trao đổi, hỏi đáp của ngôn ngữ Visual Basic 6 và Visual Basic Script

Điều hành viên: tungblt

Hình đại diện của người dùng
truongphu
VIP
VIP
Bài viết: 4756
Ngày tham gia: CN 04/11/2007 10:57 am
Đến từ: Cam Đức, Khánh hòa
Has thanked: 14 time
Been thanked: 509 time

Các thắc mắc thường gặp VB6 và VBS

Gửi bàigửi bởi truongphu » T.Bảy 20/11/2010 9:12 am

Chào các bạn.
Topic nầy được lập ra để phục vụ cho việc tra cứu nhanh: Chuyên VB6 và VBS.
Các đề tài kèm shortcut được sắp xếp theo Mục lục.
----------

VBLib 2.5.2
http://www.caulacbovb.com/forum/viewtop ... =44&t=6003

Thủ thuật, mẹo vặt

* Âm thanh và Đồ họa
http://www.caulacbovb.com/forum/viewforum.php?f=26

* Chuỗi và Thời gian
http://www.caulacbovb.com/forum/viewforum.php?f=27

* Hệ thống - Tập tin - Thư mục và Mạng
http://www.caulacbovb.com/forum/viewforum.php?f=28

* Ứng dụng - Form và Control
http://www.caulacbovb.com/forum/viewforum.php?f=29

* Mẹo vặt khác
http://www.caulacbovb.com/forum/viewforum.php?f=30

Mã nguồn

* chương trình quản lý
http://www.caulacbovb.com/forum/viewforum.php?f=32

* chương trình tiện ích
http://www.caulacbovb.com/forum/viewforum.php?f=33

* chương trình giải trí
http://www.caulacbovb.com/forum/viewforum.php?f=34

* linh tinh
http://www.caulacbovb.com/forum/viewforum.php?f=52


Bài viết hướng dẫn
http://www.caulacbovb.com/forum/viewforum.php?f=22



------------------------
A- Thiết kế:

* một link nâng cấp VB6
http://www.microsoft.com/downloads/deta ... laylang=en

1- Form, Menu

* Không cho thay đổi kích thước Form
viewtopic.php?f=7&t=3851#p23665

* Vấn đề về mở rộng độ lớn form
viewtopic.php?f=7&t=15766

* lệnh kiểm tra form đã chạy chưa
viewtopic.php?f=7&t=10279

* Form Minimum hay Maximum?
viewtopic.php?f=7&t=15803

* Cố định một cửa sổ khác trên Form
viewtopic.php?f=7&t=15981

* Form có Theme WindowsXP
viewtopic.php?f=7&t=15704

* MDI Form và Chid Form
viewtopic.php?f=7&t=15157

* Thứ tự control gotfocus khi nhấn TAB
http://www.caulacbovb.com/forum/viewtop ... 711#p92235

* Nút X trên Form: Hủy lệnh Form_UnLoad
viewtopic.php?f=7&t=15762

* Điều khiển MouseIcon
http://www.caulacbovb.com/forum/viewtop ... 28&t=12050

2- Label

3- TextBox

* Độ dài TextBox khớp đoạn text
viewtopic.php?f=7&t=15477&p=91139#p91139

* Chống Copy và Paste của textbox
viewtopic.php?f=7&t=15782&p=92782#p92782

4- Command

* Màu sắc cho button
viewtopic.php?f=7&t=15280#p90105

5- ListBox, ComboBox

* Tìm kiếm dữ liệu trong ListBox
viewtopic.php?f=7&t=15712&p=92291#p92291

* Kết quả tìm như Listbox của Google
http://www.caulacbovb.com/forum/viewtop ... 30&t=11889

* Sort với ListBox MS Form 2.0
viewtopic.php?f=7&t=15443

6- PictureBox, ImageBox

* Hỏi cách vẽ trên Image
viewtopic.php?f=7&t=15961


7- DriveListBox, DirListBox, FileListBox

8- Shape, Line

* làm thế nào để cho một khối màu chạy từ từ trên một đường
viewtopic.php?f=7&t=15338

9- Frame, CheckBox, OptionButton

* Frame của MS Form 2.0 che lấp các control
viewtopic.php?f=7&t=15549&p=92053#p91978

* OptionButton và phép tính cọng trừ khi được kiểm
viewtopic.php?f=7&t=15760#p92507

10- CommonDialog

* unicode:
http://www.caulacbovb.com/forum/viewtop ... 93&start=0

http://www.caulacbovb.com/forum/viewtop ... 111#p89024

* Hỏi cách đổi màu chữ từ bảng màu
viewtopic.php?f=7&t=15661


11- TreeView, ListView

* Xóa đối tượng trên TreeView
viewtopic.php?f=7&t=15367&p=90650#p90529

* Các thao tác đối với Item của listview (updated 11/05/2011)
viewtopic.php?f=7&t=17766

111- Các control khác

* Màu chữ cho RichTextBox
viewtopic.php?f=7&t=15744&p=92491#p92435

* Tìm trong RichTextBox
viewtopic.php?f=7&t=15848&p=92974#p92974

* Hỏi về thao tác với mảng
viewtopic.php?f=7&t=15215#p89810

ProgressBar

* Thao tác với ProgressBar
viewtopic.php?f=7&t=15350&p=92481#p90795
ProgressBar.rar
(11.38 KiB) Đã tải 757 lần

* Viết một trình download có show download progress
http://www.caulacbovb.com/forum/viewtop ... loadToFile


WebBrowser

* DownLoad logo của clbvb
viewtopic.php?f=7&t=15794&p=92813#p92813

* Tự động login caulacbovb.com
viewtopic.php?f=7&t=15700

* [Help] Về Việc Đăng Nhập Web
viewtopic.php?f=7&t=15810#p92793

* Xóa Cache hay bỏ qua Cache
viewtopic.php?f=8&t=13254


* Lỗi thiếu đăng ký thư viện:
viewtopic.php?f=7&t=15689

* Lỗi không được phép dùng các control thêm vào
viewtopic.php?f=7&t=15935

* Viết sự kiện cho control thêm vào bằng code
viewtopic.php?f=7&t=15842#p92955

Window Media Player

* Tạo PlayList
viewtopic.php?f=7&t=16063&p=94016#p94016


-------------------------------------------------------------------------------
Tập tin đính kèm
Xuat thong tin Cmd.rar
(1.16 KiB) Đã tải 754 lần


o0o--truongphu--o0o

.........
Ghé thăm:
Chuyện Linh Tinh

Hình đại diện của người dùng
truongphu
VIP
VIP
Bài viết: 4756
Ngày tham gia: CN 04/11/2007 10:57 am
Đến từ: Cam Đức, Khánh hòa
Has thanked: 14 time
Been thanked: 509 time

Re: Các thắc mắc thường gặp VB6 và VBS

Gửi bàigửi bởi truongphu » T.Bảy 20/11/2010 9:13 am

B- Code

1- Khai báo biến: Dim, Type

* Biến trong VB 6.0
viewtopic.php?f=7&t=9229#p89805

2- Xử lý số, số ngẫu nhiên, Calculator, số Hex

* Lỗi khi hiển thị số &hFFFF
viewtopic.php?f=7&t=15124

3- Vòng lặp

* Dừng các vòng lặp
viewtopic.php?f=7&t=15752

4- Mảng biến, Mảng control

* gán giá trị cho giá trị trong mảng
http://www.caulacbovb.com/forum/viewtop ... 080#p89066

* Đếm số phần tử trong mảng 2 chiều VB6
viewtopic.php?f=7&t=15953

5- Date, Time, Lịch

* Đếm thời gian đã trôi qua
http://www.caulacbovb.com/forum/viewtop ... 87&start=0

* tự động run file sau 1 khoảng thời gian
viewtopic.php?f=7&t=15747

6- Xử lý chuỗi

* Cắt chuỗi với hàm Left, Right, InStr...
viewtopic.php?f=7&t=3786&p=23306#p23238

* Tách chuỗi lấy thành phần mong muốn
viewtopic.php?f=7&t=15975

* Vấn đề mã hóa dữ liệu
viewtopic.php?f=7&t=15764

* xử lí text file (có phần thi VBS)
viewtopic.php?f=7&t=15709


7- Font Tiếng Việt: Unicode, VNI, ABC

* Tìm code chuyển bảng mã VNI sang TCVN3
viewtopic.php?f=36&t=6205

* Control dùng tiếng Việt Unicode
viewtopic.php?f=7&t=15549&p=92053#p91549

* Unicode Clipboard
viewtopic.php?f=36&t=15436

8- Màu sắc, Đồ họa, Vẽ, Icon

* Căn bản vẽ VB6
viewtopic.php?f=7&t=15851

* Nhờ giúp về Bảng hiện thị màu
http://www.caulacbovb.com/forum/viewtop ... 125#p88847

* làm sao có thể vẽ được lên form 1 đường cong bán cung ?
viewtopic.php?f=7&t=15398

* Tạo đường cong trong VB6
viewtopic.php?f=7&t=15796

* làm sao xem được ảnh động.gif trong VB6?
viewtopic.php?f=7&t=15399

9- Keyboard, Mouse

* Icon của chuột khi Text_MouseMove
http://www.caulacbovb.com/forum/viewtop ... 078#p89037

10- Âm Thanh

11- Registry

12- Print

* In ấn trong VB6
http://www.caulacbovb.com/forum/viewtop ... f=22&t=764

* Xin hướng dẫn sửa chữa các đoạn code và cách in ấn !
http://www.caulacbovb.com/forum/viewtop ... hau#p65029

* Kiểm tra tình trạng hoạt động của máy in
viewtopic.php?f=52&t=14581

13- hWnd

14- Hệ Thống

* Cách đăng ký đuôi file mở với một exe nào đó và làm ContextMenu
viewtopic.php?f=7&t=15420&p=91021#p91021

15- DeskTop

* Hỏi về chỉnh độ sáng tối màn hình
viewtopic.php?f=7&t=15586

* Làm tươi desktop sau khi dùng hàm BitBlt
viewtopic.php?f=7&t=14372

16- Process

17- Drive, Folder, File, Path

* lệnh mở một thư mục?
viewtopic.php?f=7&t=15908

* filesize
http://www.caulacbovb.com/forum/viewtop ... 219#p90159

* copy thư mục va thay đổi tên thư mục
viewtopic.php?f=28&t=457#p2220

18- Open File Text

* Đọc file .CSV bằng Visual Basic
viewtopic.php?f=22&t=13726

viewtopic.php?f=7&t=15355

19- Shell, ShellExecute

20- Các hàm API

* Thay đổi text (SetWindowText) windows handle?
viewtopic.php?f=7&t=15857&p=93034#p93031

* Làm tươi desktop (InvalidateRect) sau khi dùng hàm BitBlt
viewtopic.php?f=7&t=14372

21 Các vấn đề khác

* Cho chương trình chạy ẩn
viewtopic.php?f=7&t=15204#p92166
viewtopic.php?f=21&t=15653

* Hide một ứng dụng
http://www.caulacbovb.com/forum/viewtop ... 237#p88338

* Gửi thông điệp tới một máy tinh (LAN) với hàm NetMessageBufferSend
viewtopic.php?f=7&t=16065&p=94017#p94017

* Ngăn chặn trang web trên IExplorer
http://www.forum.caulacbovb.com/viewtop ... 980#p88515

* Lấy source trang web
http://www.caulacbovb.com/forum/viewtop ... +trang+Web
http://www.caulacbovb.com/forum/viewtop ... ile#p22703

* Viết một trình download có show download progress
http://www.caulacbovb.com/forum/viewtop ... loadToFile

* viết chương trình download bằng VB6
http://www.caulacbovb.com/forum/viewtop ... File#p2516

* Nhận kết quả của Cmd
Xuat thong tin Cmd.rar

* Tự xóa chính mình sau khi thoát.
http://www.caulacbovb.com/forum/viewtop ... =30&t=8815

* rê chuột tới 1 đối tượng nào đó thì nó sẽ tự động Click
viewtopic.php?f=7&t=15822&p=92980#p92980

.
o0o--truongphu--o0o

.........
Ghé thăm:
Chuyện Linh Tinh

Hình đại diện của người dùng
truongphu
VIP
VIP
Bài viết: 4756
Ngày tham gia: CN 04/11/2007 10:57 am
Đến từ: Cam Đức, Khánh hòa
Has thanked: 14 time
Been thanked: 509 time

Re: Các thắc mắc thường gặp VB6 và VBS

Gửi bàigửi bởi truongphu » T.Bảy 11/12/2010 9:50 am

VB6 truy vấn Access

* Tài liệu học tập bằng tiếng Việt: Đối tượng dữ liệu ActiveX
viewtopic.php?f=7&t=3942&start=60#p25579

* cài đặt ODBC, chọn MS Foxpro VFP Driver
viewtopic.php?f=7&t=3942&start=140#p29065

1- DAO

* Không tương thích với Access XP trở lên
viewtopic.php?f=7&t=15638#p91921

* dùng DAO mở Table bằng lệnh "Select.." được không?
viewtopic.php?f=7&t=3942&start=280#p39562

1.2 Data1

* Chức năng tìm kiếm của Data1
viewtopic.php?f=7&t=3942&p=29821#p29939



2- ADODB


**** Kết nối - File - Table - Field - Đường dẫn

* Làm sao để kết nối đến cơ sở dữ liệu Server.
viewtopic.php?f=7&t=3942&start=20#p24574

* Kết nối đến CSDL trên Internet
viewtopic.php?f=7&t=3942&p=28439#p28773

* code demo đơn giản kết nối client-server qua winsock
viewtopic.php?f=7&t=3942&start=180#p30741

* sql-connection mở file mdb có và không mật khẩu
viewtopic.php?f=7&t=3942#p24277

* kết nối VB với SQL
viewtopic.php?f=7&t=3942&start=320#p41320

* Khai báo, mở và đóng các kết nối
http://www.caulacbovb.com/forum/viewtop ... 160#p29509

* Kết nối DBF với VB?
viewtopic.php?f=7&t=3942&start=320#p41310

* Đường dẫn tương đối của file *.mdb
viewtopic.php?f=7&t=3942#p24321
viewtopic.php?f=7&t=3942&start=100#p27752

* Đường dẫn file mdb từ máy khác
viewtopic.php?f=7&t=3942#p24339

* Cách lấy CSDL Access từ máy khác
viewtopic.php?f=7&t=3942&start=220#p35101



* Tạo file MDB bằng code
viewtopic.php?f=7&t=3942#p24367

* Kỹ thuật ghi hình vào file MDB và load hình từ MDB ra Picture1
viewtopic.php?f=7&t=3942&p=29821#p29988

* Load file Doc vào MDB và tải ra TextBoxhttp://caulacbovb.com/forum/viewtopic.php?f=7&t=3942&start=260#p37900

viewtopic.php?f=7&t=3942&start=180#p30182

* Tạo một field mới trong table đang tồn tại
viewtopic.php?f=7&t=3942#p24374

* Các thông số cho định dạng field được tạo
viewtopic.php?f=7&t=3942#p24386

* Tối ưu các trường (định dạng Field)
viewtopic.php?f=7&t=3942&start=200#p32224

* xác định Field Type
viewtopic.php?f=7&t=3942&start=140#p29387

* tạo khóa chính (primary key hoặc index key)
viewtopic.php?f=7&t=3942&start=20#p24479

* Xóa field
viewtopic.php?f=7&t=3942#p24388

* Xóa toàn bộ các Records, Table chỉ còn các fields trống rỗng:
viewtopic.php?f=7&t=3942#p24428

* Xóa luôn Table, Dùng Access; Dùng ADO
viewtopic.php?f=7&t=3942#p24429

* Hỏi về cách chuyển nội dung 1 bảng sang bảng mới
viewtopic.php?f=7&t=3942&start=180#p31254

* Liệt kê tên Tables và tên Fields trong file Access
viewtopic.php?f=7&t=3942&start=20#p25070

* kiểm tra 1 Table Access đang đóng hay mở ?
viewtopic.php?f=7&t=3942&p=29821#p29974

* Thu nhỏ tập tin MDB (compact)
viewtopic.php?f=7&t=3942&start=40#p25358
hoặc xem VBLib

* Xác định field nào là autonumber và field nào là (primary) key
viewtopic.php?f=7&t=3942&start=100#p27333
viewtopic.php?f=7&t=3942&start=80#p27244
viewtopic.php?f=7&t=3942&start=80#p27313
viewtopic.php?f=7&t=3942&start=80#p27306

* Vài điều nhắc khi lập CSDL
viewtopic.php?f=7&t=3942&start=140#p29402

* Thắc mắc tạo Relationship khi thiết kế Database
viewtopic.php?f=7&t=3942&start=140#p29404



**** Recordset

* Khai báo các object connection và Recordset
viewtopic.php?f=7&t=3942#p24359

* Lưu ý Reference Object
viewtopic.php?f=7&t=3942#p24394

* ADO Field Object Type Property
viewtopic.php?f=7&t=3942&start=140#p29302

* Sự khác nhau giữa cách execute 1 câu sql bằng Connection và command
viewtopic.php?f=7&t=3942&start=260#p38261

* mở nhiều Recordset có bị giới hạn tốc độ xử lý không vậy?
viewtopic.php?f=7&t=3942&start=200#p33243

* tạo list cho combobox với dữ liệu lấy từ csdl kết nối adodb
viewtopic.php?f=7&t=3942&start=320#p41317

* Recordset AddNew và Update
viewtopic.php?f=7&t=3942#p24318

* Tự động thêm, xoá dòng trong CSDL
viewtopic.php?f=7&t=3942&start=40#p25405

* Recordset.FIND
viewtopic.php?f=7&t=3942&start=20#p24439

* Lệnh Find phải được dùng nhiều hơn
viewtopic.php?f=7&t=3942&start=180#p30956

* Dùng lệnh Find với nhiều điều kiện
viewtopic.php?f=7&t=3942&start=40#p25189

* Tìm trong Database với mệnh đề WHERE
viewtopic.php?f=7&t=3942&start=20#p24553

* chèn thêm đk Where thì chạy sai:
viewtopic.php?f=7&t=3942&start=20#p24894

* Xáo trộn các thông tin CSDL
viewtopic.php?f=7&t=3942&start=320#p41312

* Chọn n bản ghi cuối Danh sách không sắp xếp!
viewtopic.php?f=7&t=3942&start=40#p25381

* Làm sao khi ADODB.Recordset không cho mở giá trị NULL?
viewtopic.php?f=7&t=3942&start=20#p24443

* Cấu trúc vòng lặp: Do While . . . loop trong duyệt recordset
viewtopic.php?f=7&t=3942#p24340

* Dùng Do While not ... Loop hay dùng For ... Next với Recordset?
viewtopic.php?f=7&t=3942&start=60#p25493

* Truy xuất bản ghi thứ 20 trong database
viewtopic.php?f=7&t=3942&start=20#p24773

* Hiển thị nhanh 5 dòng đầu của table ngay khi kết nối
viewtopic.php?f=7&t=3942&start=40#p25259

* Sắp xếp cột ASC hay DESC và chọn TOP
viewtopic.php?f=7&t=3942&start=80#p27272

* Nối dữ liệu từ nhiều bảng trong Access2000?
viewtopic.php?f=7&t=3942#p24358

* Link các textbox với Recordset bằng code
viewtopic.php?f=7&t=3942&start=80#p27119

-----

* ADODB truy xuất file txt
viewtopic.php?f=7&t=3942&start=220#p33650

* làm form đăng ký như thế nào nhờ chỉ giúp
viewtopic.php?f=7&t=15746&p=92640#p92622
o0o--truongphu--o0o

.........
Ghé thăm:
Chuyện Linh Tinh

Hình đại diện của người dùng
truongphu
VIP
VIP
Bài viết: 4756
Ngày tham gia: CN 04/11/2007 10:57 am
Đến từ: Cam Đức, Khánh hòa
Has thanked: 14 time
Been thanked: 509 time

Re: Các thắc mắc thường gặp VB6 và VBS

Gửi bàigửi bởi truongphu » T.Năm 16/12/2010 7:22 pm

**** Các câu truy vấn sql

* SQL Tutorial
viewtopic.php?f=7&t=3942&start=100#p27491

* Dùng biến String trong câu truy vấn
viewtopic.php?f=7&t=3942&start=300#p40413

* Sử dụng LIKE trong truy vấn
viewtopic.php?f=7&t=3942&start=120#p28428

viewtopic.php?f=7&t=3942&start=180#p30978

* copy table trong 1 database
viewtopic.php?f=7&t=3942&start=320#p41326

* Xếp hạng khi đồng điểm trong vb
viewtopic.php?f=7&t=3942&start=100#p28427

* code tính điểm trung bình trong vb
viewtopic.php?f=7&t=3942&start=120#p28429

* Bài tập Tính điểm chênh lệch giữa các ngày
viewtopic.php?f=7&t=3942&start=20#p24504

* report lấy dữ liệu từ ngày đến ngày thì làm sao?
viewtopic.php?f=7&t=3942&start=260#p37727

* Tìm kiếm nhân viên theo độ tuổi
viewtopic.php?f=7&t=3942&start=320#p41323

* Tạo Datareport lọc dữ liệu từ nhiều bảng
viewtopic.php?f=7&t=3942&p=28439#p28441

* Làm thế nào để lấy những record bị trùng ?
viewtopic.php?f=7&t=3942&p=28439#p28468

* Truy vấn biến đổi Field
viewtopic.php?f=7&t=3942&start=60#p25751

* Hiệu chỉnh các Records trong một Field
viewtopic.php?f=7&t=3942&p=26754#p26754

* Chọn các mặt hàng theo số hóa đơn trong table kho
viewtopic.php?f=9&p=92351#p92351

* cách sử dụng câu truy vấn "select" khi chọn 1 date bất kỳ ?
viewtopic.php?f=7&t=3942&start=60#p25998

* các bài tập về Date
http://www.caulacbovb.com/forum/viewtop ... 160#p29452

* "Runtime 3021: error Either EOF and BOF is true,or current record has been deleted
viewtopic.php?f=7&t=3942&start=60#p25998
viewtopic.php?f=7&t=3942&p=29821#p29866

* Cách dùng BOF và EOF
viewtopic.php?f=7&t=3942&start=180#p30955

* Run-time error '7004' The Rowset is not bookmarkable
viewtopic.php?f=7&t=3942&start=60#p26208

* Cannot insert duplicate key
viewtopic.php?f=7&t=3942&start=100#p28426

* lỗi syntax error của lẹnh update
viewtopic.php?f=7&t=3942&start=140#p28955

* Lỗi Syntax error in FROM clause
viewtopic.php?f=7&t=12601#p75888

* Run-time Error -2147217887 (80040e21) Multiple-step OLE DB...
viewtopic.php?f=7&t=3942&start=280#p39307

* Inner Join...On
viewtopic.php?f=9&t=15662&p=92058#p92058

viewtopic.php?f=7&t=3942&start=320#p41331

* Dùng INNER JOIN
viewtopic.php?f=7&t=3942&start=280#p39308

* Select case với mẫu tin có giá trị Null
viewtopic.php?f=7&t=3942&p=29821#p29978

* Function Coalesce
viewtopic.php?f=7&t=3942&start=180#p30116

* Nhập Dữ liệu không trùng
viewtopic.php?f=7&t=3942&start=140#p28776

* Nói thêm về kiểm tra trùng record
viewtopic.php?f=7&t=3942&start=180#p30574

* Lổi khi truy xuất Table có dạng các ký tự đặc biệt
viewtopic.php?f=7&t=3942&start=140#p28777

* Tìm SUM theo điều kiện
viewtopic.php?f=7&t=15918

* Tính tổng theo điều kiện
viewtopic.php?f=7&t=3942&start=180#p31136

* query có truyền 1 tham biến
viewtopic.php?f=7&t=3942&start=200#p32405
o0o--truongphu--o0o

.........
Ghé thăm:
Chuyện Linh Tinh

Hình đại diện của người dùng
truongphu
VIP
VIP
Bài viết: 4756
Ngày tham gia: CN 04/11/2007 10:57 am
Đến từ: Cam Đức, Khánh hòa
Has thanked: 14 time
Been thanked: 509 time

Re: Các thắc mắc thường gặp VB6 và VBS

Gửi bàigửi bởi truongphu » T.Năm 16/12/2010 7:23 pm

2.2 ADODC

* Project mẫu dùng ADODC
viewtopic.php?f=7&t=3942&start=200#p32284


2.3 DataEnvironment

* Hủy bỏ lệnh Filter như thế nào
viewtopic.php?f=7&t=3942&start=320#p41309


3- DataReport

* DataReport1 (Recordset)
http://www.caulacbovb.com/forum/viewtop ... 500#p51881

* DataReport (tiếp theo = DataEnviroment)
http://www.caulacbovb.com/forum/viewtop ... 500#p52098

* DataReport (tiếp, phần 3 = ADODC)
http://www.caulacbovb.com/forum/viewtop ... 500#p52099

* Canh lề trái bản in datareport
viewtopic.php?f=7&t=6405#p40801

* Định dạng khổ giấy của Report nằm ngang?
viewtopic.php?f=7&t=3942&start=60#p25683

http://www.microsoft.com/downloads/deta ... laylang=en

* Đánh số thứ tự trong DataReport
viewtopic.php?f=9&t=15662&p=92058#p92058
viewtopic.php?f=7&t=3942&start=80#p27155

* Report lấy số thập phân
viewtopic.php?f=7&t=3942&start=100#p28425

* Tự làm một Recordset để dùng cho DataReport
http://www.caulacbovb.com/forum/viewtop ... hau#p65084

* DataReport không cập nhật
viewtopic.php?f=7&t=3942&start=140#p28775

* Kết nối VB với Report 10
viewtopic.php?f=7&t=3942&start=320#p41324



4- DataGrid

* Đưa dữ liệu vào từng colum theo định dạng trong DataGrid
http://www.caulacbovb.com/forum/viewtop ... 145#p19947

* Datagird có để đặt Setfocus cho 1 ô bất kỳ ?
viewtopic.php?f=7&t=3942&start=20#p24685

* Datagrid dùng các câu lệnh kết nối
viewtopic.php?f=7&t=3942&start=20#p24896

* TextBox thể hiện giá trị record khi click vào 1 hàng của dataGrid
viewtopic.php?f=7&t=3942&start=40#p25380

* Add ListBox vào cell của DataGrid
viewtopic.php?f=7&t=15776

* Xuất dữ liệu từ datagrid ra excel
viewtopic.php?f=7&t=3942&p=29821#p29977

* Vị trí dòng thú i trong datagrid ?
viewtopic.php?f=7&t=3942&p=29821#p29979

* Chỉ hiện lên Datagrid vài trường
viewtopic.php?f=7&t=3942&start=180#p31518

* Lấy dữ liệu vào datagrid từ dao.recordset?
viewtopic.php?f=7&t=3942&start=320#p41313

* lấy dữ liệu theo từng dòng của DataGrid
viewtopic.php?f=7&t=3942&start=320#p41325


5- MSFlexGrid

* Điều chỉnh độ rộng cột dữ liệu trong MsFlexGrid và tạo màu khác nhau cho các dòng dữ liệu
viewtopic.php?f=7&t=3942&start=40#p25265

* code đổ data vào lưới VSflexgrid
viewtopic.php?f=7&t=112&hilit=VSflexgrid

6- Excell và Access

* Export dữ liệu từ excell vào access bằng VB6
* Access qua Excel
viewtopic.php?f=7&t=3942&start=20#p24770

* Access qua Excel có mật khẩu
viewtopic.php?f=7&t=3942&start=40#p25342

* Xử lý cột excel sang dòng của access
viewtopic.php?f=7&t=3942&start=180#p30977

* project chuyển excel vào access
viewtopic.php?f=7&t=3942&start=240#p36621

* hàm Chuyển Table từ file mdb nầy sang file mdb khác
viewtopic.php?f=7&t=3942&start=260#p37039


-------

* Chương trình SQL Tester and Analyzer 1.0
viewtopic.php?f=7&t=3942&start=220#p34208
o0o--truongphu--o0o

.........
Ghé thăm:
Chuyện Linh Tinh

Hình đại diện của người dùng
truongphu
VIP
VIP
Bài viết: 4756
Ngày tham gia: CN 04/11/2007 10:57 am
Đến từ: Cam Đức, Khánh hòa
Has thanked: 14 time
Been thanked: 509 time

Re: Các thắc mắc thường gặp VB6 và VBS

Gửi bàigửi bởi truongphu » T.Hai 28/02/2011 7:28 am

1- các câu hỏi, bạn nên lập đề mục riêng. Đừng gởi chung vào đây
2- dấu <> ý nghĩa là khác
o0o--truongphu--o0o

.........
Ghé thăm:
Chuyện Linh Tinh

Hình đại diện của người dùng
truongphu
VIP
VIP
Bài viết: 4756
Ngày tham gia: CN 04/11/2007 10:57 am
Đến từ: Cam Đức, Khánh hòa
Has thanked: 14 time
Been thanked: 509 time

Project mẫu dùng tiếng Việt Unicode

Gửi bàigửi bởi truongphu » T.Bảy 19/03/2011 3:37 pm

Nhiều bạn còn lúng túng trong việc dùng tiếng Việt trên Form
Tôi gởi đến các bạn một project mẫu
untitled.JPG


---
Tập tin đính kèm
Tieng viêt all form.rar
(7.49 KiB) Đã tải 798 lần
o0o--truongphu--o0o

.........
Ghé thăm:
Chuyện Linh Tinh

Hình đại diện của người dùng
tungblt
Điều hành viên
Điều hành viên
Bài viết: 548
Ngày tham gia: T.Hai 22/12/2008 5:22 pm
Đến từ: quy nhơn
Has thanked: 6 time
Been thanked: 76 time
Liên hệ:

Re: Project mẫu dùng tiếng Việt Unicode

Gửi bàigửi bởi tungblt » T.Bảy 19/03/2011 6:24 pm

hỉ ?? bác dùng cái gì đây ?? cái của office hỡ ??
dùng cái này đi , add hết mấy cái control cơ bản vô (button, textbox, Label, Frame, ....), e thêm vài cái module Msg ( thuongall)
Tập tin đính kèm
control unicode.rar
Hàng xịn
(111.47 KiB) Đã tải 839 lần

Hình đại diện của người dùng
truongphu
VIP
VIP
Bài viết: 4756
Ngày tham gia: CN 04/11/2007 10:57 am
Đến từ: Cam Đức, Khánh hòa
Has thanked: 14 time
Been thanked: 509 time

Re: Project mẫu dùng tiếng Việt Unicode

Gửi bàigửi bởi truongphu » CN 20/03/2011 8:05 pm

peterdrew đã viết:vừa Có tiếng Việt trên TitleBar và cả dưới TaskBar

vâ1n đề nầy đã đặt ra từ lâu...
đang bỏ ngõ
o0o--truongphu--o0o

.........
Ghé thăm:
Chuyện Linh Tinh

Hình đại diện của người dùng
gtdcomputer
Thành viên danh dự
Thành viên danh dự
Bài viết: 1296
Ngày tham gia: T.Sáu 18/07/2008 12:08 pm
Đến từ: Kiên Giang
Has thanked: 8 time
Been thanked: 117 time
Liên hệ:

Re: Project mẫu dùng tiếng Việt Unicode

Gửi bàigửi bởi gtdcomputer » T.Hai 21/03/2011 9:28 am

Ơ. Cái này có lâu rồi mà. Em dùng code này.
  1. Public Const strUni = "225,193,7855,7854,7845,7844,233,201,7870,7871,243,211,7889,7888,7899,7898,237,205,253,221,250,218,7913,7912,224,192,7857,7856,7847,7846,232,200,7872,7873,242,210,7891,7890,7901,7900,236,204,7923,7922,249,217,7915,7914,7843,7842,7859,7858,7849,7848,7867,7866,7874,7875,7887,7886,7893,7892,7903,7902,7881,7880,7927,7926,7911,7910,7917,7916,227,195,7861,7860,7851,7850,7869,7868,7876,7877,245,213,7895,7894,7905,7904,297,296,7929,7928,361,360,7919,7918,7841,7840,7863,7862,7853,7852,7865,7864,7878,7879,7885,7884,7897,7896,7907,7906,7883,7882,7925,7924,7909,7908,7921,7920,273,272,244,212,417,416,234,202,226,194,259,258,432,431"
  2.                     '225,224,7843,227,7841,193,192,7842,195,7840,7845,7847,7849,7851,7853,7844,7846,7848,7850,7852,7855,7857,7859,7861,7863,7854,7856,7858,7860,7862,226,194,259,258,243,242,7887,245,7885,211,210,7886,213,7884,7889,7891,7893,7895,7897,7888,7890,7892,7894,7896,7899,7901,7903,7905,7907,7898,7900,7902,7904,7906,244,212,417,416,233,232,7867,7869,7865,201,200,7866,7868,7864,7871,7873,7875,7877,7879,7870,7872,7874,7876,7878,234,202,250,249,7911,361,7909,218,217,7910,360,7908,7913,7915,7917,7919,7921,7912,7914,7916,7918,7920,432,431,237,236,7881,297,7883,205,204,7880,296,7882,253,7923,7927,7929,7925,221,7922,7926,7928,7924,273,272
  3. Const strVNI = "aù,AÙ,aé,AÉ,aá,AÁ,eù,EÙ,EÁ,eá,où,OÙ,oá,OÁ,ôù,ÔÙ,í ,Í ,yù,YÙ,uù,UÙ,öù,ÖÙ,aø,AØ,aè,AÈ,aà,AÀ,eø,EØ,EÀ,eà,oø,OØ,oà,OÀ,ôø,ÔØ,ì ,Ì ,yø,YØ,uø,UØ,öø,ÖØ,aû,AÛ,aú,AÚ,aå,AÅ,eû,EÛ,EÅ,eå,oû,OÅ,oå,OÅ,ôû,ÔÛ,æ ,Æ ,yû,YÛ,uû,UÛ,öû,ÖÛ,aõ,AÕ,aü,AÜ,aã,AÃ,eõ,EÕ,EÃ,eã,oõ,OÕ,oã,OÃ,ôõ,ÔÕ,ó ,Ó ,yõ,YÕ,uõ,UÕ,öõ,ÖÕ,aï,AÏ,aë,AË,aä,AÄ,eï,EÏ,EÄ,eä,oï,OÏ,oä,OÄ,ôï,ÔÏ,ò ,Ò ,î ,Î ,uï,UÏ,öï,ÖÏ,ñ ,Ñ ,oâ,OÂ,ô ,Ô ,eâ,EÂ,aâ,AÂ,aê,AÊ,ö ,Ö "
  4. Private Declare Function DefWindowProcW Lib "user32" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
  5. Sub TieuDeUNI(Frm As Form)
  6.     DefWindowProcW Frm.hWnd, &HC, &H0&, StrPtr(VNItoUNI(Frm.Caption))
  7. End Sub
  8. Function VNItoUNI(ByVal Chuoi As String) As String
  9. Dim tam As String, aUNI() As String, aVni() As String, i%, Vtr As Single
  10. aUNI = Split(strUni, ",")
  11. aVni = Split(strVNI, ",")
  12. tam = Chuoi
  13. i = 1
  14. While i <= Len(tam)
  15.     Vtr = InStr(strVNI, Mid(tam, i, 2))
  16.     If Vtr <> 0 And Trim(Mid(tam, i + 1, 1)) <> "" Then
  17.         Vtr = (Vtr + 2) / 3
  18.         tam = Mid(tam, 1, i - 1) & ChrW$(aUNI(Int(Vtr) - 1)) & Mid(tam, i + 2, Len(tam))
  19.         'i = i + 1
  20.    Else
  21.         Vtr = InStr(strVNI, Mid(tam, i, 1) & " ")
  22.         If Vtr <> 0 Then
  23.             Vtr = (Vtr + 2) / 3
  24.             tam = Mid(tam, 1, i - 1) & ChrW$(aUNI(Int(Vtr) - 1)) & Mid(tam, i + 1, Len(tam))
  25.         End If
  26.     End If
  27.     i = i + 1
  28. Wend
  29. VNItoUNI = tam
  30. End Function
Và kết quả rất khả quan, Dùng thử trên nhìu HĐH cũng tốt chưa thấy lỗi, chỉ đôi khi bị font hệ thống là MS Sans Serif không thấy dấu thôi. Hình ảnh
Con người không quan tâm đến sự thật. Họ tin cái họ muốn, và về sau, cái đó sẽ trở thành sự thật

Hình đại diện của người dùng
truongphu
VIP
VIP
Bài viết: 4756
Ngày tham gia: CN 04/11/2007 10:57 am
Đến từ: Cam Đức, Khánh hòa
Has thanked: 14 time
Been thanked: 509 time

Re: Project mẫu dùng tiếng Việt Unicode

Gửi bàigửi bởi truongphu » T.Hai 21/03/2011 10:25 am

gtdcomputer đã viết:Ơ. Cái này có lâu rồi mà. Em dùng code này.

Nếu để Theme chế độ Classic thì code của bạn không thể hiện được
o0o--truongphu--o0o

.........
Ghé thăm:
Chuyện Linh Tinh

Hình đại diện của người dùng
DQHung
Guru
Guru
Bài viết: 576
Ngày tham gia: T.Hai 12/02/2007 3:24 pm
Đến từ: Rach Gia - Kien Giang
Been thanked: 40 time
Liên hệ:

Re: Các thắc mắc thường gặp VB6 và VBS

Gửi bàigửi bởi DQHung » T.Ba 22/03/2011 9:24 am

Có tính OCX ko bác :D , nếu tính thì OCX của em có thể làm cho TitleBar và Taskbar đều có unicode (theme classic or theme windows gì cũng chạy).

Hình đại diện của người dùng
VuVanHoanh
Thành viên danh dự
Thành viên danh dự
Bài viết: 1259
Ngày tham gia: T.Năm 03/06/2010 9:23 pm
Đến từ: Kim Sơn - Đông Triều - Quảng Ninh
Has thanked: 22 time
Been thanked: 137 time
Liên hệ:

Re: Các thắc mắc thường gặp VB6 và VBS

Gửi bàigửi bởi VuVanHoanh » T.Năm 19/05/2011 9:25 pm

Ứng dụng Visual Basic 6.0 vào toán học
1. Thực hiện tính toán đơn giản:

* Giải phương trình bậc nhất, bậc hai, tính giai thừa n!, n!!, tìm số nguyên tố, kiểm tra cấp số cộng:
viewtopic.php?f=22&t=16884&p=98508#p98142

* Tìm bội, tìm ước, tính giai thừa nguyên tố, kiểm tra tính hợp lệ của tam giác, chu vi, diện tích tam giác:
viewtopic.php?f=22&t=16884&p=98508#p98175

* Giải phương trình bậc ba:
viewtopic.php?f=22&t=16884&p=98508#p98508

* Tìm ước số chung lớn nhất và bội số chung nhỏ nhất:
viewtopic.php?f=22&t=16884&p=98508#p100403

* Tính hàm lượng giác trong toán học:
http://www.caulacbovb.com/forum/viewtop ... t=0#p79617

2. Giải thuật:


* Chuyển số thập phân sang phân số:
http://www.caulacbovb.com/forum/viewtop ... 12&t=10472

* Giải thuật toán ma trận nghịch đảo:
http://www.caulacbovb.com/forum/viewtop ... =12&t=9160

* Giải toán về số nguyên dương:
http://www.caulacbovb.com/forum/viewtop ... 12&t=16813

* Tính số PI bằng thuật toán:
http://www.caulacbovb.com/forum/viewtop ... =12&t=1140

* Tạo ma trận tổng:
http://www.caulacbovb.com/forum/viewtop ... 09&start=0

* Liệt kê tập con M phần tử của tập N theo thuật toán quay lùi
http://www.caulacbovb.com/forum/viewtop ... 12&t=12123

* Tạo số ngẫu nhiên không lặp lại:
http://www.caulacbovb.com/forum/viewtop ... 12&t=11307

* Giải thuật A* (A Star):
http://www.caulacbovb.com/forum/viewtop ... =12&t=9657

* Tính tổng dãy "1 2 2 3 3 3 4 4 4 4 ..."
http://www.caulacbovb.com/forum/viewtop ... =12&t=9472

* Thuật toán sắp xếp 3 số:
http://www.caulacbovb.com/forum/viewtop ... =12&t=6305

* Phép toán AND:
http://www.caulacbovb.com/forum/viewtop ... f=12&t=587
Since 2008...
One love! :x

yen_2012
Bài viết: 8
Ngày tham gia: T.Bảy 01/10/2011 9:30 am
Đến từ: Khánh Hòa

Re: Các thắc mắc thường gặp VB6 và VBS

Gửi bàigửi bởi yen_2012 » T.Ba 20/03/2012 3:51 pm

Cho em hỏi tiếp với anh trượng phu ơi,
tại sao khi sao chép môt controls mới thì nó hiển thị ra câu lệnh nè : "Do have a control named "cmdtinh", do you want to create a control array?".
Tuy nhiên ở máy của Em thì nó không hiện ra thông báo như vậy? khi em chọn copy và paste thì nó dán luôn không hiển thị ra thông báo trên. -->
Mong anh chỉ giúp em cảm on anh nhiu nhiu

Hình đại diện của người dùng
truongphu
VIP
VIP
Bài viết: 4756
Ngày tham gia: CN 04/11/2007 10:57 am
Đến từ: Cam Đức, Khánh hòa
Has thanked: 14 time
Been thanked: 509 time

Re: Các thắc mắc thường gặp VB6 và VBS

Gửi bàigửi bởi truongphu » T.Ba 20/03/2012 4:45 pm

một control mới vẽ trên form thì phần Index ở bảng Properties để trống.
Index để trống đại biểu cho 1 control độc lập.

Khi ta copy một control và paste, Vb6 sẽ hỏi ta có tạo thành mảng control không.
Nếu No, VB6 tạo thành control độc lập khác.
vd: copy Command1, dán, No, sẽ có Command2

Ngược lại, ta nhấn Yes, lập tức VB6 sẽ tạo mảng control thuộc về control vừa copy, và Index sẽ được đánh số theo thứ tự: control copy là 0, control paste là 1 và paste tiếp sẽ tăng lên 2, 3...
vd: copy Command1, dán, Yes sẽ có Command1(0) và Command1(1)...

Tạo Mảng control sẽ làm code đơn giản hơn, nhưng phải nắm chỉ số mảng (Index) của control đấy.

vd Command1 độc lập sẽ có code Click như sau:

Mã: Chọn hết

Private Sub Command1_Click()

End Sub


Nhưng khi Command1 có mảng, code sẽ biến đổi:

Mã: Chọn hết

Private Sub Command1_Click(Index As Integer)

End Sub


Ta thấy code sau có yếu tố Index.
Để điều khiển từng phần tử trong mảng, ta viết: vd
If Index = 1 then MsgBox "a" else Msgbox "b"

yen_2012 đã viết:Tuy nhiên ở máy của Em thì nó không hiện ra thông báo như vậy? khi em chọn copy và paste thì nó dán luôn không hiển thị ra thông báo trên. -->


Vì chúng chỉ hỏi 1 lần, em lỡ nhấn Yes rồi thì từ đó chúng tạo mảng liên tiếp.

Muốn hiện lên: Vẽ control có tên khác.

Đặc biệt dùng UserForm trong VBA thì copy và Paste control đều không tạo mảng = không hỏi!
o0o--truongphu--o0o

.........
Ghé thăm:
Chuyện Linh Tinh

yen_2012
Bài viết: 8
Ngày tham gia: T.Bảy 01/10/2011 9:30 am
Đến từ: Khánh Hòa

Re: Các thắc mắc thường gặp VB6 và VBS

Gửi bàigửi bởi yen_2012 » T.Tư 21/03/2012 11:02 pm

Anh ơi, cho em hỏi, em có khai báo môt đoạn mã tính giai thừa bằng chương trình con trong for?m1 bằng từ khóa Public, sau đó em gọi hàm này trong một thủ tục private sub của một form khác. tuy nhiên hệ thống báo lỗi ( sub or fuction not defined" là sao ạ? theo lí thuyết thì có từ Public đằng trước thì các form khác có thể gọi nó mà.

thao.ngo
Bài viết: 1
Ngày tham gia: CN 18/03/2012 1:09 pm

Re: Các thắc mắc thường gặp VB6 và VBS

Gửi bàigửi bởi thao.ngo » CN 25/03/2012 8:55 pm

Gửi Vip truongphu! Em rất muốn tìm các tài liệu về "VBS trong Excell", Bác có đường link nào không hay có tài liệu gì chỉ giúp em với. Xin chân thành cảm ơn Bác!

dongphuong2999
Thành viên năng nổ
Thành viên năng nổ
Bài viết: 54
Ngày tham gia: T.Sáu 02/07/2010 10:53 am
Has thanked: 1 time
Been thanked: 7 time
Liên hệ:

Re: Các thắc mắc thường gặp VB6 và VBS

Gửi bàigửi bởi dongphuong2999 » T.Sáu 04/05/2012 11:53 am

mìn chưa đọc hết,chỉ đọc cái tiêu đề...
bác truongphu cho hỏi:
trong vb:
open path for binary as #4

close #4
thì trong file.vbs mình viết như thế nào
cảm ơn

Hình đại diện của người dùng
truongphu
VIP
VIP
Bài viết: 4756
Ngày tham gia: CN 04/11/2007 10:57 am
Đến từ: Cam Đức, Khánh hòa
Has thanked: 14 time
Been thanked: 509 time

Re: Các thắc mắc thường gặp VB6 và VBS

Gửi bàigửi bởi truongphu » T.Bảy 05/05/2012 6:00 pm

dongphuong2999 đã viết:trong vb:
open path for binary as #4

close #4
thì trong file.vbs mình viết như thế nào


VBS dùng đối tượng Scripting.FileSystemObject để mở file, tạo file, xó, đọc viết... file txt
Về Scripting.FileSystemObject bạn có thể tìm đọc trong Box Tài Nguyên (Search góc trên phải)

thao.ngo đã viết:Gửi Vip truongphu! Em rất muốn tìm các tài liệu về "VBS trong Excell", Bác có đường link nào không hay có tài liệu gì chỉ giúp em với. Xin chân thành cảm ơn Bác!

Hê! không chú ý ...
Bạn có thể xem:
Công cụ VBS
o0o--truongphu--o0o

.........
Ghé thăm:
Chuyện Linh Tinh

dongphuong2999
Thành viên năng nổ
Thành viên năng nổ
Bài viết: 54
Ngày tham gia: T.Sáu 02/07/2010 10:53 am
Has thanked: 1 time
Been thanked: 7 time
Liên hệ:

Re: Các thắc mắc thường gặp VB6 và VBS

Gửi bàigửi bởi dongphuong2999 » CN 06/05/2012 1:05 pm

bác truongphu hướng dẩn lun được không ạ
ý của bác là mở file text phải không ạ
  1. set a=createoject("Scripting.FileSystemObject")
  2. 'a.OpenTextFile
  3. 'a.GetFile(Path).OpenAsTextStream
  4.  

cái tên modul để là opentextfile mở file (ko phải text) nó tra không đủ.file 500.000byte nó ra text có chiêu dài không bào giờ đủ (do nó hỉu text)

cái oject TextStream
Read
ReadAll
Readline
SkipLine
writeline
nhìn vào hỉu ý nó áp dụng cho file text(không biết có khác ko)

cháu lấy ví dụ.là có ý đồ đó
open path for binary as #4
get #4,vitri,arr
close #4
mong bác giúp cho


Quay về “Visual Basic 6 và Visual Basic Script (VB & VBS)”

Đang trực tuyến

Đang xem chuyên mục này: Không có thành viên nào trực tuyến.6 khách