[Giải nhanh] BÀi tập VB 6.0

Mọi người ơi giải dùm E BT này vơi e e thử cách trong Pascal nhưng không được::
Đề bài: Đảo ngược dãy số
Viết Code của cho bài này, thực hiện nút lệnh cho Đảo ngược dãy dãy số của bài trên,mong được mọi người help!!!!!!!!

bạn hỏi củ thể là cái gì? code hay ý tưởng giải bài toán.
mình có ý tưởng thế này:
- giả sử khai báo 1 xâu là st
- nếu xâu st có 1 ký tự thì đảo ngược = st
- ngược lại: xâu đảo = ký tự cuối + đệ quy phần còn lại của xâu st

Code:

---


Function DeQui(St:String):String;
Begin
    If Length(St)<=1 Then DeQui:=St
    Else DeQui:=St[Length(St)] + DeQui(Copy(St,1,Length(St)-1));
End;

---

cái đoạn code mình viết trên pascal ( máy tính của mình ko có vb )

mình đang cần viết CODE trên VB 6.0 mà YOU

code đó ok đây
tạo 1 textbox
1 cái command
rùi code đó vào textbox
command thì chọn lệnh click!