Donald_Pan的专栏

<br />1．如何控制电子表格<br />Private Sub Command5_Click()<br />Dim xlsRowCount As Integer, xlsColCount As Integer '生成的表格的行数和列数<br />Dim xlsApp As Excel.Application<br />Dim xlsBook As Excel.Workbook<br />Dim xlsSheet As Excel.Worksheet<br />Dim i, j As Long<br />

几个特殊的属性方法的使用：FormatString 属性：管道符格式化字符串示例：下面定义对齐方式同字意，列宽窄同距离VSG1.FormatString = "^  中 |   右  |>   右  |^  中  "+++++++++++++++++++++++++搜索(查找)表格中符合条件的行：FindRow 属性：该属性返回一个行值MsgBox VSG1.FindR

数据反馈到数据库中？Private Sub vsflexgrid1_AfterEdit(ByVal Row As Long, ByVal Col As Long)rs.MoveFirst '//rs为记录集rs.Move vsflexgrid1.Row - 1rs.EditIf vsflexgrid1.text = "" Thenrs.Fields(vsflexgrid1.