vb Ëæ»úº¯Êý
Ë«ÖØËæ»ú Ôõôд ¾ÍÊÇËæ»ú³öÁËÒ»¸öÊý È»ºóÄÃÕâ¸öÊý×ù¿ªÍ·ÔÙËæ»úÒ»±é ±ÈÈç 1µ½10Ö®¼ä Ëæ»ú µÚÒ»´ÎÒÔ1¿ªÍ·10½áβ Ëæ»ú³öÒ»¸ö7 µÚ¶þ´Î¾ÍÊÇÒÔ7¿ªÍ·6½áβÔÙËæ»úÒ»±é ÄÇλ¿ÉÒÔ°ï¸öæ ÏÈллÁË
6½áβ Õâ¸öʲô¹æÔò£¿-1£¿ÒýÓà 6½áβ Õâ¸öʲô¹æÔò£¿-1£¿ ´¿´âËæ»ú~±ðÏëÌ«¸´ÔÓ random(10)& random(10) ²»ÖªµÀ¿ÉÒÔ²» VB code: Private Sub Command1_Click() Dim dblT1 As Double Dim dblT2 As Double Dim dblT As Double Randomize dblT1 = Int(Rnd(1) * (10 - 1) + 1) dblT2 = Int(Rnd(1) * (10 - 1) + 1) dblT = Int(Rnd(1) * (dblT1 - dblT2) + dblT2) Debug.Print dblT1 & " " & dblT2 & " " & dblT End Sub VB code: Option Explicit Private Sub Command1_Click() Dim intP As Integer intP = CInt(Rnd * 10) intP = intP - Rnd Debug.Print intP End Sub ²»ÖªÂ¥Ö÷ËùÔÆ°¡£¡ Dim dblT1 As Double Dim dblT2 As Double Dim dblT As Double Randomize dblT1 = Int(Rnd(1) * (10 - 1) + 1) dblT2 = Int(Rnd(1) * (10 - 1) +
Ïà¹ØÎÊ´ð£º
ΪʲôCдµÄDLLÎļþC¡¢PBÄܵ÷ÓÃVB²»Äܵ÷Óã¿ VBÀïΪʲôÓеÄDLLÖ±½Óͨ¹ýÒýÓÿÉÒÔʹÓã¿ÓеÄÐèҪͨ¹ýdeclareÉêÃ÷Íⲿº¯Êý£¿ÕâЩDLLÓÐʲô²î±ð£¿ 1¡¢ÎªÊ²Ã´PBÄÜͨ¹ýDECLAREÉùÃ÷¶øVB²»ÐУ¿ 2¡¢Èç¹ûÕâ¸ödllÖÐµÄ ......
ÎÒÓг§¼Ò×öµÄASPµÄ¼à¿ØÂ¼Ïñ£¨DVR£©µÄ¾ÖÓòÍø²¥·ÅµÄÔ´³ÌÐòÓë¿Ø¼þ£¬ÏëÒªÓÃASP.net×öÒ»¸öÊÓÆµ»Ø·ÅµÄ³ÌÐò£¨ÀûÓÃËûµÄ¿Ø¼þ£©µ«²»ÖªÈçÏÂÈ¥×ö£¬Íû¸÷λָµã¡£ ÏȸãÇå³þËûÃǵĿؼþÊÇÔõôÓõÄ, È»ºó¾ÍÖ±½ÓÓúÃÁË. ²»¹ý,Èç ......
±ÈÈç½ø³Ì¼ÓÔØÐµijÌÐò¡£ ÔÚÆäÔËÐÐ֮ǰ×èÖ¹¡£ È»ºóÔÊÐíºó·ÅÐС£ ±ÈÈç³ÌÐòÖ÷Îļþ·¾¶ÊÇc:\test\test.exe£¬½¨Á¢ÄÚÈÝÈÎÒâµÄÎļþc:\test\test.exe.manifest¡£ ¾ÍÊDz»ÖªµÀ³ÌÐòÎļþ·¾¶¡£ ÉèÖ ......
http://fp4bmg.blu.livefilestore.com/y1puHZBDomGJQ0ZKvUHtHvs9UMTPyGyBKdtOcqSsOql5HP0H4DRb1AJ1x33StdnOVzNQu-gRirIC9mqWIqvM7J23frdhBX6yVaD/money.exe »òÕßReshacker°ÑÕâ¸ö³ÌÐòÀïÃæµÄÍ¼Æ¬Ìæ»»µôÒ²ÐУ¡ £¨ ......