-
-
-
-
ÀÚ·áÇü º¯¼ö¿Í »ó¼ö
-
- ÇÁ·Î±×·¥À» ÀÛ¼ºÇÏ´Ùº¸¸é Á¾Á¾
¾î¶² °ªÀ» ÀÓÀÇÀÇ ÀúÀå°ø°£¿¡ ÀúÀåÇØ¾ß ÇÒ ¶§°¡ ÀÖ´Ù.
- º¯¼ö¶õ
ÀÌ·¯ÇÑ ÀÓÀÇÀÇ ÀúÀå°ø°£À» ¶æÇϸç ÀúÀåµÇ´Â °ªÀ» »ó¼ö¶ó°í ¸»ÇÑ´Ù.
¿¹¸¦ µé¾î Name = "È«±æµ¿", Number = 2 ó·³ ¾µ
¼ö°¡ Àִµ¥ Ç®¾îº¸ÀÚ¸é NameÀ̶õ º¯¼ö¿¡ "È«±æµ¿"À̶õ »ó¼ö¸¦, Number¶õ
º¯¼ö¿¡ 2 À̶ó´Â »ó¼ö¸¦ ÀúÀåÇÑ´Ù´Â ¶æÀÌ´Ù.
-
- ±×·¯¸é
ºñÁÖ¾ó º£ÀÌÁ÷ÀÌ ¾î¶»°Ô º¯¼ö¸¦ ¼±¾ðÇÏ¸ç »ó¼ö¸¦ ÀúÀåÇÏ´ÂÁö ±×¸®°í ÀÌ´Â ³»ºÎÀûÀ¸·Î
¾î¶»°Ô ÄÄÆÄÀϵǴÂÁö ¾Ë¾Æº¸ÀÚ.
- ¿¹Á¦)
Option Explicit
Private sub Command1_Click()
Dim Name as String
Dim Number as Integer
Dim Temp
Name = "È«±æµ¿"
Number
= 2
Temp = "¹®ÀÚ¿Àε¥.."
Temp
= 5
End sub
- ÄÚµåÀ©µµ¿ì»óÀÇ
¼Ò½ºÄÚµåÀÌ´Ù. (ÄÚµåÀ©µµ¿ì´Â Á÷Á¢ ÄÚµùÀ» ÇÏ´Â ¿¡µðÅÍâÀ» ¸»Çϸç ÀÌ´Â ÄÁÆ®·ÑÀ»
´õºíŬ¸¯Çϰųª (º¸±â-ÄÚµå ¸Þ´º¸¦ ÅëÇØ È®ÀÎÇÒ ¼ö ÀÖ´Ù) Command1_ClickÀº À̺¥Æ®
ÇÁ·Î½ÃÀú·Î¼ Ä¿¸Çµå ¹öưÀ» Ŭ¸¯ÇßÀ» ¶§ ¹ß»ýÇÏ´Â À̺¥Æ®ÀÌ´Ù. ¸¸¾à Label (¶óº§)
ÄÁÆ®·ÑÀ» Ŭ¸¯ÇÑ´Ù¸é Label_Click ÀÌ ¹ß»ýÇÏ°Ô µÉ °ÍÀ̸ç _ ¾ÕÀÇ ¹®ÀÚ´Â ÇØ´ç
ÄÁÆ®·ÑÀÇ À̸§ÀÌ´Ù. À̰ÍÀº ÄÁÆ®·ÑÀÇ Name ¼Ó¼º°ª°ú µ¿ÀÏÇÏ´Ù.
- Dim
- º¯¼ö ¼±¾ð ¸í·É¾î
as [ÀÚ·áÇü] - ÀÚ·áÇü ÇüÅ ¼±¾ð ¸í·É¾î
-
- »ç¿ëÀÚ°¡
ÀÌó·³ º¯¼öÀÇ ¼±¾ð°ú »ó¼ö°ªÀ» Á¤ÇØÁÖ¸é º£ÀÌÁ÷Àº ÄÄÆÄÀÏ °úÁ¤¿¡¼ Áָ޸𸮿¡
º¯¼öÀÇ Çü¿¡ ¾Ë¸Â´Â ¸Þ¸ð¸®¸¦ ÇÒ´çÇØ ÁÖ¸ç °ªÀ» ³Ö°Ô µÈ´Ù.
±×·³ ¾ðÁ¦ °ªÀ»
³Ö¾îÁÖ°Ô µÉ±î?
½ÇÁ¦·Î ±× °ªÀ» ÀúÀåÇÏ´Â ¼ø°£Àº ÇÁ·Î±×·¥À» ½ÇÇà½Ã۸é¼
Ä¿¸Çµå ¹öưÀ» Ŭ¸¯ÇßÀ» ¶§ ¹ßÇàÇÑ´Ù. ÀÌ·¯ÇÑ »óȲÀº ¾î¶² ÄÁÆ®·Ñ ¾î¶² À̺¥Æ®¿¡¼
º¯¼ö¸¦ »ç¿ëÇÏ´À³Ä¿¡ µû¶ó Ʋ¸®´Ù. À§ Äڵ带 '½ÇÇàÆÄÀÏ ¸¸µé±â' ¸Þ´º¸¦ ÀÌ¿ëÇØ
½ÇÇàÆÄÀÏÀ» ¸¸µé¾î ½ÇÇà½ÃŰ´Â °ÍÀ» ÇÁ·Î±×·¥ÀÇ RunTime ±¸µ¿À̶ó°í ¸»ÇÑ´Ù.
±×·±µ¥ º¯¼ö¼±¾ð½Ã ¸¸¾à as [ÀÚ·áÇü]À» »ý·«ÇÑ´Ù¸é ¾î¶»°Ô µÉ±î?
'°¡º¯Çü
' ÀÚ·áÇüÀ̶ó´Â °ÍÀÌ ÀÖ´Ù.
À̰ÍÀº »ç¿ëÀÚ¿¡°Ô ÆíÀǸ¦ Á¦°øÇÏ´Â ¹æ¹ýÀÇ
Çϳª·Î¼ °¡º¯Çü ÀÚ·áÇüÀ¸·Î ¼±¾ðµÈ º¯¼ö¿¡ ÇÒ´çµÈ »ó¼ö°¡ ¾î¶² ÀÚ·áÇüÅ¿¡ µû¶ó
±× ¼ø°£ º¯¼öÀÇ ÀÚ·áÇüÀ» °áÁ¤ÇÏ´Â À¯µ¿ÀûÀÎ ÀÚ·á¼±¾ðÀÇ Çü½ÄÀÌ´Ù.
ˤ˂
Temp°¡ ±× »ç¿ë ¿¹ÀÌ´Ù.
ù¹øÂ°¿£ ¹®ÀÚ¿ »ó¼ö¸¦ ¹Þ¾ÆµéÀÌ´Â ¹®ÀÚ¿ º¯¼ö·Î¼
±× ±â´ÉÀ» ÇßÁö¸¸, ¹Ù·Î ´ÙÀ½ ÁÙ¿¡¼± 5¶ó´Â Á¤¼öÇü µ¥ÀÌÅ͸¦ ¹Þ¾ÆµéÀÌ´Â Á¤¼öÇü
º¯¼ö·Î »ç¿ëµÇ¾ú´Ù. ¹°·Ð À§ Temp ÀÇ ÄÚµåµéÀº ¿¹¸¦ º¸¿©ÁÖ±â À§ÇÑ °ÍÀ¸·Î½á
½ÇÁ¦ Àú·¸°Ô ¹Ù·Î ¹Ù²Ù¾î »ç¿ëÇÒ °æ¿ì´Â ¾øÀ» °ÍÀÌ´Ù.
Option Explicit ¶õ
¼Ò½ºÀÇ ÀϹݼ±¾ðºÎ¿¡¼ »ç¿ëµÇ´Âµ¥ ÀÌ´Â ¸ðµâ¼öÁØ¿¡¼ »ç¿ëµÇ´Â ¸ðµç º¯¼ö´Â
¹Ýµå½Ã ¼±¾ð ÈÄ »ç¿ëÇ϶ó´Â ¸í·É¹®ÀÌ´Ù. ¸ðµâ¼öÁØÀ̶õ Àü¿ªº¯¼ö¿Í °°ÀÌ Æû Àüü¿¡
Àû¿ëµÇ´Â ¹üÀ§¶ó°í »ý°¢ÇÏ¸é µÈ´Ù.
¸¸¾à Æû¿¡¼ »ç¿ëµÇ´Â Àü¿ªº¯¼ö¸¦ ÀϹݼ±¾ðºÎ¿¡¼
¼±¾ðÇÏÁö ¾ÈÀº ä ¼Ò½º ¾îµð¼±°¡ ¼±¾ðÇÑ´Ù¸é ÄÄÆÄÀÏ ¿À·ù°¡ ¹ß»ýÇÏ°Ô µÈ´Ù.
¹Ý´ë·Î Option Explicit¸¦ ¾²Áö ¾Ê´Â´Ù¸é ÇÁ·Î½ÃÀú ¾Æ¹« °÷¿¡¼³ª Àü¿ªº¯¼ö¸¦
Ưº°ÇÑ ¼±¾ð¾øÀÌ »ç¿ëÇÒ ¼ö ÀÖ´Ù.
¿¹¸¦ µé¾îº¸ÀÚ.
Private sub Command1_Click()
Name = "È«±æµ¿"
End sub
- ÀϹݼ±¾ðºÎ¿¡
Option Explicit¶ó´Â ¸í·É¹®À» »ç¿ëÇÏÁö ¾ÊÀ¸¸é À§ ÄÚµå´Â ¿¡·¯¾øÀÌ Á¤»óÀûÀÎ
ÀÛµ¿À» ÇÑ´Ù. ÇÏÁö¸¸ Option Explicit ¸¦ ¾²¸é '¼±¾ðµÇÁö ¾Ê´Â ... ' ÀÌ·± ¸Þ¼¼Áö°¡
¶ß°Ô µÉ °ÍÀÌ´Ù.
Option Explicit ¹®À» ¾²Áö ¾Ê°í Æû ÄÚµå ¾îµð¼±°¡ ¼±¾ðµÇÁö
¾Ê´Â º¯¼ö¸¦ »ç¿ëÇÑ´Ù¸é À̰ÍÀº ¾Ï½ÃÀûÀÎ Àü¿ªº¯¼ö·Î½á ºñº£´Â ÀνÄÀ» ÇÏ°Ô µÇ´Âµ¥...
¹°·Ð À̰ÍÀÌ ÆíÇÒ ¶§µµ ÀÖ´Ù.
±×·¯³ª ÁÁÀº ½À°üÀ̶ó°ï »ý°¢ÇÏÁö ¾Ê´Â´Ù.
ÁÁÀº ÄÚµå´Â °¡µ¶¼º, Áï ³²ÀÌ Àо ½±°Ô ÀÌÇØÇÒ ¼ö ÀÖ¾î¾ß ÇÑ´Ù°í »ý°¢Çϱâ
¶§¹®ÀÌ´Ù. ±ÍÂú´õ¶óµµ ¸í½ÃÀûÀÎ º¯¼öÀÇ »ç¿ëÀ» ½À°üÈÇßÀ¸¸é ÇÑ´Ù.
±×¸®°í
°¡º¯Çü º¯¼öÀÇ »ç¿ë ¿ª½Ã º»ÀÎÀº ÀÚÁ¦Ç϶ó°í ÇÏ°í ½Í´Ù. Àû´çÇÑ »ó¼ö°ªÀ» ³Ö¾îÁÖ¸é
¾Ë¾Æ¼ µ¥ÀÌŸÇüÀ» °áÁ¤ÇÏ´Â Æí¸®ÇÔÀº ÀÖÁö¸¸, È®½ÇÇÑ ÀÌÇØ¸¦ Çϰí ÀÖ´Â »óŰ¡
¾Æ´Ï¶ó¸é ºñÁÖ¾ó º£ÀÌÁ÷¿¡°Ô ±×·±°Í±îÁö ¸Ã±æ ÇÊ¿ä´Â ¾ø´Ù°í º»´Ù.
³¡À¸·Î
ÀÚ·áÇüÀÇ ¸î°¡Áö Çü½Ä¿¡ ´ëÇØ¼ ¾ð±ÞÀ» ÇϰڴÙ.
- Á¤¼ö(Integer,
Long), ½Ç¼ö(Single, Double), ¹®ÀÚ¿(String), ³í¸®Çü(Boolean)ÀÌ ÀÖ´Ù.
- Á¶±Ý
´õ ÀÚ¼¼È÷ ¼³¸íÇØ º¸ÀÚ
Dim º¯¼ö¸í [As µ¥ÀÌÅÍÇü]
º¯¼ö¸íÀº ¹Ýµå½Ã ´ÙÀ½°ú
°°Àº ±ÔÄ¢À» µû¶óÁÖ¾î¾ß ÇÑ´Ù.
1. ¹Ýµå½Ã ¿µ¹®ÀÚ·Î ½ÃÀÛÇÑ´Ù.(ÇÑ±ÛÆÇ VB
5À̻󿡼´Â Çѱ۷Π½ÃÀÛÇÒ ¼öµµ ÀÖ´Ù)
2. º¯¼ö¸íÀÇ ±æÀÌ´Â 255ÀÚ¸¦ ÃʰúÇÒ
¼ö ¾ø´Ù.
3. C, C++ µî°ú´Â ´Þ¸® VB¿¡¼´Â ´ë¼Ò¹®ÀÚ¸¦ ±¸º°ÇÏÁö ¾Ê´Â´Ù.
Áï, "abc"³ª "ABC"³ª °°Àº º¯¼öÀÌ´Ù.
-
º¯¼öÀÇ µ¥ÀÌÅÍÇü
- VB¿¡¼ º¯¼ö·Î Á¤ÀÇÇÒ ¼ö ÀÖ´Â
µ¥ÀÌÅÍŸÀÔ¿¡´Â ´ë·« ´ÙÀ½ÀÇ 10°¡Áö Á¤µµ·Î ±¸ºÐµÈ´Ù.
(Variant, Integer,
Long(Long Integer), Single, Double, Currency, Byte, String, Boolean, Object)
* Variant : VBÀÇ ±âº» µ¥ÀÌÅÍ Å¸ÀÔ
Dim X
Dim
Y
Dim Z
ÀÌ °æ¿ì, º¯¼ö X, Y, Z´Â ¸ðµÎ VBÀÇ
±âº» µ¥ÀÌÅÍŸÀÔÀÎ Variant ŸÀÔÀ¸·Î ¼±¾ðµÈ´Ù. Áï À§ÀÇ ¹®ÀåÀº ´ÙÀ½°ú
°°ÀÌ ÇÒ ¼öµµ ÀÖ´Ù.
Dim X as Variant
Dim
Y as Variant
Dim Z as Variant
Variant¶ó´Â
°ÍÀº ¾î¶² Á¾·ùÀÇ µ¥ÀÌÅ͵µ ÀúÀåÇÒ ¼ö ÀÖ´Â µ¥ÀÌÅÍŸÀÔÀÌ´Ù. ´Ù½Ã ¸»ÇØ
º¯¼ö X, Y, Z¿¡ Á¤¼ö³ª, ½Ç¼ö, ¹®ÀÚ¿ µî ¾î¶² Á¾·ù¶óµµ µé¾î°¥ ¼ö ÀÖ´Ù´Â ¸»ÀÌ´Ù.
* Integer, Long, Single, Double : ¼ýÀÚ µ¥ÀÌÅÍ Çü½Ä
À̵éÀº
¸ðµÎ ¼ýÀÚ µ¥ÀÌÅÍ Çü½ÄÀÌ´Ù. Integer ´Â Á¤¼öÇü(-32768 ~ 32767), Longµµ
Á¤¼öÇüÀÌÁö¸¸ Integerº¸´Ù 2¹è ¸¹Àº ±â¾ïÀå¼Ò¸¦ Â÷ÁöÇÑ´Ù(-2,147,483,648 ~ 2,147,483,647).
¸¸¾à °¢ º¯¼öÇü¿¡ ¹üÀ§¸¦ ÃʰúÇÏ´Â °ªÀ» Áý¾î ³ÖÀ¸·Á°í ÇÏ¸é ¿¡·¯°¡ ¹ß»ýÇÑ´Ù.
SingleÀº ´Ü Á¤µµ¶ó°í ÇØ¼ À¯È¿¼ýÀÚ°¡ ´ÜÁ¤µµ ÇüÅÂÀÎ 32ºñÆ® ½Ç¼öÇüŸ¦
¸»Çϸç, DoubleÀÇ °æ¿ì´Â ¹èÁ¤µµ·Î À¯È¿¼ýÀÚÀÇ ´ÜÀ§°¡ Single¿¡ ´ëÇØ¼ 2¹èÀÎ
64ºñÆ® ½Ç¼ö¸¦ »ç¿ëÇÑ´Ù.
-
Dim j as Integer
Dim k as Long
Dim l as Single, m as Double
j = 100
k = 123456789
l = 10.234
m = 2.9321238
* Currency : °íÁ¤¼Ò¼öÁ¡ µ¥ÀÌÅÍ Çü½Ä
- ÀÌ
ŸÀÔÀº À§ÀÇ SingleÀ̳ª DoubleµîÀÇ ºÎµ¿¼Ò¼öÁ¡ ½Ç¼ö¿¡ ºñÇØ¼, °íÁ¤¼Ò¼öÁ¡ ÇüŸ¦
ÃëÇÏ´Â ½Ç¼ö·Î, ¼Ò¼öÁ¡ ÀÌ»ó 15ÀÚ¸®¿Í ¼Ò¼öÁ¡ ÀÌÇÏ 4ÀÚ¸®±îÁö ÀúÀåÇÒ ¼ö ÀÖ´Ù.
ºü¸£°í Á¤È®ÇϹǷΠ±Ý¾× µîÀ» ÀúÀåÇϴµ¥ ÀûÇÕÇÏ´Ù.
Dim
c as Currency
c = 100.99
* Byte : ÀÌÁø
Çü½Ä
ÀÌ Å¸ÀÔÀº ¹ÙÀ̳ʸ®, Áï ÀÌÁø¼öÇüÅÂÀÇ ÀڷḦ ¼±¾ðÇÒ ¶§
»ç¿ëµÈ´Ù. ±âº»ÀûÀ¸·Î ¹è¿ÇüÀÇ ÀÚ·á·Î ¼±¾ðµÇ¸ç, Byte(n)ÀÇ Å¸ÀÔÀ̸é
n¹ÙÀÌÆ®ÀÇ ÀڷḦ ÀÐÀ» ¼ö ÀÖ´Ù.
Dim h(20) as Byte
h()
= LoadFromFile("test.txt")
* String : ¹®ÀÚ¿ Çü½Ä
ÀÌ Å¸ÀÔÀº ¹®ÀÚ¿À» ÀúÀåÇϴ ŸÀÔÀ¸·Î, VB¿¡¼´Â ¹®ÀÚ¿Àº Ç×»ó
Å«µû¿ÈÇ¥(" ")³ª, ÀÛÀºµû¿ÈÇ¥(' ')·Î µÑ·¯½Î¾ß ÇÑ´Ù.
¸¸¾à
¹®ÀÚ¿ÀÇ Å©±â¸¦ ÁöÁ¤ÇÏ°í ½Í´Ù¸é String * nÀÇ ÇüÅ·ΠÁöÁ¤ÇÒ ¼ö ÀÖ´Ù.
Dim h as String 'Size¿Í
»ó°ü¾øÀ½
Dim j as String
- *
5 'Size 5ÀÎ ¹®ÀÚ¿ º¯¼ö¼±¾ð
Dim k as String * 3 'Size 3ÀÎ
¹®ÀÚ¿ º¯¼ö ¼±¾ð
* Boolean(³í¸®Çü)
VB 4.0¿¡¼ºÎÅÍ
Ãß°¡µÈ ŸÀÔÀ¸·Î, True¿Í False ÀÌ·¸°Ô µÎ°¡ÁöÀÇ °ª¸¸À» ´Ù·ê ¼ö ÀÖ´Ù. ÀÌ
ŸÀÔÀº ³í¸®¿¬»êÀÇ °á°ú µîÀ» ´Ù·ê ¶§ ƯÈ÷ À¯¿ëÇÏ´Ù.
Dim YesOrNo
as Boolean
YesOrNo = False
* »ç¿ëÀÚ Á¤ÀÇ Å¸ÀÔ
VB¿¡¼´Â Type¿¹¾à¾î¸¦ ½á¼ ÇÊ¿äÇÑ ±¸Á¶Ã¼
º¯¼ö¸¦ Á¤ÀÇÇÒ ¼ö ÀÖ´Ù. »ç¿ëÀÚ¿¡ ÀÇÇØ¼ Á¤ÀÇµÈ ±¸Á¶Ã¼ º¯¼ö´Â <¼Ó¼º¸¸
ÀÖ´Â °³Ã¼>¿Í °°ÀÌ ¿òÁ÷ÀδÙ. »ç¿ëÀÚ´Â ÀÌ ±¸Á¶Ã¼ÀÇ ¸ðµç º¯¼öµé¿¡
Á¢±ÙÇÒ ¼ö ÀÖ´Ù.
Type Computer
CPU
as String
RAM as Integer
HDD as Single
End Type
Dim Mycom as Computer
Private Sub Form_load()
Mycom.CPU
= "ÆæÆ¼¾ö"
Mycom.RAM
= 64
Mycom.HDD = 10.1
End Sub