Ma ky tu

[duytung2003]

Co ban nao co bang ky tu ASCII khong tu 1 den130 cho minh duoc khong,giup minh nhe,minh dang can gap qua .cam on nhieu

[real_time]

mình ko có nhưng mình có đoạn code này bạn xem thử nhé:


thêm 1 list box vào form của bạn tên là list1
trong thuộc tính formload() ban viết
sub formload()
for i=1 to 130
list1.addItem chr(130)
next
end sub

[happyface]

Bác Real_Time làm vậy là làm khó cho người ta rùi. In ra cái listbox toàn là các ký tự mà không có mã ASCII kèm theo thì ai mà hiểu chứ.
Mình xin mạo muội sửa lại như sau:

dim i as byte
for i=0 to 254
list1.addItem chr(i) & vbTabs & i
next

[duytung2003]

Minh cam on nha.minh kiem duoc roi,minh tim qua help ma,hi......