19630.html
来自「VB技巧问答10000例,是一个教程」· HTML 代码 · 共 22 行
HTML
22 行
<html> <head> <title>datagrid新增资料</title> </head> <body bgcolor="#FFFFFF" vlink="#808080"> <center> <h1>datagrid新增资料</h1> </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by <a href="mailto:aleclee@nic.com.tw">alec</a> on October 04, 1999 at 16:42:47:<p>我将datagrid连接到sql7.0资料库,按新增按钮时可在datagrid中输入资料<br>不知为何不能新增,程式码如下,请各位新知帮我解答一下<br>Dim wid, wname As String<br>Dim wcredit, wamt As Integer<br>Adodc1.Recordset.AddNew<br>DataGrid1.Row = DataGrid1.Row + 1<br>DataGrid1.Refresh<br>DataGrid1.SetFocus<br>rs.MoveLast<br>wid = DataGrid1.Columns(0).Value<br>wname = DataGrid1.Columns(1).Value<br>wcredit = DataGrid1.Columns(2).Value<br>wamt = DataGrid1.Columns(3).Value<br>rs("spec_id").Value = wid<p>rs("spec_name").Value = wname<br>rs("spec_credit").Value = wcredit<br>rs("use_credit").Value = wamt<br><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 19630--></ul><!--end: 19630--><br><hr size=7 width=75%><p></body></html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?