VisualBasicTips

UserPreferences

1. 간단한 텍스트 파일 IO
2. 문자열 상수 목록
3. 문자열에다 따옴표 집어넣기

1 간단한 텍스트 파일 IO

텍스트 파일을 읽어들여 구분자로 분리한 다음 구조체 리스트에 저장하기. 별 것도 아닌데 VB는 꽤 빡세구만...


Structure EnumDesc
    Public IntName As String
    Public EnumName As String
    Public MaxName As String
End Structure

Dim colEnumList As New Generic.List(Of EnumDesc)
Dim objReader As New System.IO.StreamReader("D:\Project\VSMacros80\Enums.txt")
Dim arrTokens As Array

Try
    Do
        strLine = objReader.ReadLine
        arrTokens = strLine.split(",")
        If arrTokens.Length = 3 Then
            Dim objDesc As New EnumDesc
            objDesc.IntName = arrTokens.GetValue(0)
            objDesc.EnumName = arrTokens.GetValue(1)
            objDesc.MaxName = arrTokens.GetValue(2)
            colEnumList.Add(objDesc)
        End If
    Loop Until objReader.Peek = -1
Catch
Finally
    objReader.Close()
End Try

2 문자열 상수 목록

상수	값	설명
vbCR	Chr(13)	캐리지 리턴
vbCrLf	Chr(13) & Chr(10)	캐리지 리턴 및 라인 피드
vbFormFeed	Chr(12)	폼 피드
vbLf	Chr(10)	라인 피드
vbNewLine	N/A	새 라인
vbNullChar	Chr(0)	0
vbNullString	N/A	널 문자열
vbTab	Chr(9)	가로 탭
vbVerticalTab	Chr(11)	수직 탭

3 문자열에다 따옴표 집어넣기

따옴표 문자 두 개를 연속으로 쓰거나...


Dim Text As String 
Text = "She said, ""You deserve a treat!"" " 

Chr 함수를 이용한다.


Dim Text As String 
Text = "She said, " & Chr(34) & "You deserve a treat!" & Chr(34) 

의외로 찾기가 힘들었다. ㅡ,.ㅡ

• see also VisualBasic
  

• CategoryLanguage, CategoryTools