검색어 입력폼

[비주얼베이직] 비베 edit 소스분석

등록일 2002.05.11 한글파일한글 (hwp) | 8페이지 | 가격 600원

목차

없음

본문내용

Dim FileName As String '파일의 이름을 저장

Private Sub cmbSize_Click() '글자크기 콤보박스
rtbFile.SelFontSize = CInt(cmbSize.Text) '리치박스의 선택영역의 사이즈 변경
End Sub

Private Sub Form_Load()
dlgFile.Filter = "리치 텍스트 파일(*.rtf)|*.rtf|텍스트 파일(*.txt)|*.txt|모든 파일(*.*)|*.*"
rtbFile.Font.Size = 10 '기본 폰트 사이즈를 부여
다운로드 맨위로