index1.txt

以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题.对一些VB初学者很用.

1,MSFlexGrid怎样插入一行而不是添加一行
MSFlexGrid怎样插入一行而不是添加一行呢？如：共有十行，在第二行后面插入一行
<END> 
2,怎样使MSFlexGrid控件格式化输出数据库的内容呢 
怎样使MSFlexGrid控件格式化输出数据库的内容呢？如：将99显示为99.00。
<END>
3,如何做到部分单元合并，部分不合并 
我现在需要将.TextMatrix(6, 3)和 .TextMatrix(6, 4)不合并，只合并 .TextMatrix(6, 1)和 .TextMatrix(6, 2)。按以下代码，是(6, 1)与(6, 2)合并，(6, 3)与(6, 4)也合并，代码如下： 
    Public Sub hjdx(ByVal msfGrid As MSFlexGrid) 
    With msfGrid 
    .MergeCells = flexMergeRestrictRows 
    .MergeRow(6) = True 
    '下两格相同值，但不合并。 
    .TextMatrix(6, 3) = jf 
    .TextMatrix(6, 4) = jf 
    '下两格相同值，合并。 
    .TextMatrix(6, 1) = "大写金额：" & ChMoney(.TextMatrix(6, 3)) 
    .TextMatrix(6, 2) = "大写金额：" & ChMoney(.TextMatrix(6, 3)) 
    End With 
    End Sub 
<END>
4,为什么用MSFlexGrid1的AddItem方法增加记录时，其结果总是第一行是空白 
为什么用MSFlexGrid1的AddItem方法增加记录时，其结果总是第一行是空白？ 
    比如程序为： 
     For i = 1 To 10 
     Data = i & Chr(9) & i 
     MSFlexGrid1.AddItem Data 
     Next 
<END>    
5,DbGrid：怎么知道用户选择了哪几行 
问题: 关于DbGrid：怎么知道用户选择了（按住Ctrl键，再用鼠标点每行的最左边，行变深色）哪几行？怎么取得那几行的内容？这些选中的行可能已经滚动到DbGrid可见区域外。主要用于选择打印，只打印选择的行。 
<END>    
6,如何在datagrid中显示的数据中的任一行后插入一空白行 
问题：请问如何在datagrid中显示的数据中的任一行后插入一空白行，以便添加新数据（通过先用鼠标选则一行，然后点击插入按钮实现）。请指教 
<END>    
7,动态绑定，为什么Datagrid总是不刷新 
问题：请看以下代码。 
    Private Sub Option1_Click(Index As Integer) 
    Select Case Index 
    Case 0 
    initdata 
    Adodc5.ConnectionString = connstr 
    Adodc5.CommandType = adCmdTable 
    Adodc5.RecordSource = "person" 
    Label19.Caption = Option1(0).Caption & "浏览" 
    Label19.FontSize = 18 
    Set DataGrid3.DataSource = Adodc5 
    DataGrid3.Refresh 
    Case 1 
    initdata 
    Adodc5.ConnectionString = connstr 
    Adodc5.CommandType = adCmdTable 
    Adodc5.RecordSource = "book" 
    Label19.Caption = Option1(1).Caption & "浏览" 
    Label19.FontSize = 18 
    Set DataGrid3.DataSource = Adodc5 
    DataGrid3.Refresh 
    Case 2 
    initdata 
    Adodc5.ConnectionString = connstr 
    Adodc5.CommandType = adCmdTable 
    Adodc5.RecordSource = "borrow" 
    Label19.Caption = Option1(2).Caption & "浏览" 
    Label19.FontSize = 18 
    Set DataGrid3.DataSource = Adodc5 
    DataGrid3.Refresh 
    End Select 
    End Sub 
    为什么只有第一次起作用。而且datagrid3总是不刷新。第一次记录集怎么样它就怎么样。什么原因？奇怪！！！！！！ 
<END>    
8,与数据库关联的MSFlexGrid中自动快速的显示行号 
我想知道能否用一条SQL语句对一个数据库生成一个数据集含有这样一个字段：该字段的内容是处在该数据集每条记录的记录号，例如有10条记录，如是第一条记录，它的内容就是1，第三条记录就是3。我是为了能在一个与数据库关联的MSFlexGrid中自动快速的显示网格每一行的行号，若上面的方法行不通，还有什么好的方法介绍（我不希望用到ADO）。　　 
    我还想问一下，象在拼音输入法中，在出现的选项列表或按“＋、－”翻页后的选项列表自动出现1－10的标号并可按数字键1-10选择，这如果要用在List框、Dblist框或别的什么控件中，如何实现? 
<END>    
9,MSHFlexGrid窗口来显示在其它FROM中进行查询的结果 
我想用一个MSHFlexGrid窗口来显示在其它FROM中进行查询的结果，现在有两种途径可以选择。一个是在MSHFlexGrid窗口只用Adodc1控件，但我不知道如何在其它FORM中控制该Adodc1进行数据库查询，并将结果在MSHFlexGrid窗口的Grid中显示出来。第二种方法是在该FROM中先进行SQL查询，然后将查询结果用变量传到该MSHFlexGrid窗口中，但不知道该如何实现。请给出完整的源代码，谢谢。 
<END>
10,如何才能使DataGrid象Access那样显示复选框呢 
问题：如何才能使DataGrid象Access那样显示复选框呢？当DataGrid绑定到布尔型数据源时，有一个选项，数据格式可以选定为复选框可是，DataGrid运行时还是显示0,1而不是复选框，如何才能使DataGrid象Access那样显示复选框呢？可不要象dbgrid的高级示例中那样解决。要象Access那样每一条纪录都有复选框。 
<END>    
11,如何隐藏MSFlexGrid某一列 
问 题 : VB 6.0附 带 的 MSFlexGrid控 件 具 有 ColIsVisible属 性 ， 但 是 当 我 想 隐 藏 某 一 列 时 采 用 如 下 代 码 ： 
    MSFlexGridXXX.ColIsVisible(1)=False '隐 藏 第 2列 
    但 程 序 编 译 执 行 后 却 提 示 ： 不 允 许 能 给 常 数 赋 值 。 请 问 专 家 这 是 怎 么 回 事 ， ColIsVisible属 性 是 在 否 只 在 设 计 时 可 用 ？ 
<END>    
12,DBGrid、MSFlexGrid、MSHFlexGrid控件用途有什么不一样 
我 想 知 道 DBGrid、 MSFlexGrid、 MSHFlexGrid这 三 个 控 件 用 途 有 什 么 不 一 样 ， 哪 一 个 好 用 ？ 
<END>
13,如何获得DBGRID总行数 
问 题 : 在 使 用 DBGrid控 件 时 ， 只 能 获 得 其 显 示 的 列 数 ， 请 问 如 何 获 得 其 总 行 数 ？ 
<END>
14,如何实现DataGrid单击后被选中单元格所在行改变颜色 
如 何 实 现 单 击 后 被 选 中 单 元 格 所 在 行 改 变 颜 色 ， 并 弹 出 消 息 框 ， 显 示 被 选 中 单 元 格 的 内 容 ？ 类 似 问 题 ： 如 何 实 现 双 击 后 立 即 跳 出 一 对 话 框 ？ 
<END>
15,如何避免输入的字串长度超过字段长度而引发错误 
如何避免输入的字串长度超过字段长度而引发错误？如何在DBGrid和TextBox中实现输入格式化？ 
<END>     
16,mshflexgrid在实现合并数据单元格的方法 
如果你想让两个单元合并，这两个单元必须包含相同的内容，这样MSFlexGrid就会自动将单元合并。MSFlexGrid还有MergeCells、MergeCol、MergeRow 属性来决定合并的方式。在MergeCells部分有比较详细的说明和例子。 
<END>     
17,在使用非绑定的DBGRID时，系统总把最后行数据清除，不能得到更新 
问 题 ： 在 使 用 非 绑 定 的 DBGRID时 ， 设 定 属 性 为 不 允 许 新 添 加 。 这 时 ， 设 定 行 为 11， 当 输 入 列 表 数 据 到 第 11行 时 ， 触 发 刷 新 表 中 数 据 ， 系 统 总 把 第 11行 数 据 清 除 ， 不 能 得 到 更 新 ， 请 问 如 何 解 决 此 问 题 ？ 
<END>        
18,在使用MSHFlexGrid时，如何知道焦点在哪个单元 
在 使 用 MSHFlexGrid时 ， 如 何 知 道 焦 点 在 那 个 单 元 ？ 
<END>    
19,在VB中能在DBGRID中嵌入其它控件吗 
在 VB中 使 用 表 格 控 件 DBGRID时 能 否 象 VFP一 样 ,在 表 格 控 件 中 能 嵌 入 其 它 控 件 如 下 拉 列 表 框 控 件 来 编 辑 输 入 字 段 ？ 
<END>
20,有什么方法删除表格中所有的行 
问 题 : 我 定 义 了 一 个 MSFelxGrid为 msgSyjl,在 使 用 下 面 这 段 代 码 时 发 生 了 如 下 错 误 
    错 误 号 30015， 提 示 为 ： 不 能 删 除 上 一 个 非 固 定 行 
    If msgSyjl.Rows > 1 Then 
     Do While msgSyjl.Rows >1 
     msgSyjl.RemoveItem 1 
     Loop 
    End If 
    我 想 请 问 是 什 么 地 方 错 了 ， 各 位 高 手 有 什 么 更 好 的 方 法 删 除 表 格 中 所 有 的 行 （ 不 包 括 固 定 行 ） ， 而 且 VB中 为 什 么 有 提 示 没 有 相 关 的 错 误 主 题 ？ 
<END>    
21,怎样把过滤过的数据在DBGRID上显示出来 
我 的 问 题 是 怎 样 把 过 滤 过 的 数 据 在 DBGRID上 显 示 出 来 ， 怎 样 过 滤 。 我 用 的 数 据 库 是 DAO数 据 库 。 
<END>    
22,如何让MSflexGrid控件的任意一行记录处于被选择状态 
问 题 : 在 我 的 一 个 程 序 中 用 到 了 MSflexGrid控 件 ， 其 中 显 示 了 10件 记 录 ， 我 想 在 程 序 启 动 后 让 任 意 一 行 记 录 处 于 被 选 择 状 态 ， 应 该 用 到 哪 些 属 性 或 方 法 呢 ？ 敬 请 专 家 们 指 教 ， 谢 谢 。 
<END>    
23,在MSFLEXGRID的cell上添加一幅图片 
问 题 : 请 教 高 手 指 点 ： 我 想 在 MSFLEXGRID的 cell上 添 加 一 幅 图 片 （ bmp文 件 或 ico文 件 ） ， 如 选 中 一 条 记 录 时 显 示 这 副 图 片 ？ 
<END>
24,在程序运行时如何将数据环境绑定到相应的控件 
问题：我用dataenvironment 做了一个command名为cx,cx是用select句子写成的带参数的查询并有分组合计,参数是在程序运行时得到,如何将其邦定到相应的控件,如:hierarchical flexgrid等。 
<END>
25,如何控制DBGRID的内容不被修改 
问 题 : 请 问 在 vb中 使 用 DBGRID时 ,我 如 何 使 DBGRID被 琐 定 (LOCKED)而 不 是 被 灰 掉 (ENABLED = FALSE).因 为 我 想 在 程 序 中 ,控 制 DBGRID不 被 输 入 ,但 却 能 通 过 左 右 滚 动 条 浏 览 。 
<END>
26,DBGrid用拼音输入中文遇到的问题 
问 题 ： 在 DBGird用 拼 音 输 入 中 文 遇 到 的 问 题 。 我 用 DBGrid编 写 数 据 库 程 序 ， 在 用 全 拼 音 输 入 中 文 字 段 时 ， 当 移 到 下 一 个 字 段 继 续 输 入 ， 若 上 一 个 字 段 的 拼 音 提 示 窗 未 关 闭 的 话 ， 无 法 输 入 进 去 ， 只 能 用 Esc键 退 掉 拼 音 提 示 窗 才 能 输 入 进 去 。 （ Access97的 表 当 移 动 到 下 一 个 字 段 时 自 动 关 闭 拼 音 提 示 窗 ） 请 问 怎 样 解 决 ? 
<END>    
27,在DBGrid中如何判断自己的光标在哪一个字段中 
问 题 : 在 DBGrid中 如 何 判 断 自 己 的 光 标 在 哪 一 个 字 段 中 （ 例 如 ， 当 光 标 移 动 到 数 据 字 段 时 自 动 关 闭 输 入 法 ， 或 在 移 出 数 据 字 段 时 立 即 检 测 输 入 数 据 的 合 法 性 ， 如 果 错 误 就 提 示 。 ） 
<END>
28,向数据网格增加多条记录时，网格只能显示正在增加的一条记录 
问 题 ： 我 用 数 据 网 格 （ 在 数 据 绑 定 模 式 下 ） 通 过 网 格 对 数 据 库 (access)进 行 修 改 ， 但 当 通 过 网 格 将 记 录 全 部 删 除 后 再 通 过 网 格 增 加 时 ， 当 再 增 加 的 记 录 本 超 过 两 条 记 录 时 ， 网 格 只 能 显 示 正 在 增 加 的 一 条 记 录 （ 增 加 第 二 条 记 录 时 ， 只 能 看 到 第 二 条 记 录 ， 看 不 到 第 一 条 记 录 ） ， 只 有 删 除 一 条 记 录 后 才 能 网 格 才 显 示 出 所 有 的 记 录 。 希 望 能 得 到 您 的 答 复 ， 将 感 激 不 尽 ....