‘\uc601\ubb38 \uc22b\uc790\ub9cc \uc785\ub825\uac00\ub2a5 \ud558\uac8c \ub9cc\ub4e0 \ud568\uc218 (\uc77c\uc77c\uc774 \uc801\uae30 \uadc0\ucc2e\uc544\uc11c \ub9cc\ub4e4\uc5c8\uc74c)
\nPublic Function CharacterMode(KeyAscii As Integer, Mode As Integer, Optional CharacterCode1 As Integer, Optional CharacterCode2 As Integer) As Integer
\n‘mode:’\uc601\ubb38 0 ‘\uc22b\uc790 1 ‘\uc601\ubb38+\uc22b\uc790 2
\n”’22 Ctrl+V
\n”’3 Ctrl+C
\n”’24 Ctrl+X
\n’66~90 :A~Z 97~122 :a~z
\n’48~57 :0~9
\n’47 : \/ ,
\n‘8 : backspace,
\n‘tab, enter \ub4f1\uc740 \ud544\uc694\ud558\uc2dc\uba74 \ucd94\uac00. \ub3c4\uc6c0\ub9d0\uc5d0\uc11c Ascii \ucc3e\uae30<\/p>\n
Select Case Mode<\/p>\n
Case 0 ‘\uc601\ubb38<\/p>\n
If KeyAscii <> 3 And KeyAscii <> 22 And KeyAscii <> 24 And _
\nKeyAscii <> 8 And _
\nKeyAscii <> CharacterCode1 And _
\nKeyAscii <> CharacterCode2 And _
\n(KeyAscii < 65 Or KeyAscii > 90) And (KeyAscii < 97 Or KeyAscii > 122) Then
\nKeyAscii = 0 ‘\uc81c\uc678\ud558\uae30
\nEnd If<\/p>\n
Case 1 ‘\uc22b\uc790<\/p>\n
If KeyAscii <> 3 And KeyAscii <> 22 And KeyAscii <> 24 And _
\nKeyAscii <> 8 And _
\nKeyAscii <> CharacterCode1 And _
\nKeyAscii <> CharacterCode2 And _
\n(KeyAscii < 48 Or KeyAscii > 57) Then
\nKeyAscii = 0 ‘\uc81c\uc678\ud558\uae30
\nEnd If<\/p>\n
Case 2 ‘\uc601\ubb38+\uc22b\uc790<\/p>\n
If KeyAscii <> 3 And KeyAscii <> 22 And KeyAscii <> 24 And _
\nKeyAscii <> 8 And _
\nKeyAscii <> CharacterCode1 And _
\nKeyAscii <> CharacterCode2 And _
\n(KeyAscii < 65 Or KeyAscii > 90) And (KeyAscii < 97 Or KeyAscii > 122) And _
\n(KeyAscii < 48 Or KeyAscii > 57) Then
\nKeyAscii = 0 ‘\uc81c\uc678\ud558\uae30
\nEnd If<\/p>\n
End Select<\/p>\n
If KeyAscii >= 97 And KeyAscii <= 122 Then ‘\ub300\ubb38\uc790\ub85c
\nKeyAscii = KeyAscii – 32
\nEnd If<\/p>\n
CharacterMode = KeyAscii<\/p>\n
End Function<\/p>\n","protected":false},"excerpt":{"rendered":"
‘\uc601\ubb38 \uc22b\uc790\ub9cc \uc785\ub825\uac00\ub2a5 \ud558\uac8c \ub9cc\ub4e0 \ud568\uc218 (\uc77c\uc77c\uc774 \uc801\uae30 \uadc0\ucc2e\uc544\uc11c \ub9cc\ub4e4\uc5c8\uc74c) Public Function CharacterMode(KeyAscii As Integer, Mode As Integer, Optional CharacterCode1 As Integer, Optional CharacterCode2 As […]<\/a><\/p>\n<\/div>","protected":false},"author":6,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"_monsterinsights_skip_tracking":false,"_jetpack_memberships_contains_paid_content":false,"footnotes":""},"categories":[14],"tags":[],"class_list":["post-405","post","type-post","status-publish","format-standard","hentry","category-visualbasic6-0-vb"],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"_links":{"self":[{"href":"https:\/\/www.auctionpro.co.kr\/index.php?rest_route=\/wp\/v2\/posts\/405","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.auctionpro.co.kr\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.auctionpro.co.kr\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.auctionpro.co.kr\/index.php?rest_route=\/wp\/v2\/users\/6"}],"replies":[{"embeddable":true,"href":"https:\/\/www.auctionpro.co.kr\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=405"}],"version-history":[{"count":0,"href":"https:\/\/www.auctionpro.co.kr\/index.php?rest_route=\/wp\/v2\/posts\/405\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.auctionpro.co.kr\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=405"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.auctionpro.co.kr\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=405"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.auctionpro.co.kr\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=405"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}