Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

¹ØÓÚVBµÄTreeview¿Ø¼þµÄCheckBox

£Ô£ï£ºALL

      µ±ÉèÖÃTreeview¿Ø¼þµÄCheckboxesµÄÊôÐÔÎªÕæÊ±£¬Í¬Ê±ÎªTreeview¿Ø¼þÖеĽڵã¼ÓÉÏͼ±ê£¬ÔÚForm_LoadʼþÖÐΪ²¿·Ö½Úµã´ò¹´Ê±ÈÔÈ»ÎÞЧ£¬µ«Èç¹û²»Îª½ÚµãÉèÖÃͼ±êµÄ»°£¬ºÃÏñÓÖÄÜΪ½Úµã´ò¹´£¬²»ÖªÊÇ΢ÈíµÄTreeviewÓÐÎÊÌ⣬»¹ÊÇÆäËûÔ­Òò£¬Çë¸÷λ¸ßÊÖ°ï׎â¾öÏ¡£
Àý×Ó´úÂ룺
Private Sub Form_Load()
  Dim nod As Node
   
¡¡¡¡With tvwDrvList
      .Checkboxes = True
      Set nod = .Nodes.Add(, , , "Letter", 1)
      nod.Checked = True
      Set nod = .Nodes.Add(1, tvwChild, , "A", 2)
      nod.Checked = True
      Set nod = .Nodes.Add(1, tvwChild, , "B", 2)
      nod.Checked = True
      Set nod = .Nodes.Add(1, tvwChild, , "C", 2)
      nod.Checked = True
      Set nod = .Nodes.Add(1, tvwChild, , "D", 3)
      nod.Checked = True
      Set nod = .Nodes.Add(1, tvwChild, , "E", 4)
      nod.Checked = True
      nod.EnsureVisible
    End With                         
End Sub¡¡
Ó¦¸ÃÊǸöbug¡£

ÊÔÊÔ¼Ó¸ötimer£¬interval=1£¬enabled = false
Pri


Ïà¹ØÎÊ´ð£º

ΪʲôÓÃVB¸Ä±ä²»Á˹¤¾ßÀ¸°´Å¤µÄ¿í¶È - VB / ¿Ø¼þ

Ϊʲô¹¤¾ßÀ¸°´Å¤µÄ¿í¶È¸Ä±ä²»ÁË,ÔÚÊôÐÔÀï¸ÄÁËÓÖ±ä³ÉÔ­À´µÄÊýÖµÁË

´óºú×ÓÕæÀ÷º¦£¬»Ø´ð»ù±¾¶¼ÊDZ¬Áϼ¶µÄ
´óºú×ÓÉý¼¶Õæ¿ì°¡£¬Õâ²Å¼¸Ìì¾Í5Ìõ¶Ì¿ãÍâ¼ÓÔÂÅÅÃûµÚÒ»ÁË
ÏëÏëÎÒÕâ5¸ö¶Ì¿ã»ìÁ˲¶à8Äê²ÅµÃµ½µÄ¡£

»Ø¸´ ......

VB µÄ PictureBOX ¿Ø¼þ»æÍ¼ÎÊÌâ - VB / ¿Ø¼þ

³õѧ£¬´óµ¨ÌáÎÊ£¬Çë¸ßÊÖ²»ÁߴͽÌ
1¡¢¹ö¶¯Ìõµã»÷Óë»æÍ¼°å£¨ÆÁÄ»,Piceure1£©µÄÒÆ¶¯ÎÊÌâÒѾ­½â¾ö¡£
  Picture1.Top = -VScroll1.Value + bcW '´¹Ö±Òƶ¯
  Picture1.Left = -HScroll1.Value + bcW ' ......

vb Å£Âð - Web ¿ª·¢ / vbScript

vbÊDz»ÊǺÜÅ£°¡ ÔõôÄÇô¶àµÄ²¡¶¾¶¼ÊÇvb×öµÄ°¡ c#Ðв»ÐУ¿
c#ÔÚXPÔËÐв»ÁË£¬³ý·ÇÈñðÈËÏÈ×°ÉÏ.net.
VBÏà¶ÔÓÚC,C++,ASMµÈµÈ£¬¾ÖÏÞÐÔ´ó¶àÁË¡£

±ðÔÙ˵ʲôÓïÑÔ²»ÈçʲôÓïÑԵϰÁË£¬Ö»ÓÐÄã²»»áÓûòÓÃ×Ų»Ë³ÊÖµÄÓ ......

vbÖÐÈçºÎʵÏÖ¶ÔÏóÊôÐԵĶ¯Ì¬ÉèÖà - VB / »ù´¡Àà

±¾ÈËʹÓõÄÊÇVB6.0°æ±¾
¼ÙÉèÓÐÒ»¸ö¶ÔÏóA£¬AÄÚÓÐÀàÐÍΪBµÄ¶ÔÏóÊôÐÔ¡£ÏÖÔÚµÄÎÊÌâÊÇ£¬ÐèÒªÌí¼ÓÈô¸É¸öB¶ÔÏó×÷ΪA¶ÔÏóµÄÊôÐÔ¡£È磬
 A.B1,A.B2,...
µ«¾ßÌåÌí¼Ó¶àÉÙ¸öB¶ÔÏó×÷ΪA¶ÔÏóµÄÊôÐÔÔòÊÓ¾ßÌåÇé¿ö²»Í¬¶ø²»Í¬ ......

vb crystalreport - .NET¼¼Êõ / VB.NET

Private Sub btnPrint_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnPrint.Click
  MouseWait()
  Dim ClearTempTabelSQL As String
  'If Not ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ