如题，
并能实现“回车”时，自动跳转到下一个单元格，当到该行最后时，自动跳转到下一行的起始位置。

这个嘛，不难

第一个问题：set datagrid1.datasource=adodc1
第二个问题：利用dg的keypress事件，对ascii进行一下选择，再处理就好了。如果这个功能要在窗体有焦点就能执行，则把窗体的keypreview设为true，再对窗体的keypress进行编写。


第二个你自己先做，做到哪，问到哪。如果有好方法，不妨也贴上来大家共享！

[此贴子已经被作者于2007-8-16 16:44:27编辑过]

Dim Conn As ADODB.Connection '定义ADODB连接的对象
Dim Record As ADODB.Recordset '定义ADODB对象的记录集
Dim ConnStr As String '定义连接字符串
Set Conn = New ADODB.Connection '给对象分配空间
Set Record = New ADODB.Recordset
ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
ConnStr = ConnStr & App.Path & "\" & "sdcl.mdb"
Conn.ConnectionString = ConnStr '按照[连接字符串]的内容连接数据库
Conn.Open '连接
Record.Open "Select 站号,后尺下丝,后尺上丝,前尺下丝,前尺上丝,后尺黑面,后尺红面,前尺黑面,前尺红面 From sdcl ", Conn, adLockReadOnly, adLockReadOnly '检索数据
Record.Refresh '这儿为什么老是出错,datagrid还不能显示数据库的内容???????????????????

Set DataGrid1.DataSource = Adodc1
DataGrid1.ReBind

[此贴子已经被作者于2007-8-16 17:31:42编辑过]

rs有refresh方法吗？？应该是requrey吧

spreadsheet 怎么自动换行???????????

spreadsheet是什么控件？

传上来看看~