tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]　 [ワード検索]　 [Home]

タイトル ： 回文の判定
投稿日： 2008/11/18(Tue) 23:43
投稿者： 京介
初めまして。京介と申します。
今VBでアルファベットのみで回文をチェックするプログラムを作っているのですがうまくできません。
できているところまでのコードを載せますのでその後のコードを教えていただけないでしょうか？
よろしくお願いします。

ちなみに回文とは前から読んでも後ろから読んでも同じ文章になる文章のことです


Private Sub buthantei_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles buthantei.Click
        Dim strA, strB As String
        Dim intA, i, x As Integer
        Dim chrA As Char

        strA = txtA.Text

        strA = LCase(strA)

        intA = Len(strA)

        For i = 1 To intA Step 1

            chrA = Microsoft.VisualBasic.Mid(strA, i, 1)

            If Char.IsLetter(chrA, 1) Then
                strB = strB & chrA

            End If

        Next
- 関連一覧ツリー （ をクリックするとツリー全体を一括表示します）

古いスレッドにレスはつけられません。