검색어 입력폼

명사_역파일추출

등록일 2004.12.27 파일확장자압축파일 (zip) | 4페이지 | 가격 2,000원

소개글

명사/역파일 구현

컴파일 실행환경

비주얼 베이직 6.0

본문내용

Private Sub 화일열기_Click()

On Error GoTo FileopenError
With CommonDialog1
.CancelError = True
.FileName = ""
.InitDir = App.Path
.Filter = "텍스트파일(*.txt)|*.txt"
.ShowOpen
FName = .FileName
End With

If FName <> "" Then
fNumber = FreeFile()
Open FName For Binary As fNumber

Temp = Input$(LOF(fNumber), fNumber)
Li1 = Split(Temp, " ", , vbBinaryCompare)
Max1 = UBound(Li1)
txt원문.Text = Temp
Close fNumber
txt명사추출.Text = ""
End If

Call ModCallDoc.ReadText(FName)

Exit Sub

FileopenError:
End Sub

압축파일 내 파일목록

11Contrary_File.bas
140,337개의 명사 리스트 파일audlist.txt
audlist.txt
audtk.bas
Form1.frm
Form1.frx
Form1.log
golist.txt
houlist.txt
mlist.txt
ModCallDoc.bas
ModCompare.bas
ModContrary_File.bas
ModDictionary.bas
ModQuickSort.bas
ModRepetition_word.bas
MSSCCPRJ.SCC
Project1.PDM
Project1.vbp
Project1.vbw
ReadText.bas
고빈도 분석 배제 어절 리스트 파일golist
고빈도 분석 배제 어절 리스트 파일golist.txt
명사_역파일.exe
명사_역파일.JPG
명사를 배제한 단일 형태소 리스트 파일mlist.txt
역파일.hwp
후절어 리스트 파일houlist.txt
테스트용 파일 10개분야 10개/1.TXT
테스트용 파일 10개분야 10개/10.TXT
테스트용 파일 10개분야 10개/2.TXT
테스트용 파일 10개분야 10개/3.TXT
테스트용 파일 10개분야 10개/4.TXT
테스트용 파일 10개분야 10개/5.TXT
테스트용 파일 10개분야 10개/6.TXT
테스트용 파일 10개분야 10개/7.TXT
테스트용 파일 10개분야 10개/8.TXT
테스트용 파일 10개분야 10개/9.TXT
다운로드 맨위로