ΪʲôҪСÐÄʹÓÃVB6µÄ±È½Ï²Ù×÷·û

ZDNetÈí¼þƵµÀ¡¡Ê±¼ä£º2006-01-13¡¡×÷ÕߣºPeter Aitken | ¡¡ÎÒÒªÆÀÂÛ(7)
±¾ÎĹؼü´Ê£ºPeterAitken vb Microsoft microsoft
Äã¿ÉÄÜ»áÈÏΪif MyObjÊÂʵÉϾÍÊÇNothing£¬¶øVB6²»»áÈ¥¹ÜÕâ¸öÓï¾äʣϵÄÄÚÈÝ¡ª¡ªÓÈÆäÊÇMyObj.Count > 0ÕâÒ»²¿·Ö¡£
ÔÚÌõ¼þ¾äÀïʹÓÃÁ½¸ö»ò¸ü¶àµÄ±È½ÏÊǺܳ£¼ûµÄ£¬¾ÍÏñÏÂÃæÕâÑù£º

If X < 0 And Y > 100 Then
...
End If

µ«ÊÇ£¬ÓÐʱºò»á´øÀ´Ò»Ð©ÎÊÌ⣬ÓÈÆäÊÇÔÚʹÓöÔÏó²Î¿¼µÄʱºò¡£ÀýÈ磬ÄãÈç¹ûÏëÒªÖ´ÐÐÒ»¶Î´úÂ룬ÄÚÈÝÊÇif MyObj²Î¿¼Ò»¸öÓÐЧ¶ÔÏóÇÒ¶ÔÏóµÄCountÊôÐÔ´óÓÚ0£¬ÄÇôÄã¿ÉÄÜ»áÕâÑùд£º

If Not MyObj Is Nothing And MyObj.Count > 0

Äã¿ÉÄÜ»áÈÏΪif MyObjÊÂʵÉϾÍÊÇNothing£¬¶øvb6²»»áÈ¥¹ÜÕâ¸öÓï¾äʣϵÄÄÚÈÝ--ÓÈÆäÊÇMyObj.Count > 0ÕâÒ»²¿·Ö¡£µ«ÊÇ£¬Õâ¿É²»ÊÇvbµÄ¹¤×÷·½Ê½¡£¼´Ê¹if MyObjÊÇNothing£¬vb»¹ÊÇ»á¼ÆËãMyObj.Count£¬Õâ¾Í»á²úÉú´íÎó¡£Äã¿ÉÒÔͨ¹ýǶÌ×ʹÓÃÁ½¸öifÓï¾äÀ´±ÜÃâÕâ¸öÎÊÌ⣺

If Not MyObj Is Nothing Then
If MyObj.Count > 0 Then
....
End If
End If

ÔðÈα༭£ºÕŬQ

²é¿´±¾ÎĵĹú¼ÊÀ´Ô´

PeterAitken

vb

Microsoft

microsoft

Óû§ÆÀÂÛ
̞
ÆÀÂÛÄÚÈÝ
·¢±íʱ¼ä
- ·¢±íÆÀÂÛ -
ÄäÃû
×¢²áÓû§

°Ù¶È´óÁªÃËÈÏÖ¤»Æ½ð»áÔ±Copyright© 1997- CNET Networks °æȨËùÓС£ ZDNet ÊÇCNET Networks¹«Ë¾×¢²á·þÎñÉ̱ꡣ
ÖлªÈËÃñ¹²ºÍ¹úµçÐÅÓëÐÅÏ¢·þÎñÒµÎñ¾­ÓªÐí¿ÉÖ¤±àºÅ£º¾©ICPÖ¤010391ºÅ ¾©ICP±¸09041801ºÅ-159
¾©¹«Íø°²±¸£º1101082134