ｿｽ@ ｿｽgｿｽbｿｽvｿｽyｿｽ[ｿｽWｿｽｿｽ

ｿｽeｿｽｿｽｿｽｿｽﾌ過具ｿｽｿｽｿｽｿｽO

ｿｽEC/C++
ｿｽEDelphi
ｿｽEVisual BasicｿｽｿｽｿｽSｿｽｿｽ
ｿｽ@(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
ｿｽEVisual Basic(VB2-VB6)
ｿｽEVisual Basic .NET
ｿｽEVisual C++

ｿｽﾖ連ｿｽTｿｽCｿｽg

ｿｽEpapy's softwarelibrary

VB.netBiginner 2003/11/18(ｿｽｿｽ) 10:38:47

ｿｽSｿｽpｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜまゑｿｽ髟ｶｿｽｿｽｿｽｿｽﾌ会ｿｽｿｽoｿｽCｿｽgｿｽｿｽｿｽ迚ｽｿｽoｿｽCｿｽgｿｽﾜでゑｿｽ
ｿｽCｿｽﾓの包ｿｽｿｽｿｽｿｽｿｽﾅ置ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽﾇのようｿｽﾉゑｿｽｿｽｿｽﾎゑｿｽｿｽｿｽｿｽﾌゑｿｽｿｽかｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽｿｽｿｽいｿｽ試ｿｽsｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄみゑｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB
ｿｽﾇゑｿｽｿｽｿｽｿｽｿｽﾎ良ゑｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
ｿｽﾇなゑｿｽｿｽｿｽｿｽｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB

ｿｽﾋゑｿｽ 2003/11/18(ｿｽｿｽ) 11:58:48

ｿｽｿｽｿｽｿｽｿｽﾍ全ｿｽｿｽUnicodeｿｽ@ｿｽQｿｽoｿｽCｿｽgｿｽﾅ管暦ｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽSｿｽpｿｽｿｽｿｽpｿｽﾍ関係ｿｽLｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽ]ｿｽｿｽｿｽﾄ会ｿｽｿｽoｿｽCｿｽgｿｽｿｽｿｽ迚ｽｿｽoｿｽCｿｽgｿｽﾆ鯉ｿｽｿｽｿｽｿｽｿｽｿｽﾆゑｿｽ
(ｿｽｿｽｿｽｿｽｿｽｿｽ)ｿｽｿｽｿｽQｿｽｿｽｿｽｿｽ(ｿｽｿｽｿｽｿｽｿｽｿｽ)ｿｽｿｽｿｽQｿｽﾜでと難ｿｽｿｽﾓ鯉ｿｽﾆなゑｿｽﾜゑｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽｿｽﾌ托ｿｽｿｽｿｽｿｽ.NET frameworkｿｽﾌ場合ｿｽ@StringｿｽNｿｽｿｽｿｽXｿｽﾌｿｽｿｽ¥ｿｽh
ｿｽｿｽgｿｽpｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽuｿｽｿｽｿｽﾍ削除ｿｽｿｽｿｽﾄゑｿｽｿｽ逑ｯｿｽｿｽｿｽ齒奇ｿｽﾉ挿ｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB

Dim a As String = "AbcdｿｽAｿｽCｿｽEｿｽGｿｽIｿｽｿｽｿｽｿｽｿｽ"
Dim b As String = "ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ"
a = a.Remove(4, 5)  'ｿｽSｿｽﾔ目ゑｿｽｿｽｿｽTｿｽﾂゑｿｽ除
a = a.Insert(4, b)  'ｿｽSｿｽﾔ目以降ｿｽﾉ挿ｿｽｿｽ

VB.netBiginner  2003/11/18(ｿｽｿｽ) 12:44:55

>ｿｽﾋろさｿｽｿｽ

ｿｽeｿｽﾘにゑｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB

ｿｽｿｽｿｽｿｽｿｽPｿｽﾂ難ｿｽ_ｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽ

Dim a As String = "AbcdｿｽAｿｽCｿｽEｿｽGｿｽIｿｽｿｽｿｽｿｽｿｽ"
Dim c As String = "ｿｽｿｽcdｿｽAｿｽCｿｽEｿｽGｿｽIｿｽｿｽｿｽｿｽｿｽ"

ｿｽﾆ包ｿｽｿｽｿｽｿｽｿｽﾉどの箇擾ｿｽｿｽﾉ全ｿｽpｿｽｿｽｿｽpｿｽｿｽｿｽｿｽｿｽﾝゑｿｽｿｽﾄゑｿｽｿｽ驍ｩｿｽzｿｽｿｽﾅゑｿｽｿｽﾈゑｿｽｿｽ鼾ｿｽｿｽ
ｿｽwｿｽ閧ｵｿｽｿｽｿｽ齒奇ｿｽｿｽｿｽｿｽuｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ鼾ｿｽﾍどゑｿｽｿｽｿｽｿｽｿｽﾎゑｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
ｿｽｿｽLｿｽﾌ暦ｿｽﾅ鯉ｿｽｿｽｿｽｿｽﾜゑｿｽｿｽﾆどゑｿｽｿｽｿｽﾌ包ｿｽｿｽｿｽｿｽｿｽｿｽﾅ終ｿｽIｿｽﾉゑｿｽ
ｿｽuｿｽAｿｽCｿｽEｿｽGｿｽIｿｽvｿｽｿｽuｿｽｿｽｿｽｿｽｿｽｿｽ

a = "Abcdｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ"
c = "ｿｽｿｽcdｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ"

ｿｽﾉゑｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽB
ｿｽｿｽｿｽﾛ行ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽeｿｽLｿｽXｿｽgｿｽtｿｽ@ｿｽCｿｽｿｽｿｽｿｽPｿｽsｿｽｿｽｿｽﾂ読み搾ｿｽｿｽｿｽﾅ（ｿｽﾅ定長ｿｽj
ｿｽeｿｽsｿｽﾌ指ｿｽ閧ｵｿｽｿｽｿｽ齒奇ｿｽｿｽuｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽEｿｽEｿｽE

ｿｽﾇのようｿｽﾉ行ｿｽｿｽｿｽﾎよいｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽH

ｿｽｿｽｿｽｿｽ 2003/11/18(ｿｽｿｽ) 17:13:52

ｿｽｿｽｿｽｿｽｿｽXｿｽｿｽｿｽ轤ｵｿｽﾜゑｿｽ
Replaceｿｽﾖ撰ｿｽｿｽﾆゑｿｽｿｽﾅは駄目なゑｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽH

VB.netBiginner 2003/11/18(ｿｽｿｽ) 17:35:58

Replaceｿｽﾖ撰ｿｽｿｽｿｽｿｽｿｽ

Abcdｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽcdｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ

ｿｽﾅ１ｿｽsｿｽﾚは５ｿｽｿｽｿｽｿｽｿｽﾚゑｿｽｿｽｿｽQｿｽsｿｽﾚは４ｿｽｿｽｿｽｿｽｿｽﾚとバｿｽｿｽｿｽoｿｽｿｽｿｽﾉなゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾅ定長ｿｽﾌｿｽｿｽRｿｽ[ｿｽhｿｽｿｽｿｽｿｽ[ｿｽvｿｽｿｽｿｽｿｽｿｽﾄ読み搾ｿｽｿｽﾞとゑｿｽｿｽｿｽﾜではでゑｿｽｿｽｿｽｿｽﾌゑｿｽ
ｿｽｿｽｿｽﾆは会ｿｽｿｽoｿｽCｿｽgｿｽｿｽｿｽ迚ｽｿｽoｿｽCｿｽgｿｽﾚまでゑｿｽReplaceｿｽｿｽｿｽｿｽ謔､ｿｽﾉゑｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽEｿｽEｿｽEｿｽB
ｿｽｿｽｿｽﾗゑｿｽｿｽｿｽ謫ｾｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽoｿｽCｿｽgｿｽzｿｽｿｽﾉゑｿｽｿｽﾄ…ｿｽﾆゑｿｽ
ｿｽｿｽｿｽｿｽｿｽEncodingｿｽｿｽｿｽｿｽShift-Jisｿｽﾅフｿｽ@ｿｽCｿｽｿｽｿｽﾉ擾ｿｽｿｽｿｽｿｽｿｽｿｽﾜなゑｿｽｿｽｿｽﾈゑｿｽｿｽﾆゑｿｽ
ｿｽCｿｽ}ｿｽCｿｽ`ｿｽｿｽｿｽﾌ能ｿｽﾍではどゑｿｽｿｽRｿｽ[ｿｽfｿｽBｿｽｿｽｿｽOｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾄ搾ｿｽｿｽｿｽｿｽﾄまゑｿｽｿｽB

ｿｽﾋゑｿｽ 2003/11/18(ｿｽｿｽ) 18:08:11

a = "Abcdｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ"
c = "ｿｽｿｽcdｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ"
aｿｽｿｽcｿｽﾍ擾ｿｽｿｽﾈゑｿｽｿｽﾄゑｿｽVB4.0ｿｽﾈ降ｿｽﾍ難ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾅは有ｿｽｿｽﾜゑｿｽｿｽｿｽB(^^;

>ｿｽｿｽｿｽﾛ行ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽeｿｽLｿｽXｿｽgｿｽtｿｽ@ｿｽCｿｽｿｽｿｽｿｽPｿｽsｿｽｿｽｿｽﾂ読み搾ｿｽｿｽｿｽﾅ（ｿｽﾅ定長ｿｽj
ANSIｿｽﾅ擾ｿｽｿｽｿｽｿｽｿｽｿｽﾜれたｿｽｿｽsｿｽﾌデｿｽ[ｿｽ^ｿｽ[ｿｽｿｽｿｽｿｽｿｽﾅ定長ｿｽﾆ鯉ｿｽｿｽｿｽｿｽｿｽｿｽﾆでゑｿｽｿｽ蛯､ｿｽｿｽｿｽH
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽｿｽAVB.NETｿｽﾉ読み搾ｿｽｿｽだとゑｿｽｿｽﾉ包ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽか？

MNｿｽｿｽ"VB.netBiginner"ｿｽﾆなゑｿｽｿｽﾄゑｿｽｿｽｿｽｿｽﾌでてゑｿｽｿｽｿｽｿｽｿｽVB.NETｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽVB6ｿｽﾅゑｿｽｿｽｿｽｿｽH

VB.netBiginner 2003/11/18(ｿｽｿｽ) 18:17:24

ｿｽｿｽｿｽｿｽsｿｽｿｽｿｽﾅ申ｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾅゑｿｽｿｽBVB.netｿｽﾅゑｿｽｿｽｿｽﾄまゑｿｽｿｽB
VBｿｽﾌ知ｿｽｿｽｿｽﾍゑｿｽｿｽｿｽﾜゑｿｽｿｽｿｽc
ｿｽeｿｽLｿｽXｿｽgｿｽtｿｽ@ｿｽCｿｽｿｽ(Shift-JIS)ｿｽｿｽﾇみ搾ｿｽｿｽｿｽｿｽ(StreamReaderｿｽgｿｽp)
ｿｽｿｽｿｽｿｽｿｽstringｿｽ^ｿｽﾉ托ｿｽｿｽｿｽﾜで行ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽeｿｽLｿｽXｿｽgｿｽtｿｽ@ｿｽCｿｽｿｽｿｽﾌ抵ｿｽｿｽgｿｽﾍ擾ｿｽLｿｽﾌようｿｽｿｽ

Abcdｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽcdｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ

ｿｽﾌようｿｽﾉ包ｿｽｿｽｿｽｿｽｿｽｿｽRｿｽ[ｿｽhｿｽｿｽｿｽｿｽｿｽｿｽ"ｿｽｿｽｿｽhｿｽﾌ包ｿｽｿｽｿｽｿｽ他の全ｿｽpｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽuｿｽｿｽｿｽｿｽｿｽｿｽ謔､ｿｽﾉゑｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽﾅゑｿｽｿｽﾈゑｿｽｿｽﾄ悩ｿｽｿｽﾅまゑｿｽｿｽB

ｿｽｿｽｿｽｿｽ 2003/11/18(ｿｽｿｽ) 18:35:32

.netｿｽﾅゑｿｽLenBｿｽﾍ使ｿｽｿｽｿｽﾈゑｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽH

ｿｽﾋゑｿｽ 2003/11/18(ｿｽｿｽ) 20:17:13

ｿｽﾗゑｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽﾜで鯉ｿｽｿｽｿｽｿｽﾍゑｿｽｿｽﾄなゑｿｽｿｽｿｽｿｽｿｽﾇ概ｿｽOｿｽIｿｽｿｽ
    'ｿｽﾇみ搾ｿｽｿｽｿｽ
    Private Sub Button2_Click(ByVal sender As System.Object, _
        ByVal e As System.EventArgs) Handles Button2.Click
        Dim sr As System.IO.StreamReader
        OpenFileDialog1.ShowDialog()
        'shift-jisｿｽｿｽﾏ奇ｿｽｿｽｿｽｿｽﾄ読み搾ｿｽｿｽｿｽ
sr = New System.IO.StreamReader(OpenFileDialog1.FileName, _
        System.Text.Encoding.GetEncoding("shift-jis"))
        TextBox2.Text = sr.ReadToEnd()
        sr.Close()
    End Sub
   
ｿｽ@ｿｽ@'ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
    Private Sub Button3_Click(ByVal sender As System.Object, _
        ByVal e As System.EventArgs) Handles Button3.Click
        Dim sr As System.IO.StreamWriter
        sr = New System.IO.StreamWriter("text2.txt", _
        True, System.Text.Encoding.Default)
        sr.Write(TextBox2.Text)
        sr.Close()
    End Sub

ｿｽ@ｿｽ@
    Private Sub Button4_Click(ByVal sender As System.Object, _
        ByVal e As System.EventArgs) Handles Button4.Click
        Dim s(Len(TextBox2.Text)) As String
        Dim ss As String
        Dim n As Integer
        For n = 0 To Len(TextBox2.Text) - 1
            s(n) = TextBox2.Text.Substring(n, 1)
            If Asc(s(n)) < 0 Then s(n) += Chr(1) 'ｿｽSｿｽpｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽChr(1)ｿｽｿｽﾇ会ｿｽ
            ss += s(n)
        Next n
        'ｿｽｿｽｿｽｿｽｿｽﾌ難ｿｽｿｽｿｽﾖゑｿｽ
        Dim b As String = "ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ" 'ｿｽｿｽｿｽｿｽﾖゑｿｽｿｽ髟ｶｿｽｿｽ
        ss = ss.Remove(4 * 2, 5 * 2)
        ss = ss.Insert(4 * 2, b)
        ss = ss.Replace(Chr(1), "")   'ｿｽﾇ会ｿｽｿｽｿｽｿｽｿｽｿｽﾌ削除ｿｽ@
        TextBox2.Text = ss
    End Sub
ｿｽ@ｿｽ@
ｿｽ@ｿｽ@ｿｽvｿｽｿｽｿｽｿｽｿｽTextｿｽtｿｽ@ｿｽCｿｽｿｽｿｽﾉは撰ｿｽﾎに鯉ｿｽｿｽｿｽﾈゑｿｽChr(1)ｿｽｿｽSｿｽpｿｽｿｽｿｽｿｽｿｽﾌ鯉ｿｽｿｽﾉ挿ｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽ@ｿｽ@ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽせｿｽｿｽAｿｽｿｽﾍ包ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾖゑｿｽｿｽﾄ、Chr(1)ｿｽｿｽｿｽｿｽｿｽｿｽB
ｿｽ@ｿｽ@ｿｽｿｽﾌゑｿｽｿｽｿｽﾈ奇ｿｽｿｽｿｽｿｽﾅ。ｿｽｿｽｿｽGood luck!

VB.netBiginner 2003/11/18(ｿｽｿｽ) 22:21:34

ｿｽざｿｽざｿｽTｿｽｿｽｿｽvｿｽｿｽｿｽﾜで載ゑｿｽｿｽﾄ抵ｿｽｿｽｿｽｿｽﾄ本ｿｽｿｽｿｽﾉゑｿｽｿｽ閧ｪｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾉ【ｿｽｿｽｿｽﾌままでゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽが。(^^;ｿｽz
ｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽxｿｽｿｽｿｽｿｽﾄみまゑｿｽｿｽB
AscｿｽﾆゑｿｽChrｿｽﾖ撰ｿｽｿｽﾍ搾ｿｽｿｽﾌ趣ｿｽｿｽ_ｿｽﾅゑｿｽ???ｿｽﾈのゑｿｽ
ｿｽｿｽｿｽｿｽｿｽﾆ抵ｿｽｿｽﾗて趣ｿｽｿｽｿｽｿｽﾌゑｿｽﾌにゑｿｽｿｽ謔､ｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾇゑｿｽｿｽｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB

ｿｽﾋゑｿｽ 2003/11/18(ｿｽｿｽ) 22:25:32

ｿｽｿｽｿｽﾌコｿｽ[ｿｽhｿｽAｿｽｿｽｿｽｿｽﾅゑｿｽ皷橸ｿｽGｿｽｿｽｿｽ[ｿｽﾉはなゑｿｽﾈゑｿｽｿｽｿｽｿｽｿｽ
s()ｿｽﾍ配ｿｽｿｽﾌ必ｿｽvｿｽﾍ厄ｿｽｿｽｿｽｿｽﾌで、ｿｽ^ｿｽｿｽﾉ思ｿｽｿｽｿｽｿｽｿｽlｿｽﾉはゑｿｽｿｽﾟゑｿｽﾈゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽrｿｽｿｽｿｽﾅ托ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ...(^^;

VB.netBiginner 2003/11/19(ｿｽｿｽ) 11:07:39

ｿｽ¥ｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾅゑｿｽｿｽAｿｽﾇ会ｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽB
ｿｽｿｽLｿｽﾌサｿｽｿｽｿｽvｿｽｿｽｿｽｿｽｿｽｿｽﾉ趣ｿｽｿｽｿｽｿｽｿｽｿｽﾄみゑｿｽｿｽﾌでゑｿｽｿｽｿｽ

ss = ss.Remove(4 * 2, 5 * 2)

ｿｽﾌ箇擾ｿｽｿｽｿｽ
"ｿｽCｿｽｿｽｿｽfｿｽbｿｽNｿｽXｿｽｿｽｿｽｿｽﾑカｿｽEｿｽｿｽｿｽgｿｽﾍ包ｿｽｿｽｿｽｿｽｿｽｿｽﾌ場所ｿｽｿｽ
ｿｽQｿｽﾆゑｿｽｿｽﾈゑｿｽｿｽｿｽﾎなゑｿｽﾜゑｿｽｿｽｿｽB"
ｿｽﾆエｿｽｿｽｿｽ[ｿｽﾉなゑｿｽｿｽｿｽｿｽﾌで抵ｿｽｿｽﾗてゑｿｽｿｽｿｽﾇゑｿｽｿｽｿｽ逡ｶｿｽｿｽｿｽｿｽｿｽｿｽ
"abcdeｿｽSｿｽpfghijｿｽSｿｽpklmn"
ｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽ鼾ｿｽAｿｽﾅ擾ｿｽｿｽﾌ全ｿｽpｿｽｿｽｿｽｿｽｿｽﾍ置ｿｽｿｽｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽｿｽ2ｿｽﾔ目の全ｿｽpｿｽｿｽｿｽｿｽｿｽｿｽ
ｿｽuｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽﾉ擾ｿｽLｿｽﾌエｿｽｿｽｿｽ[ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾝゑｿｽｿｽｿｽｿｽﾅゑｿｽｿｽB
ｿｽｿｽｿｽﾜゑｿｽｿｽ闥ｼｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽﾇゑｿｽｿｽｿｽｿｽｿｽﾎゑｿｽｿｽｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽH

VB.netBiginner 2003/11/19(ｿｽｿｽ) 11:36:30

ｿｽ{ｿｽｿｽｿｽﾉゑｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽﾆ抵ｿｽｿｽﾗゑｿｽｿｽ邇ｿｽﾌ奇ｿｽｿｽ痰｢ｿｽﾅゑｿｽｿｽｿｽｿｽc
ｿｽｿｽｿｽmｿｽﾉ置ｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽ轤ｵｿｽﾜゑｿｽｿｽｿｽ...(^^;

Created by board of various Programming Library.