텍스트파일 읽어서 배열에 할당하는 문제..고수님들 도와주세요.ㅠㅠ
흰가람
안녕하세요 아래 과제를 풀어야하는데, 나름대로 소스를 짜봤는데요
EOF까지 라인별로 읽어들이는건 알겠는데, 그걸 배열에 어떻게 할당하고, 계산해야할지 막막하네요..
알려주시면 제게 정말 큰 도움이 될 것 같습니다.
읽어주셔서 감사합니다.3. 다음과같은 조건으로 변수를 선언한다.
1) 사용자 정의 자료형 이름 : Person
2) 사용자 정의 자료형에 들어가는 변수를 아래와 같이 선언
구분
변수명
자료형
이름
kName
String
시험
Exam
Integer
과제
Task
Integer
총점
Total
Integer
수료여부
IsPass
String
등수
Rank
Integer
4. 아래조건에 맞는 배열을 설정하여 해당 파일을 읽고 출력한다.
1)배열 이름 : Score
2)배열 크기 : 5
3)EOF를 만날 때까지 반복적으로 파일을 끝까지 읽음
5. 아래에맞춰 데이터를 계산/처리하고 출력한다.
1)총점 : 시험 + 과제
2)수료여부 : 60점 이상 Pass, 60점 미만 Fail 출력
3)등수 : 전체 중 학습자의 순위
4) 프로젝트 실행 시 아래와 같은 결과가 나와야 함Option Explicit
Private Type Person
kName As String
Exam As Integer
Task As Integer
Total As Integer
IsPass As String
Rank As Integer
End Type
Dim stCN As Integer
Dim Score(5) As PersontxtOutput.Text = 이름 시험 과제 총점 수료여부 등수
Dim fHandle As Integer
Dim InLine As String
fHandle = FreeFile
Open C:\Score.txt For Input As fHandle
Do While Not EOF(fHandle)
Line Input #fHandle, InLine
Loop
Close #fHandle!--[endif]--
번호 | 제 목 | 글쓴이 | 날짜 |
---|---|---|---|
2655300 | 특정 프로그램 루프문으로 팅기게 하고싶은데 (2) | 애교 | 2024-05-18 |
2655272 | 강좌소스확인하는법좀요 | 말달리자 | 2024-05-18 |
2655243 | 파일크기비교 | 혜윤 | 2024-05-18 |
2655211 | 우엉~ Winhttp 겁나 급해요 ㅜㅜ (2) | 정훈 | 2024-05-17 |
2655185 | 화면의 x좌표 가장큰값 구하기 질문 (1) | 해길 | 2024-05-17 |
2655158 | 이거 강좌를 받앗는대 어떻개따라해요? | 하람 | 2024-05-17 |
2655130 | 컴퓨터 사운드 녹음 질문 | 갤쓰리 | 2024-05-17 |
2655073 | 폼끄기 질문 다시합니다 | 해찬솔 | 2024-05-16 |
2654987 | 메세지 박스 질문입니다 ~ (3) | 안다미로 | 2024-05-15 |
2654960 | 블로그 글쓰기 질문 (2) | 힘찬 | 2024-05-15 |
2654931 | 질문 하나 하겠습니다 .!! | 소윤 | 2024-05-15 |
2654904 | 비베 질문요 ㅠㅠ | 미련곰탱이 | 2024-05-15 |
2654851 | 미투데이에 글을 다는 소스를 만들어보려고 하는데 | 횃불 | 2024-05-14 |
2654822 | 원하는 이미지만 꼭 찝어서 냅두기 (3) | 다솜 | 2024-05-14 |
2654791 | 닷홈으로 TEXT를 전송하는데요.. (1) | 그리 | 2024-05-14 |
2654769 | 뭐죠 ?? | 가을 | 2024-05-13 |
2654744 | winhttp로 자동으로 글 등록하는 걸 만들었는데 | 민들레 | 2024-05-13 |
2654717 | 웹브 뒤로가기? (2) | 샹1큼해 | 2024-05-13 |
2654660 | int(Rnd *9999) 질문좀 드릴게욤..;; | 사랑은아픔 | 2024-05-12 |
2654604 | 텍스트내용 메일로 보낼때 일정부분 가리기 (1) | 풋내 | 2024-05-12 |