비주얼베이직 레포트. 메모장 메뉴 편집기를 이용한 메뉴 작성 코드

소개글

비주얼베이직 레포트. 메모장 메뉴 편집기를 이용한 메뉴 작성 코드에 대한 보고서 자료입니다.

목차

1. 문제분석
2. 코드구현
<Form1창(메모장)의 코드>
<Form2창(글꼴)의 코드>
3. 캡쳐화면
<예제.txt파일을 open한 화면>
<글꼴 창>
<적용된 화면>
<메모장정보 창>
<다른이름으로저장 창>
<내용 변경 후 새로만들기 메뉴 클릭했을때>
<인쇄 메뉴를 클릭했을때>

본문내용

ext
Close #1
Text1.DataChanged = False
End If
End Sub
Private Sub fileopen()
Dim a As String
fileline = 0
CommonDialog1.FileName = ""
CommonDialog1.ShowOpen
If CommonDialog1.FileName <> "" Then
If Dir(CommonDialog1.FileName) <> "" Then
Text1.Text = ""
Open CommonDialog1.FileName For Input As #1
While (Not EOF(1))
Line Input #1, a
Text1.Text = Text1.Text + a + vbCrLf
fileline = fileline + 1
Wend
Close #1
form1.Caption = CommonDialog1.FileTitle + " - 메모장"
Text1.DataChanged = False
Else
MsgBox CommonDialog1.FileTitle + "의 파일명이 없습니다.", vbExclamation, "파일명"
End If
End If
End Sub

Option Explicit
Private Sub Check1_Click()
Label4.FontUnderline = Not Label4.FontUnderline
End Sub
Private Sub Check2_Click()
Label4.FontStrikethru = Not Label4.FontStrikethru
End Sub
Private Sub command1_Click()
form1.Text1.FontSize = Label4.FontSize
form1.Text1.Font = Label4.Font
form1.Text1.FontBold = Label4.FontBold
form1.Text1.FontItalic = Label4.FontItalic
form1.Text1.FontUnderline = Label4.FontUnderline
form1.Text1.FontStrikethru = Label4.FontStrikethru
Form2.Hide
End Sub
Private Sub Command2_Click()
Form2.Hide
End Sub
Private Sub List1_Click()
Text1.Text = List1.Text
Label4.Font = List1.Text
End Sub
Private Sub List3_Click()
Text3.Text = List3.Text
Label4.FontSize = List3.Text
End Sub
Private Sub List2_Click()
Text2.Text = List2.Text
If List2.Text = "굵은기울임꼴" Then
Label4.FontBold = True
Label4.FontItalic = True
ElseIf List2.Text = "기울임꼴" Then
Label4.FontBold = False
Label4.FontItalic = True
ElseIf List2.Text = "굵게" Then
Label4.FontBold = True
Label4.FontItalic = False
Else
Label4.FontBold = False
Label4.FontItalic = False
End If
End Sub
캡쳐화면
반드시 직접 실행하시고
다시 캡쳐한 화면을 붙여넣어주세요!!
<예제.txt파일을 open한 화면>
<글꼴 창>
<적용된 화면>
<메모장정보 창>
<다른이름으로저장 창>
<내용 변경 후 새로만들기 메뉴 클릭했을때>
<인쇄 메뉴를 클릭했을때>

키워드

비주얼베이직,   메모장,   resize 이벤트,   unload 이벤트,   showprinter,   윈도우즈프로그래밍,   메뉴편집기,   shortcut