VB编程向access数据库表所有列插入数据,但列数是个变量?vb编程怎么弄,源代码?
答案:2 悬赏:0 手机版
解决时间 2021-02-14 12:48
- 提问者网友:捧腹剧
- 2021-02-13 15:22
VB编程向access数据库表所有列插入数据,但列数是个变量?vb编程怎么弄,源代码?
最佳答案
- 五星知识达人网友:你哪知我潦倒为你
- 2021-02-13 16:19
假设:你已经与access数据库建立了连接cn
窗体中添加一个DataGrid控件,比如控件名为DataGrid1,然后在窗体的加载事件中写如下代码:
Private Sub Form_Load()
'定义记录集rsg
Dim rsg As New ADODB.Recordset
'打开记录集rsg。以字段ID升序排列的数据库bgb表
rsg.CursorLocation = adUseClient
rsg.Open "SELECt * FROM bgb Order By ID", cn, 3, 3
'给DataGrid1控件添加数据源为记录集rsg
Set DataGrid1.DataSource = rsg
If Not rsg.EOF Or Not rsg.BOF Then rsg.MoveLast
End Sub
通过上面的代码,就可以让DataGrid1控件显示数据库中的bgb表了。
每向DataGrid1控件中添加一行数据,数据库中的bgb表就会增加一条记录。。
窗体中添加一个DataGrid控件,比如控件名为DataGrid1,然后在窗体的加载事件中写如下代码:
Private Sub Form_Load()
'定义记录集rsg
Dim rsg As New ADODB.Recordset
'打开记录集rsg。以字段ID升序排列的数据库bgb表
rsg.CursorLocation = adUseClient
rsg.Open "SELECt * FROM bgb Order By ID", cn, 3, 3
'给DataGrid1控件添加数据源为记录集rsg
Set DataGrid1.DataSource = rsg
If Not rsg.EOF Or Not rsg.BOF Then rsg.MoveLast
End Sub
通过上面的代码,就可以让DataGrid1控件显示数据库中的bgb表了。
每向DataGrid1控件中添加一行数据,数据库中的bgb表就会增加一条记录。。
全部回答
- 1楼网友:第幾種人
- 2021-02-13 17:41
c = a > b
先判断 a > b 结果是 true 或者 false
然后把结果传给 c
a=sqr(3) b=sqr(2) c=a>b
运行到这里的时候 c的值是 true
然后运行
msgbox c+2
返回值是 1
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯