Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö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ÈçºÎ¸øD3DÓÎϷдÆÁ - VB / API

ÏëÔÚwarcraft3Àï½øÐÐдÆÁ²Ù×÷¡¾Èç¶Ôսƽ̨ÖеÄʤ¸ºÌáʾÐÅÏ¢¡¿£¬Ð§¹û¾ÍÏñÓÎϷƽ̨ÖÐÒ»Ñù£¬ÎÒÊÔ¹ýÔÚÒ»´°¿ÚÖÐдÈëÎÄ×Ö£¬È»ºóÒ»Ö±Èô°¿ÚÇ¿ÖÆ×îǰ£¬ËäÈ»ÄÜʵÏÖÎÄ×ÖÏÔʾ£¬µ«ÊÇÎÄ×ֻ᲻¶ÏÉÁ˸£¬¶øÇÒÓв»È·¶¨BUG£¬Í¨¹ýÂÛ̳ËÑ ......

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

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

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

vbµÄÀàÖÐʹÓÃ×Ô¶¨ÒåÀàÐÍÊý¾ÝµÄÎÊÌâ - VB / »ù´¡Àà


ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......

¹ØÓÚVB DIM ds as new DataSetÎÊÌâ - VB / »ù´¡Àà

DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.

datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......

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ºÅ