متقارن

4-برنامه اي كه رشته اي را از ورودي گرفته و چك كند كه آيا متقارن است يا خير.(مثلا beeb متقارن است)
(vb)
 
آخرین ویرایش:

the_king

مدیرکل انجمن
4-برنامه اي كه رشته اي را از ورودي گرفته و چك كند كه آيا متقارن است يا خير.(مثلا beeb متقارن است)
(vb)

کد:
Private Sub Form_Load()
    Dim s As String
    s = InputBox("Please enter a string :")
    If s = StrReverse(s) Then
        MsgBox "Yes"
    Else
        MsgBox "No"
    End If
End Sub
 

جدیدترین ارسال ها

بالا