GxSymbol °´Ã¼¿¡¼ VShortThValues°ªÀ» Á¶È¸ÇÏ·Á°í ¾Æ·¡¿Í °°ÀÌ ÀÛ¼º
Çߴµ¥ MsgBox (Global_VShortThValues_call(5)) ¹®Àå¿¡¼
¾Æ·¡¿Í °°Àº ¿¡·¯¸Þ¼¼Áö°¡ ¹ß»ýÇÕ´Ï´Ù.
"'438' ·±Å¸ÀÓ ¿À·ù°¡ ¹ß»õÇÏ¿´½À´Ï´Ù.
°³Ã¼°¡ ÀÌ ¼Ó¼º ¶Ç´Â ¸Þ¼µå¸¦ Áö¿øÇÏÁö ¾Ê½À´Ï´Ù"
VShortThValues °ªÀ» Á¶È¸ÇÏ·Á¸é ¾î¶»°Ô ÇØ¾ßµÇ´ÂÁö È®ÀÎ ºÎʵ右´Ï´Ù.
--------------------------------------------------------------
Public G_objServer As GxServer
Public G_obj_Call_Symbol As GxSymbol
Dim Global_VShortThValues_call As Variant
Set G_obj_Call_Symbol = G_objServer.SymbolStore("201G6250")
Global_VShortThValues_call = G_obj_Call_Symbol.VShortThValues
MsgBox (Global_VShortThValues_call(5)) --> ¿¡·¯¹ß»ý