{"id":8611,"date":"2009-07-29T07:42:00","date_gmt":"2009-07-29T07:42:00","guid":{"rendered":"http:\/\/melotopia.net\/b\/?p=8611"},"modified":"2009-07-29T07:42:00","modified_gmt":"2009-07-29T07:42:00","slug":"visual-basic%ec%97%90%ec%84%9c-%ed%8c%8c%ec%9d%bc-%ec%9d%bd%ea%b3%a0-%ec%93%b0%ea%b8%b0-%ec%82%bd%ec%a7%88","status":"publish","type":"post","link":"http:\/\/melotopia.net\/b\/?p=8611","title":{"rendered":"Visual Basic\uc5d0\uc11c \ud30c\uc77c \uc77d\uace0 \uc4f0\uae30 \uc0bd\uc9c8"},"content":{"rendered":"
\n \uc0bd\uc9c8 \uae30\ub85d.<\/p>\n

\ub0b4\uac00 \uac16\uace0 \uc788\ub294 \uac83
\n
\n labels() : \uba87\uac00\uc9c0 \uc774\ub984\uc774 \ub4e4\uc5b4\uc788\ub294 \ubc30\uc5f4
\n
\n config.txt : labels()\uac00 \uc800\uc7a5\ub418\ub294 \ud30c\uc77c<\/p>\n

\uc6d0\ud558\ub294 \uac83
\n
\n config.txt\uc5d0 labels()\uc758 \ub0b4\uc6a9\uc744 \uc4f0\uace0 \uc2f6\uc740\ub370, \uc774\ubbf8 \uc788\ub294 \ub0b4\uc6a9\uc774\ub77c\uba74 \uadf8\ub0e5 \ub194\ub450\uace0 \uc5c6\uc73c\uba74 \ub05d\uc5d0\ub2e4 \ucd94\uac00\ud55c\ub2e4<\/p>\n

\ud604\uc7ac \uad6c\ud604\ub41c \uc0c1\ud0dc
\n
\n readline(config.txt)\uc73c\ub85c \ubd88\ub7ec\uc624\uace0
\n
\n \uc801\ub2f9\ud55c \ube44\uad50 \uad6c\ubb38\uc73c\ub85c \ucc3e\uc544\ubcf8 \ud6c4
\n
\n \uc5c6\ub294 \uc560\ub4e4\ub9cc \uace8\ub77c\uc11c
\n
\n writeline(config.txt)\uc73c\ub85c \uc800\uc7a5<\/p>\n

\uadf8\ub7f0\ub370 \uc624\ub958 \ubc1c\uc0dd. IOexception \uc5d0\ub7ec. \ubd84\uba85\ud788 readline \ud6c4\uc5d0 dispose\ud558\uace0 close\ud588\ub294\ub370\ub3c4 \ub2e4\ub978 \ud504\ub85c\uc138\uc2a4\uac00 \uadf8 \ud30c\uc77c\uc744 \ubd99\ub4e4\uace0 \uc788\ub2e4\uba74\uc11c…
\n
\n \uc18c\uc2a4 \ucf54\ub4dc
\n <\/p>\n

\n ‘\uc774 \ucf54\ub4dc\ub294 snowall\uc774 \uc9c1\uc811 \uc791\uc131\ud55c \ucf54\ub4dc\uc774\ub2e4.
\n
\n ‘\uc774 \ucf54\ub4dc\ub294 Public Domain License\ub97c \uc801\uc6a9\ubc1b\ub294\ub2e4.
\n
\n Private Sub saveConfig()
\n
\n Dim j As Integer
\n
\n Dim i As Integer
\n
\n Dim tmp As System.IO.FileStream
\n
\n If Not (System.IO.File.Exists(“C:\\TOFconfig.txt”)) Then
\n
\n tmp = System.IO.File.Create(“C:\\TOFconfig.txt”)
\n
\n tmp.Close()
\n
\n tmp.Dispose()<\/p>\n

End If
\n
\n MsgBox(System.IO.File.ReadAllLines(“C:\\TOFconfig.txt”).Length)<\/p>\n

Dim labels(0) As String
\n
\n If System.IO.File.ReadAllLines(“C:\\TOFconfig.txt”).Length Then
\n
\n ReDim Preserve labels(System.IO.File.ReadAllLines(“C:\\TOFconfig.txt”).Length)
\n
\n For i = 0 To labels.Length – 1
\n
\n labels(i) = System.IO.File.ReadAllLines(“C:\\TOFconfig.txt”)(i)
\n
\n Next
\n
\n End If<\/p>\n

Dim flag As Boolean = False
\n
\n MsgBox(labels(labels.Length – 1))
\n
\n For j = 0 To frmMainWindow.numberOfData – 1
\n
\n For i = 0 To labels.Length – 1
\n
\n If Not (labels(i) Is Nothing) Then
\n
\n If labels(i).StartsWith(frmMainWindow.clsSignalData(j).label) Then
\n
\n labels(i) = frmMainWindow.clsSignalData(j).label & frmMainWindow.clsSignalData(j).intChannel
\n
\n flag = True
\n
\n End If
\n
\n End If
\n
\n Next
\n
\n If Not (flag) Then
\n
\n ReDim Preserve labels(labels.Length)
\n
\n labels(labels.Length – 1) = frmMainWindow.clsSignalData(j).label & frmMainWindow.clsSignalData(j).intChannel
\n
\n End If
\n
\n flag = False
\n
\n Next<\/p>\n


\n Dim objfilew As New System.IO.StreamWriter(“C:\\TOFconfig.txt”)
\n <\/span>
\n
\n For i = 0 To labels.Length – 1
\n
\n objfilew.WriteLine(labels(i))
\n
\n Next
\n
\n objfilew.Close()
\n
\n objfilew.Dispose()
\n
\n End Sub
\n \n<\/div>\n

\n \uc704\uc5d0\uc11c \ud30c\ub797\uac8c \uce60\ud574\ub454 \ubd80\ubd84\uc774 \uc624\ub958\uc784.<\/p>\n


\n \ud574\uacb0\ub41c\uc904 \uc54c\uc558\ub294\ub370 \uc544\uc9c1 \ud574\uacb0\uc774 \uc548\ub410\ub2e4. \uc5b4\ub514\uc758 \ubb34\uc5c7\uc774 \ubb38\uc81c\uc77c\uae4c. -_-;
\n <\/span><\/p>\n

\ud574\uacb0 \ubc29\ubc95
\n
\n
\n C:\\\ub97c E:\\\ub85c \ubc14\uafb8\uc5c8\uc74c
\n <\/span>
\n
\n Writeline\uc744 WriteAllLine \uc73c\ub85c \ubc14\uafb8\uc5c8\uc74c<\/p>\n

\uc6d0\uc778
\n
\n
\n \uc708\ub3c4 Vista\uc5d0\uc11c C:\\\ub294 \ubcf4\uc548\uc0c1 \uc811\uadfc\uc744 \ud5c8\ub77d\ud558\uc9c0 \uc54a\ub294\uace0\ub85c, \uc774\ub798\uc800\ub798 \uad34\ub85c\uc6b4 \uc77c\uc774 \ubc1c\uc0dd\ud568.
\n <\/span>
\n
\n \ubaa8\ub984. \ub3c4\ub300\uccb4…<\/p>\n

\uacb0\ub860
\n
\n
\n \uc708\ub3c4 Vista\uac00 \uc4f0\ub808\uae30.
\n <\/span>
\n
\n \uc5b4\uca0c\ub4e0 \uc708\ub3c4 Vista\ub294 \uc4f0\ub808\uae30.<\/p>\n

\uc7a0\uc7ac\uc801 \ubb38\uc81c\uc810
\n
\n
\n E:\\\uac00 \uc5c6\ub294 \ucef4\ud4e8\ud130\uc5d0\uc11c \uc791\ub3d9\uc2dc\ud0ac \ub54c 100% \ud655\ub960\ub85c \uc624\ub958 \ubc1c\uc0dd.
\n <\/span>
\n

\n
\n \uc774 \ud504\ub85c\uadf8\ub7a8\uc744 \uc791\ub3d9\uc2dc\ud0ac \ucef4\ud4e8\ud130\ub294 \uc708\ub3c4 XP\uac00 \uc124\uce58\ub418\uc5b4 \uc788\uc73c\ubbc0\ub85c C:\\\ub85c \ud558\ub354\ub77c\ub3c4 \ubb38\uc81c\uac00 \uc5c6\uc744 \uac83\uc784.
\n <\/span>
\n

\n
\n \uac1c\ubc1c\uc740 E:\\\ub85c \ud574\ub193\uace0 \ubc30\ud3ec\ub294 C:\\\ub85c \ud574\uc57c \ud558\ub294 \ub51c\ub808\ub9c8 \uc0c1\ud669.
\n <\/span>
\n

\n \uc7a0\uc7ac\uc801\uc774\ub77c\uc11c \ubaa8\ub984.<\/p>\n

\ub514\ubc84\uae45\ud558\ub294\ub370 \uac78\ub9b0 \uc2dc\uac04
\n
\n 2 \uc5c5\ubb34\uc77c + \uc57c\uadfc 8\uc2dc\uac04<\/p>\n

\uc7a0\uc7ac\uc801 \uacb0\ub860
\n
\n \ube4c\uc5b4\uba39\uc744.
\n <\/p>\n

\n
\n
\n\"\uc2e0\uace0\"
\n<\/a>\n<\/div>\n<\/div>\n

<\/br>
\n<\/br>
\n<\/br>\n<\/div>\n","protected":false},"excerpt":{"rendered":"

\uc0bd\uc9c8 \uae30\ub85d. \ub0b4\uac00 \uac16\uace0 \uc788\ub294 \uac83 labels() : \uba87\uac00\uc9c0 \uc774\ub984\uc774 \ub4e4\uc5b4\uc788\ub294 \ubc30\uc5f4 config.txt : labels()\uac00 \uc800\uc7a5\ub418\ub294 \ud30c\uc77c \uc6d0\ud558\ub294 \uac83 config.txt\uc5d0 labels()\uc758 \ub0b4\uc6a9\uc744 \uc4f0\uace0 \uc2f6\uc740\ub370, \uc774\ubbf8 \uc788\ub294 \ub0b4\uc6a9\uc774\ub77c\uba74 \uadf8\ub0e5 \ub194\ub450\uace0 \uc5c6\uc73c\uba74 \ub05d\uc5d0\ub2e4 \ucd94\uac00\ud55c\ub2e4 \ud604\uc7ac \uad6c\ud604\ub41c \uc0c1\ud0dc readline(config.txt)\uc73c\ub85c \ubd88\ub7ec\uc624\uace0 \uc801\ub2f9\ud55c \ube44\uad50 \uad6c\ubb38\uc73c\ub85c \ucc3e\uc544\ubcf8 \ud6c4 \uc5c6\ub294 \uc560\ub4e4\ub9cc \uace8\ub77c\uc11c writeline(config.txt)\uc73c\ub85c \uc800\uc7a5 \uadf8\ub7f0\ub370 \uc624\ub958 \ubc1c\uc0dd. IOexception \uc5d0\ub7ec. \ubd84\uba85\ud788 readline \ud6c4\uc5d0 […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"_crdt_document":"","_jetpack_newsletter_access":"","_jetpack_dont_email_post_to_subs":false,"_jetpack_newsletter_tier_id":0,"_jetpack_memberships_contains_paywalled_content":false,"_jetpack_memberships_contains_paid_content":false,"footnotes":""},"categories":[12],"tags":[],"class_list":["post-8611","post","type-post","status-publish","format-standard","hentry","category-12"],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"jetpack_shortlink":"https:\/\/wp.me\/p8o6gA-2eT","jetpack-related-posts":[],"jetpack_likes_enabled":true,"_links":{"self":[{"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=\/wp\/v2\/posts\/8611","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=8611"}],"version-history":[{"count":0,"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=\/wp\/v2\/posts\/8611\/revisions"}],"wp:attachment":[{"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=8611"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=8611"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/melotopia.net\/b\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=8611"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}