不要笑我！

我在一些书中经常看到这样的一鞋句子：Private   Declare   Function   ClipCursor   Lib   "user32"   (lpRect   As   Any)   As   Long  
  Private   Type   RECT  
                  Left   As   Long  
                  Top   As   Long  
                  Right   As   Long  
                  Bottom   As   Long  
  End   Type  
  Dim   POP   As   RECT  
  Dim   bln   As   Boolean  
   
  Private   Sub   Command1_Click()  
  If   bln   =   True   Then  
  POP.Right   =   0:   POP.Bottom   =   0  
  POP.Left   =   0:   POP.Top   =   0  
  ClipCursor   POP:   bln   =   False  
  Else  
  ClipCursor   ByVal   0&:   bln   =   True  
  End   If  
  End   Sub  
   
  Private   Sub   Form_KeyDown(KeyCode   As   Integer,   Shift   As   Integer)  
  If   KeyCode   =   13   Then  
  End  
  End   If  
  End   Sub  
   
  Private   Sub   Form_Load()  
  bln   =   True  
   
  End   Sub  
  这里面“   ：”是什么意思？  
  “：”的作用是什么？  
   
   
  问题点数：20、回复次数：5Top

1 楼evbsky（梁溪河畔）回复于 2002-04-23 07:16:49 得分 0

“：”的作用是把两句并在一句内写  
   
  POP.Right   =   0:   POP.Bottom   =   0  
   
  等同于  
   
  POP.Right   =   0  
  POP.Bottom   =   0  
   
  Top

2 楼Lotsof（骆卓夫）回复于 2002-04-23 07:18:34 得分 0

ClipCursor   ByVal   0&:   bln   =   True  
  这一句也是并在一起写吗？Top

3 楼zjybest（小勇）回复于 2002-04-23 08:01:09 得分 7

可以在一行里面同时放进几条语句，  
  如：    
  一般是         i=1  
                    i=i+1  
    可以用“：”   来处理成为一行  
            i=1   :   i=i+1  
  这两段是等价的  
  请给分好吗  
  Top

4 楼wwfang（晴天）回复于 2002-04-23 08:17:30 得分 8

并不是合并，只是把两条语句写在同一行内(视觉上的不同而已)，这两条语句可能有关系，如求坐标时经常把表示坐标的两个点的变量放在同一行内(xPox=xxx:yPox=xxx)；同时这两条语句也可能没有任何关系，就好像你上面的代码。  
  还有一种情况：当If语句后只有一条语句时通常可以写在一行内而不需要使用End   if，如：If   a=b   then   exit   subTop

5 楼vivan19781111（vivan kaici）回复于 2002-04-23 08:46:52 得分 5

把多条语句写在一行上，也可以不用“：”把语句分开写。Top

相关问题

• 语句
• bln
• 一行
• clipcursor
• pop
• bottom
• sub
• right
• long

• 帖主：Lotsof
• zjybest
• wwfang
• vivan19781111

• Visual Basic类图书
• Visual Basic类源码下载