c9002
22-07-2010, 10:52
mình có sử dụng một đoạn code như thế này :
Private Sub Text1_Change()
Text2.Text = Replace$(Text1.Text, "MS", "microsoft")
Text2.Text = Replace$(Text1.Text, "microsoft", "MS")
End Sub
mục đích: nếu khi viết văn bản từ text1 có từ MS thì tex2 sẽ hiển thị là microsoft. còn khi có từ microsoft text2 chuyển lại thành MS
Tất nhiên là không chạy đúng ý của mình rồi.Hàm sau dùng được còn hàm trước thì không.
Vậy phải sửa lại như thế nào? mong các bạn giúp đỡ
Private Sub Text1_Change()
Text2.Text = Replace$(Text1.Text, "MS", "microsoft")
Text2.Text = Replace$(Text1.Text, "microsoft", "MS")
End Sub
mục đích: nếu khi viết văn bản từ text1 có từ MS thì tex2 sẽ hiển thị là microsoft. còn khi có từ microsoft text2 chuyển lại thành MS
Tất nhiên là không chạy đúng ý của mình rồi.Hàm sau dùng được còn hàm trước thì không.
Vậy phải sửa lại như thế nào? mong các bạn giúp đỡ