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

¼±¡£¡£VB±àÒëʱ³ö´í£¡£¡

 
ÓÐÇë¸÷λ¸ßÊÖ°ïÎÒ¿´¿´¡£ÎªÊ²Ã´¡­ÔÚÌí¼ÓеÄÐÅÏ¢°´¡°±£´æ¡±°´Å¥Ê±³öÏÖ¡°from×ÓÓï¾ä´íÎ󡱺͡°ÊµÊ±´íÎó-2147217900£¨800400e14£©¶ÔÏóRefreshµÄ·½·¨IAdodcʧ°Ü¡±ºÍÉÏÃæÌáʾ £¬²¢ÇÒÐòºÅÒ»ÁÐÎÞ·¨Éú³ÉÁ¬¹áÐòºÅºìȦ´¦£¬ÎªÊ²Ã´¡£¡£¡£¡£  ºÁÎÞÍ·Ð÷£¬Íûǰ±²ÃDz»ØÄ´Í½Ì˵˵ԭÒò¡£¡£ÏÈллÀ²£¡£¡£¡£¡£¡
²¿·Ö´úÂëÈçÏ£º
Private Sub cmdAdd_Click()
  isAdd = True
  SaveCancelEnabled
  AdodcReaderType.Recordset.AddNew
  TextEnabledTrue
  txtReaderTypeNo(0).SetFocus
End Sub

Private Sub cmdCancel_Click()
  If AdodcReaderType.Recordset.RecordCount > 0 Then
      AdodcReaderType.Recordset.CancelUpdata
  End If
  initialCmd
  TextEnabledFalse
  DataGridReaderType.Refresh
  AdodcReaderType.Refresh
End Sub

Private Sub cmdClose_Click()
  End
  Unload Me
End Sub

Private Sub cmdDelete_Click()
  If MsgBox("ÕæµÄҪɾ³ýÀà±ðÃû³ÆÎª£º¡¾" & Trim(txtReaderTypeName.Text) & "¡¿µÄÀà±ðÂ𣿠", vbYesNo, "ÌáʾÐÅÏ¢") = vbYes Then
    AdodcReaderType.Recordset.Delete
    AdodcReaderType.Recordset.MoveNext
    If AdodcReaderType.Recordset.EOF Then
        AdodcReaderType.Recordset.MovePrevious
        If AdodcR


Ïà¹ØÎÊ´ð£º

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

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

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

»Ø¸´ ......

ÇóÖú£ºVBµ÷Óö¯Ì¬¿âÎÊÌâ - VB / »ù´¡Àà

¸÷λ´óϺ£º
  ÎÒÊǸÕѧVB£¬ÏÖÔÚÏëÓÃVBµ÷ÓÃÒ»¸ö¶¯Ì¬¿â£¬¶¯Ì¬¿âÀïÃæÓкܶຯÊý¡£ÎÒÖªµÀʹÓÃVBµ÷Óö¯Ì¬¿âµ÷Óú¯Êý£¬ÐèÒª½«Òªµ÷Óõĺ¯ÊýÔÚ³ÌÐòÖÐÉùÃ÷¼´¿É£¬µ«ÊÇÀïÃæÓкܶຯÊý£¬²»»áÿһ¸öº¯Êý¶¼ÒªÉùÃ÷°É¡£Çë¸ ......

Vb.net Access CrystalReport - .NET¼¼Êõ / VB.NET

µÚÒ»´Î½Ó´¥CrystalReport
¼±Ñ°ÕÒVb.net Access ͨ¹ý²éѯ³öµÄÊý¾ÝÊä³öµ½CrystalReportµÄÀý×Ó.
ÓеÄÅóÓÑÂé·³·¢À´Ñ§Ï°.¶àл!
¸úÄãµÄÒªÇó²î²»¶à£¬²Î¿¼Ò»Ï£º
http://topic.csdn.net/u/20090823/21/87af02d3-f4ca-480 ......

VB µ÷Óà vc ±àдµÄdll - C/C++ / C++ ÓïÑÔ

ÓÃvc±àдµÄdllÔÚdebugģʽºÍreleaseģʽÏÂÆô¶¯vbµÄexe³ÌÐòµ÷ÓÃvcµÄdll¿ÉÒԵõ½ÕýÈ·½á¹û£¬µ«ÊÇÈç¹ûÖ±½ÓË«»÷vbµÄexe³ÌÐòµ÷ÓÃdll±¨´í£¬ÔÚdllÄÚ²¿Ìí¼Ómessageboxºó·¢ÏÖÖ»ÒªÔÚº¯ÊýÄÚ²¿ÉùÃ÷std::stringÀàÐ͵ıäÁ¿¾Í»á³öÏÖÄ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ