このディレクトリの索引
http://pc12.2ch.net/test/read.cgi/tech/1274827528/453
#   
#  [1] 授業単元: 上級プログラミング 
#  [2] 問題文(含コード&リンク): 
#   
#  1、VisualC++2008のWindowsフォームアプリケーションのプロジェクトを作成し、DataGridViewを作成なさい。列は 
#  A,B,C の3列とする。 
#  2、列Aに入力された4桁の数値を日付形式に変換し表示する様にしなさい(○月○日)。 
#  3、sample.txtの内容を読み取り、その内容を使って列Bにオートコンプリートを実装しなさい。 
#   
#  sample.txtの内容は 
#  あいうえお 
#  abcde 
#  12345 
#  と言う様に、1行に1単語とする。 
#   
#  

列Bの入力(_行,2,X,LL1,LL2) :-
        rawmode,
        get_char(Char),
        検査(Char,[],L),
        atom_chars(X,L)
        要素位置による行列の置換(_行,2,X,LL1,LL2),

検査('\n',L,L) :- assertz(入力補助情報('B',L)),!.
検査(Char,L1,L) :-
        append(L1,[Char],L2),
        findall(L,(append(L1,[Char|R],LX),入力補助情報('B',LX)),_入力補助),
        入力補助選択(L,_入力補助),!.
検査(Char,L1,L) :-
        append(L1,[Char],L2),
        get_char(Char2),
        検査(Char2,L2,L).

列Bに入力補助初期情報を与える :-
        get_lines('sample.txt',Lines),
        member(Line,Lines),
        atom_chars(Line,Chars),
        assertz(入力補助情報('B',Chars)),
        fail.
列Bに入力補助初期情報を与える.