سلام
برنامه ای بنویسید که تابع StrReverse ویژوال بیسیک را شبیه سازی کند؟ :91:
لطفا کمک کنید
0
Private Sub Command1_Click()
MsgBox CustomStrReverse("I AM CODER")
End Sub
Function CustomStrReverse(str As String) As String
'StrReverse
Mystr = str
For i = 1 To Len(Mystr)
reverse$ = Mid(Mystr, i, 1) & reverse$
Next
CustomStrReverse = reverse$
End Function
سوال برنامه نویسی دارید؟
ندونستن عیب نیست، نپرسیدن چرا!