首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

vb-adocd-excel 急SOS,分虽不高,已荡产~

2012-01-22 
vb-adocd-excel急SOS,在线等。分虽不高,已荡产~~第一次用数据库,实在是不会啊我用VB做了个上位机界面实时采

vb-adocd-excel 急SOS,在线等。分虽不高,已荡产~~
第一次用数据库,实在是不会啊
我用VB做了个上位机界面实时采集数据,数据先写入excel但没有保存(用户选择保存才保存),同时通过adodc1把数据通过datagrid显示

下面是建立的excel
    Set   xlApp   =   CreateObject( "Excel.Application ")       'excel初始化
    Set   xlBook   =   Nothing
    Set   xlsheet   =   Nothing
    Set   xlBook   =   xlApp.Workbooks().Add
    Set   xlsheet   =   xlBook.Worksheets( "sheet1 ")

问题是我怎么通过adodc1连接到该数据库通过datagrid显示?希望有代码

[解决办法]
我用VB做了个上位机界面实时采集数据,数据先写入excel但没有保存(用户选择保存才保存),同时通过adodc1把数据通过datagrid显示

可否改成这样子:
1、采集数据
2、写入数据库
3、显示数据到DATAGRID上
4、同步显示数据到EXCEL
5、界面显示可选择项,保存或不保存EXCEL,退出时根据这个选择项,决定是否保存EXCEL

PS:DATAGRID显示的内容有限,超过三千行操作会很慢很慢

[解决办法]
数据先写入excel但没有保存 ????是采集数据没有保存到数据库中,还是这个EXCEL没有保存?


如果是没有保存到数据库中的话,就使用网格控件一条一条的显示在空件里面,
如果已经保存到数据库里面了,就把ADODC设置好,再设置网格控件的数据原设置上就OK了

热点排行