Các bác cho hỏi đoạn code trong file tôi gửi chỗ:
Target.Characters(Start:=iPosition + 1, Length:=6).Font.SubScript = True
(có ý nghĩa là số mũ lấy 6 ký tự sau dấu ^ ). Nhưng như vậy thì gặp lỗi như thế này: Tôi muốn nhập là 12.25[SUP]+0.1 [/SUP]x 1200 nhưng lại thành 12.25[SUP]+0.1 x [/SUP]1200 (Vì số mũ chỉ còn 4 nên nó lấy dấu nhân lên luôn.)
Bây giờ tôi muốn thêm điều kiện khi nào gặp khoảng trắng thì không SuperScript và SubScript nữa thì nên sửa lại như thế nào?
File tôi đính kèm. Mong các bác giúp đỡ!
Target.Characters(Start:=iPosition + 1, Length:=6).Font.SubScript = True
(có ý nghĩa là số mũ lấy 6 ký tự sau dấu ^ ). Nhưng như vậy thì gặp lỗi như thế này: Tôi muốn nhập là 12.25[SUP]+0.1 [/SUP]x 1200 nhưng lại thành 12.25[SUP]+0.1 x [/SUP]1200 (Vì số mũ chỉ còn 4 nên nó lấy dấu nhân lên luôn.)
Bây giờ tôi muốn thêm điều kiện khi nào gặp khoảng trắng thì không SuperScript và SubScript nữa thì nên sửa lại như thế nào?
File tôi đính kèm. Mong các bác giúp đỡ!
