• 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

chuyển dạng text sang dạng bitmap

Nơi trao đổi về VBA (Visual Basic for Application), lập trình cho ứng dụng Microsoft Office, AutoCAD...

Moderator: tungblt

nhti
Posts: 5
Joined: Fri 25/09/2009 9:49 pm

chuyển dạng text sang dạng bitmap

Postby nhti » Mon 25/01/2010 9:57 pm

huhu,bác nào đã từng làm cái này có thể giúp mình đc kô, ví dụ mình có một ô ở dạng text( tức là ô mình nhập chuổi ký tự vô) sau đó mình muốn chuyển chuổi text này sang dạng điểm ảnh, bác nào có thể giúp mình với [-O<



User avatar
truongphu
VIP
VIP
Posts: 4766
Joined: Sun 04/11/2007 10:57 am
Location: Cam Đức, Khánh hòa
Has thanked: 14 times
Been thanked: 520 times

Re: chuyển dạng text sang dạng bitmap

Postby truongphu » Wed 27/01/2010 8:30 am

Bạn dùng hàm Getpixel để nhận màu từng điểm ảnh trong ô text, sau đó dùng hàm Setpixel để thể hiện các màu từng điểm nầy lên một picture

cách làm tương tự, bạn có thể tham khảo 2 hàm trên ở bài:
viewtopic.php?f=7&t=10490#p66609
o0o--truongphu--o0o

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

User avatar
gtdcomputer
Thành viên danh dự
Thành viên danh dự
Posts: 1296
Joined: Fri 18/07/2008 12:08 pm
Location: Kiên Giang
Has thanked: 8 times
Been thanked: 117 times
Contact:

Re: chuyển dạng text sang dạng bitmap

Postby gtdcomputer » Wed 27/01/2010 1:46 pm

Bạn có thể dùng hàm Picture1.Print được mà ví dụ
  1. Private Sub Command1_Click()
  2. Picture1.AutoRedraw = True
  3. Picture1.Print Text1.Text
  4. Picture1.Picture = Picture1.Image
  5. End Sub
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


Return to “Visual Basic for Application (VBA)”

Who is online

Users browsing this forum: No registered users and 2 guests