用VB实现类似电子表格的数据录入

d1.SelStartRow" colnum="Grid1.Col" Grid1.LeftCol + 1 rownum="Grid1.Row" Grid1.TopRow + 1 Text1.Text="Grid1.Text" Text1.Left="Grid1.Left" + (Grid1.ColWidth(0) + Grid1.GridLineWidth * 12) * colnum Text1.Top="Grid1.Top" + (Grid1.RowHeight(0) + Grid1.GridLineWidth * 12) * rownum Exit Sub Case 13 '' 回 车 Grid1.Text="Text1.Text" If Grid1.SelStartRow> inputrownum - 1 Then

   If Grid1.TopRow

----

运 行 程 序 即 有 图2 画 面， 可 实 现 鼠 标 和 键 盘 结 合 自 由 输 入
数 字 和 字 符， 同 时 也 能 运 用 上 下 光 标 键 和 回 车 键 控 制 数
据 录 入 位 置， 至 于 对 其 他 键 的 控 制， 可 依 此 类 推 之。