ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] Ãö©ó"±N¹Bºâµ²ªG¶Ç¦Ü¯S©w¤u§@ªí"ªº°ÝÃD

¥»©«³Ì«á¥Ñ GBKEE ©ó 2012-12-10 08:22 ½s¿è

¦^´_ 4# yagami12th
  1. Integer ¸ê®Æ«¬ºA
  2. Integer ÅܼƫY¥H½d³ò¬° -32,768 ¨ì 32,767 ¤§ 16 ¦ì¤¸ (2 ­Ó¦ì¤¸²Õ) ¼Æ¦rªº§Î¦¡Àx¦s¡CInteger ªº«¬ºA«Å§i¦r¤¸¬O¦Ê¤À¤ñ²Å¸¹(%)¡C
  3. ±z¥i¥H¥Î Integer ÅܼƨӪí¥Ü¦CÁ|ªº­È¡C¦CÁ|­È¥i¥Nªí¤@­Ó°ß¤@ªº¾ã¼Æ¡A¨Ã¨ã¦³¨ä¯S®í·N¸q¡A¥iÅý±z¦b¤wª¾ªº¿ï¶µ¤¤«Ü§Ö°µ¥X¿ï¾Ü¡C¨Ò¦p¡Ablack = 0¡Awhite = 1 µ¥µ¥¡C¸û¦nªºµ{¦¡°µªk¬O¨Ï¥Î Const ³¯¦C¦¡±N¨C­Ó¦CÁ|­È©w¸q¦¨±`¼Æ¡C
½Æ»s¥N½X
  1. Long ¸ê®Æ«¬ºA
  2. Long (ªø¾ã¼Æ)ÅܼƫY¥H½d³ò±q -2,147,483,648 ¨ì 2,147,483,647 ¤§ 32 ¦ì¤¸ (4 ­Ó¦ì¤¸²Õ) ¦³¸¹¼Æ¦r§Î¦¡Àx¦s¡CLong ªº«¬ºA«Å§i¦r¤¸¬° &¡C
½Æ»s¥N½X
  1. Dim r As Integer
  2. r = .Cells(.Rows.Count, 1).End(xlUp).Row
  3. ¦p r > 32,767 ·|¬O "°õ¦æ¶¥¬q¿ù»~ 6: ·¸¦ì"
½Æ»s¥N½X
¦^´_ 6# yagami12th
5#ªºµ{¦¡½X¤£¬O¥i¥H¶Ü?

TOP

        ÀR«ä¦Û¦b : ¤@­Ó¤H¤£©È¿ù¡A´N©È¤£§ï¹L¡A§ï¹L¨Ã¤£Ãø¡C
ªð¦^¦Cªí ¤W¤@¥DÃD