• 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

Vấn đề về save Text VB6

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
NTN
Thành viên tâm huyết
Thành viên tâm huyết
Bài viết: 475
Ngày tham gia: T.Tư 05/02/2014 3:43 pm
Đến từ: Cao Lãnh, Đồng Tháp,Việt Nam
Has thanked: 19 time
Been thanked: 7 time
Liên hệ:

Vấn đề về save Text VB6

Gửi bàigửi bởi NTN » CN 08/02/2015 5:22 pm

  1. Dim iFileNo As Integer
  2. iFileNo = FreeFile
  3.  
  4. Open "D:\a.txt" For Output As #iFileNo
  5. Print #iFileNo,  Text1.text
  6. Close #iFileNo

Em có code như thế ấy ở Text1.Text em dùng UniTextbox nhấn ra tiếng việt nhưng khi save lại thì nó ra chữ bị lỗi font @@!! là sau ?
Ai biết giúp em với !


Dongthapseo.com - Luutru360.com - Tình yêu của tôi <3

Hình đại diện của người dùng
xuanha
Guru
Guru
Bài viết: 1230
Ngày tham gia: T.Năm 19/08/2010 4:25 pm
Đến từ: Ban Tổ chức Thành uỷ Hưng Yên, tỉnh Hưng Yên
Has thanked: 13 time
Been thanked: 380 time
Liên hệ:

Re: Vấn đề về save Text VB6

Gửi bàigửi bởi xuanha » CN 08/02/2015 10:54 pm

Kiểm phiếu Đại hội Đoàn, Đại hội Đảng
http://caulacbovb.com/forum/viewtopic.php?t=23599

Hình đại diện của người dùng
NTN
Thành viên tâm huyết
Thành viên tâm huyết
Bài viết: 475
Ngày tham gia: T.Tư 05/02/2014 3:43 pm
Đến từ: Cao Lãnh, Đồng Tháp,Việt Nam
Has thanked: 19 time
Been thanked: 7 time
Liên hệ:

Re: Vấn đề về save Text VB6

Gửi bàigửi bởi NTN » T.Hai 09/02/2015 5:31 pm

Thất bại !
Dongthapseo.com - Luutru360.com - Tình yêu của tôi <3

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: 549
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: Vấn đề về save Text VB6

Gửi bàigửi bởi tungblt » T.Hai 09/02/2015 6:47 pm

module vẫn dùng bình thường. vẫn save unicode.
love

Hình đại diện của người dùng
NTN
Thành viên tâm huyết
Thành viên tâm huyết
Bài viết: 475
Ngày tham gia: T.Tư 05/02/2014 3:43 pm
Đến từ: Cao Lãnh, Đồng Tháp,Việt Nam
Has thanked: 19 time
Been thanked: 7 time
Liên hệ:

Re: Vấn đề về save Text VB6

Gửi bàigửi bởi NTN » T.Ba 10/02/2015 5:36 am

  1. Dim iFileNo As Integer
  2. iFileNo = FreeFile
  3.  
  4. Open "D:\a.txt" For Output As #iFileNo
  5. Print #iFileNo,  Text1.text + Text2.text + Text3.text ' trong đó Text2.text là unitextbox còn 2 text còn lại là text thường có đều cái 'thường thì nó không lỗi còn Text2 VD em có từ : BIỆT ĐỘI CÁNH CỤT VÙNG MADAGASCAR - STAND BY ME ドラえもん - Thuyết Minh FUL
  6. s'ave lại nó ra BI?T �?I C�NH C?T V�NG MADAGASCAR - STAND BY ME ????? - Thuy?t Minh FUL <!-- s:( --><img src="{SMILIES_PATH}/002.gif" alt=":(" title="Buồn" /><!-- s:( --> èo!
  7. Close #iFileNo
Dongthapseo.com - Luutru360.com - Tình yêu của tôi <3

bietchetlien
Thành viên chính thức
Thành viên chính thức
Bài viết: 35
Ngày tham gia: T.Hai 05/01/2015 2:09 pm
Has thanked: 1 time
Been thanked: 4 time

Re: Vấn đề về save Text VB6

Gửi bàigửi bởi bietchetlien » T.Ba 10/02/2015 10:11 am

Đã đến lúc lên VB .Net :D


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.4 khách