index1.txt

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

<END>
29,如何才能使DBGrid的前若干列固定不动 
问 题 : 我 是 一 个 VB爱 好 者 ， 在 实 际 编 程 中 ， 我 经 常 使 用 VB中 的 DBGrid控 件 ， 也 经 常 觉 得 DBGrid控 件 的 布 局 不 太 令 人 满 意 ， 不 如 MsFlexGrid控 件 好 用 ， 因 为 MsFlexGrid控 件 能 定 义 前 几 列 在 拖 动 水 平 滚 动 条 时 不 可 移 动 ， 这 在 对 字 段 较 多 的 数 据 库 操 作 时 非 常 好 用 ， 可 以 在 主 要 字 段 固 定 的 情 况 下 编 辑 记 录 ， 在 这 点 上 MsFlexGrid就 比 DBGrid功 能 强 ， 但 MsFlexGrid不 能 进 行 数 据 库 锁 定 和 动 态 编 辑 。 请 问 如 何 才 能 使 DBGrid的 前 若 干 列 固 定 不 动 ， 是 否 要 建 立 一 个 新 的 控 件 。 请 尽 快 答 复 为 盼 ！ 
<END>
30,有什么办法在窗体显示之前更新DBGrid 的数据吗 
我 在 程 序 中 使 用 了 DATA和 DBGrid控 件 ， 现 在 我 改 变 DATA控 件 的 DatabaseName、 RecordSet属 性 以 达 到 改 变 DBGrid中 的 内 容 ， 但 在 Form_load 事 件 中 不 能 实 现 ， 有 什 么 办 法 在 窗 体 显 示 之 前 更 新 DBGrid 的 数 据 吗 ？ 
<END>     
31,DataGrid如何捕捉错误 
问 题 ： 当 我 用 DataGrid和 ADO控 件 对 数 据 库 进 行 编 程 时 碰 到 一 个 奇 怪 的 问 题 ， 我 将 DataGrid的 DataSource设 定 为 ADO控 件 ， ADO的 RecordSource为 select * from mytab,但 是 在 DataGrid填 充 数 据 时 出 现 一 个 "试 执 行 将 非 空 值 列 更 新 成 NULL"的 错 误 ， 但 该 错 误 并 不 影 响 返 回 的 数 据 ， 对 其 他 的 表 也 有 这 个 错 误 。 有 什 么 办 法 可 以 将 该 窗 口 隐 去 或 避 免 出 现 这 个 错 ? 
<END>
32,如何将数据库中的重复项列出 
我 想 对 数 据 库 中 的 表 进 行 重 复 项 检 查 。 对 这 个 表 中 的 二 项 检 查 ， “ 厂 名 ” ， “ 号 码 ” 不 能 同 时 相 同 ， 如 相 同 ， 将 重 复 项 列 出 。 我 想 用 DBgrid ,Data控 件 将 结 果 输 出 。 请 问 有 何 速 度 快 的 好 办 法 ？ 语 句 ？ 
<END>
33,如何设置DBGrid列的宽度 
dbgrid如 果 bound *.mdb， 如 何 设 定 列 的 大 小 ? 
<END>
34,DATAGRID控件中，用上下光标键无法移动含有中文字符的单元格的光标 
我 的 程 序 中 使 用 DATAGRID控 件 显 示 ACCESS97数 据 库 ,但 是 控 件 中 用 上 下 光 标 键 选 择 单 元 格 时 ,凡 是 不 含 中 文 字 符 的 单 元 格 均 能 正 常 移 动 到 下 面 的 单 元 格 ,含 有 中 文 字 符 的 单 元 格 却 无 法 正 常 移 动 ,光 标 仍 在 当 前 单 元 格 中 ,只 是 移 到 了 当 前 格 的 末 尾 ,且 无 论 如 何 不 能 向 下 移 动 ,用 KEYDOWN事 件 指 定 行 列 也 不 能 使 下 面 的 单 元 格 高 亮 显 示 ,请 教 专 家 如 何 解 决 ? 
<END>
35,如何禁止拆分DataGrid 
问 题 ： 我 用 DataGrid时 ， 不 想 拆 分 DataGrid,我 看 了 VB的 控 件 使 用 手 册 ， 该 手 册 指 明 说 ， 只 要 让 Splites对 象 的 AllowSizing为 False即 可 ， 但 我 试 了 以 后 却 不 可 以 ， 请 问 该 如 何 实 现 ？ 
<END>
36,怎么找不到DBGrid控件 
问题:我找到了datagrid 控件,而找不到DBGrid控件。它在哪儿？ 
<END>
37,如何让绑定数据的DataGrid在执行某个命令时才一次保存所有的修改数据  
问 题 ： 如 何 让 绑 定 数 据 的 DataGrid 在 移 动 记 录 时 ， 不 执 行 保 存 数 据 的 动 作 。 在 修 改 多 条 记 录 后 ， 执 行 某 个 命 令 , 才 一 次 保 存 所 有 的 修 改 数 据 。 
<END>
38,如何避免由于DataGrid的列头被点中，而发生整列被选中的情况 
问 题 ： 当 我 点 击 DataGrid的 表 头 时 ,发 生 了 HeadClick事 件 并 且 整 列 被 选 中 ， 请 问 ， 给 如 何 避 免 由 于 列 头 被 点 中 ， 而 发 生 整 列 被 选 中 的 情 况 ? 
<END>
39,如何移动DataGrid的当前行 
问 题 :当 我 用 程 序 使 一 DataGrid绑 定 到 一 个 AdoConnect后 ， 如 何 让 光 标 到 达 我 想 要 的 那 一 行 ,譬 如 ： 共 有 46条 纪 录 ， 而 DataGrid的 VisiableRow只 有 10行 ， 而 我 想 到 第 24条 纪 录 ， 如 何 让 程 序 实 现 光 带 停 在 第 24条 纪 录 上 。 
<END>
40,DBGrid控件用row改变行列号，出现行号无效 
vb与 office-excel连 接 ， 控 件 data1中 connect属 性 指 向 excel8.0,控 件 dbgrid的 datasource属 性 指 向 data1,运 行 后 数 据 自 动 读 入 dbgrid后 ， 用 col,row改 变 行 列 号 可 读 出 数 据 ， 但 行 号 超 出 28以 后 ， 出 现 行 号 无 效 。 
     DBGrid1.col = 26 
     DBGrid1.row = 28 
     dexcel.txt(26) = DBGrid1.Text 
    不 能 读 出 其 他 数 据 。 
<END>
41,用DATAGRID控件，如何用回车键在单元格之间移动光标 
问 题 : 用 DATAGRID控 件 ， 为 了 输 入 方 便 ， 如 何 用 回 车 键 在 单 元 格 之 间 移 动 光 标 （ DATAGRID中 可 用 方 向 键 移 动 ） 。 
<END>
42,如何修改DBGRID控件显示的日期格式 
问 题 : 用 DATA控 件 访 问 ACCESS数 据 库 ， 用 DBGRID控 件 显 示 库 中 的 内 容 时 ， 库 中 的 日 期 格 式 为 长 日 期 ， 但 从 DBGRID控 件 中 看 却 是 短 日 期 格 式 的 。 这 是 为 何 ？ 请 问 在 DBGRID中 显 示 长 日 期 格 式 ？ 
<END>
43,在DBGRID控件中选定一行后，如何获得此行中的数据 
在 DBGRID控 件 中 选 定 一 行 后 （ 该 行 变 蓝 ） ， 如 何 将 此 行 中 的 数 据 记 录 如 NAME字 段 的 值 同 时 出 现 在 TEXTBOX控 件 中 ？ 
<END>
44,如何利用DBGrid显示一对多的关联字段 
如 何 处 理 一 对 多 的 关 联 字 段 ， 如 主 表 记 录 为 A病 ， 而 子 表 记 录 为 时 间 和 其 相 关 的 发 病 率 ， 在 窗 体 中 ， 子 表 记 录 采 用 DBGRID， 请 问 如 何 处 理 ？ 
<END>
45,ASP页面只显示源代码而没有显示应有的效果 
我 现 在 有 一 个 问 题 得 麻 烦 您 指 点 迷 津 ， 我 是 一 个 ASP程 序 爱 好 者 ， 但 是 ， 现 在 我 用 ASP作 了 一 个 个 人 主 页 当 我 找 到 一 个 免 费 空 间 上 传 我 的 ASP网 页 后 ， 在 该 网 址 中 只 能 看 到 源 代 码 ， 而 不 能 看 到 我 自 己 编 辑 时 的 那 种 效 果 。 特 此 请 教 。 希 回 复 ！ 
<END>
46,DBGRID怎样实现数据表数字字段用汉字显示 
在 vb6版 的 DBGRID控 件 绑 定 模 式 下 ， 怎 样 实 现 数 据 表 列 数 字 、 字 符 在 控 件 列 中 用 汉 字 显 示 ， 当 控 件 列 选 择 改 变 时 数 据 表 列 数 字 、 字 符 随 之 变 化 ， 例 如 ： 数 据 表 列 分 别 为 "0"、 "1",而 控 件 列 分 别 显 示 为 "否 "、 "是 ",当 控 件 列 选 "否 "时 数 据 表 列 为 "0"， 选 "是 "时 数 据 表 列 为 "1"。 敬 请 各 位 专 家 不 吝 赐 教 ， 万 分 感 谢 ！ 
<END>
47,怎样才能把MDB数据库追加到DATAGRID里 
我 用 的 是 WIN98， VB6.0,请 问 怎 样 才 能 把 MDB数 据 库 追 加 到 DATAGRID里 ? 
<END>
48,DBGrid和事务的联合使用 
问 题 是 这 样 的 :我 在 对 数 据 库 的 编 程 中 加 入 "保 存 "和 "撤 销 "功 能 (通 过 dbgrid进 行 数 据 录 入 ). 于 是 我 想 到 了 运 用 "事 务 "。 但 由 于 在 执 行 begintrans后 要 对 data的 recordsource进 行 重 定 义 (定 义 后 执 行 data.refresh),造 成 了 在 以 后 执 行 rollback的 错 误 。 ("没 有 先 使 用 BeginTrans 就 用 Commit 或 Rollback 错 误 3034)。 请 教 如 何 实 现 "保 存 "和 "撤 销 "功 能 。 (注 :数 据 量 较 大 ,采 用 临 时 表 太 慢 !) 
<END>
49,如何设置DBGrid数字的显示格式 
使 用 dbgrid控 件 ,如 何 控 制 某 一 column的 小 数 位 数 为 (4位 ),若 设 置 column的 类 型 为 General Number时 ,我 输 入 12.1000会 自 动 销 去 0(变 为 12.1)， 而 我 想 保 存 0。 
<END>
50,如何在VB6中使用DBGRID32
我 的 程 序 原 来 在 vb6中 写 的 用 到 了 大 量 的 DBGRID32.OCX控 件 ， 想 把 程 序 升 迁 到 VB6， 但 VB6中 没 有 该 控 件 ， 而 变 为 DATAGRID控 件 ， 我 只 好 在 VB6中 注 册 DBGRID32控 件 ， 而 且 提 示 注 册 成 功 ， 但 用 到 该 控 件 的 时 候 总 是 提 示 没 有 可 用 的 许 可 证 信 息 。 我 该 怎 么 做 不 用 更 改 程 序 ， 谢 谢 ！ 
<END>
51,如何设定MSFLEXGRID每列、每行或每格的颜色 
如 何 预 先 设 定 MSFLEXGRID每 列 或 每 行 的 颜 色 ， 或 随 意 设 定 每 格 的 颜 色 ？ 
<END>
52,选择DBCombo列表时引发什么事件 
使 用 dbcombo控 件 时 ,listfield 来 自 另 一 个 数 据 控 件 所 绑 定 的 表 ,运 行 时 用 鼠 标 选 择 列 表 怎 么 不 能 引 发 change事 件 ?因 为 我 要 实 现 选 择 英 文 条 目 的 同 时 在 另 一 文 本 框 同 时 显 示 其 对 应 的 中 文 条 目 。 
<END>     
53,怎样控制DBGrid控件的点击头事件 
DBGrid控件的点击头事件怎样才能因字段不同而进行不同的控制？ 
<END>
54,如何检测DBGrid的焦点移动和移动焦点 
我 现 在 有 一 个 问 题 想 请 教 你 一 下 。 我 在 编 写 仓 库 管 理 软 件 时 ， 由 于 考 虑 物 品 的 编 码 较 多 ， 比 如 用 6个 数 字 表 示 ， 比 如 ： 110134， 11表 示 仓 库 类 别 ， 01表 示 物 品 类 别 ， 34表 示 具 体 的 物 品 名 称 ， 我 在 编 写 进 /出 仓 时 ， 用 了 dbgrid控 件 ， 我 在 第 二 列 为 物 品 代 码 ， 如 何 使 焦 点 到 第 二 列 时 ， 自 动 跳 出 一 个 选 择 物 品 代 码 ， 当 选 择 完 了 以 后 ， 让 焦 点 自 动 往 下 移 动 。 希 望 以 上 的 问 题 能 够 给 予 指 点 。 
<END>
55,找不到DBList和DBCombo这些数据控件 
我 装 的 是 vb6.0， 但 找 不 到 DBListBox和 DBComboBox这 些 数 据 控 件 ， 请 问 如 何 能 用 上 这 些 控 件 ？ 请 问 还 有 其 它 更 方 便 好 用 的 数 据 控 件 吗 ？
<END>
56,如何预置MsFlexgrid控件中Cell的宽度 
如 何 在 设 计 时 预 置 Msflexgrid控 件 中 cell的 宽 度 ? 
<END>
57,如何给DBGrid控件添加一个非绑定的计算字段 
请 问 如 何 给 DBGrid控 件 添 加 一 个 非 绑 定 的 计 算 字 段 ？ 例 如 有 一 个 字 段 为 [销 售 额 ]， 如 何 在 DBGrid控 件 上 得 到 另 一 个 计 算 字 段 [应 交 税 ]， 它 的 来 源 为 [销 售 额 ]*0.07。 
<END>
58,如何改变DATA控件的属性以改变DBGrid中的内容 
我 在 程 序 中 使 用 了 DATA和 DBGrid控 件 ， 现 在 我 想 改 变 DATA控 件 的 RecordSet属 性 以 达 到 改 变 DBGrid中 的 内 容 ， 有 什 么 办 法 吗 ？ 
<END>
59,如何在表格中进行Cell的结合 
我 想 在 VB中 做 出 一 个 类 似 Spread的 表 格 ， 表 格 中 嵌 有 ComboBox控 件 ， 并 且 表 格 中 有 Cell的 结 合 ， 就 是 说 并 不 是 所 有 的 Cell都 一 样 大 。 怎 么 办 ？ 谢 谢 。 
<END>
60,支持自动换行的数据库浏览网格控件 
有 谁 知 道 哪 里 可 以 找 到 支 持 自 动 换 行 的 数 据 库 浏 览 网 格 控 件 ？ 我 不 想 EMBED庞 大 的 EXCEL在 我 的 程 序 中 。 
<END>
61,如何修改DBGrid的列标题 
我 想 问 一 下 ， 在 SELECT语 句 怎 样 指 定 字 段 的 Caption? 就 是 如 果 数 据 绑 定 到 DBGrid控 件 输 入 显 示 时 ， 有 一 个 字 段 名 为 F1， 让 它 在 DBGIRD中 显 示 成 “ 姓 名 ” 、 “ 地 址 ” 等 。 
<END>
62,如何在DBGrid中取消对记录的修改 
一 个 dbgrid控 件 与 data控 件 绑 定 ， 现 在 我 想 在 dbgrid的 before_update事 件 中 检 查 输 入 的 值 是 否 正 确 ， 如 果 不 正 确 则 使 焦 点 重 新 回 到 输 入 的 dbgrid某 列 上 ， 并 且 不 更 新 相 应 的 数 据 库 记 录 。 我 使 用 了 before_update事 件 中 的 cancel参 数 ， 使 其 等 于 true， 来 取 消 更 新 ， 但 是 系 统 提 示 ， 该 操 作 被 关 联 事 件 取 消 。 然 后 就 退 出 。 请 问 这 是 怎 么 一 回 事 ， 应 怎 样 实 现 我 上 面 的 目 的 ？ ？ ？
<END>
63,如何使DBGrid中的某一列，当其中显示的文字超过表格线后自动折行 
如 何 使 DBGrid(或 类 似 的 Grid控 件 )中 的 某 一 列 ， 当 其 中 显 示 的 文 字 超 过 表 格 线 后 自 动 折 行 ？ 有 点 类 似 于 lable控 件 的 Autosize和 WordWrap均 设 置 为 TRUE时 的 效 果 。 
<END>     
64,在DBGrid中使满足条件的记录的某一行(列)变色 
如 何 在 DBGRID中 使 满 足 条 件 的 记 录 的 某 一 列 变 色 ？ 用 FLEXGRID太 慢 ！ 如 何 在 DBGRID中 选 择 记 录 ， 并 做 “ 标 记 ” 显 示 ？ 
<END>
65,如何获得DBGRID控件中某行某列的数据 
如 何 获 得 DBGRID控 件 中 某 行 某 列 的 数 据 及 如 何 代 码 更 改 指 定 行 列 的 数 据 ？ 
<END>
66,如何在一个DataGrid控件中同时显示两个表的内容 
在 VB6中 用 两 个 ado控 件 , 其 数 据 源 分 别 是 一 个 数 据 库 的 两 个 表 , 如 何 让 一 个 datagrid控 件 的 一 部 分 列 显 示 一 个 表 的 数 据 , 而 另 一 部 分 列 显 示 另 一 个 表 的 数 据 ？ 也 就 是 在 一 个 datagrid控 件 中 同 时 显 示 两 个 表 的 内 容 。 
<END>     
67,不用DATA控件，使用DAO如何将一个记录集填充到DBGrid中 
我 想 询 问 一 下 不 用 DATA控 件 ， 使 用 DAO如 何 将 一 个 记 录 集 填 充 到 DBGRID中 ？ 
<END>     
68,DBGrid中包括200多个字段 
ACCESS 数 据 库 在 使 用 了 202个 字 段 （ 1字 节 长 度 ） 和 9个 文 本 字 段 （ 50字 节 长 度 ） 后 ， 用 DBGRID输 入 时 速 度 变 得 非 常 慢 （ 不 正 常 ） ， 并 且 时 常 死 机 。 
<END>
69,如何使DBGrid的某一列数据的修改不存入数据库 
我用vb6编写一个数据录入程序,使用ACCESS数据库,当我使用DBGRID控件时,希望对某一列的数据修改不存入数据库中,其他列允许修改存入,但我发现DBGrid中DATACHANGE属性只支持整行的操作,不支持单独的列,有办法解决吗? 
<END>
70,DBGrid控件中如何在属性中设定表格显示时的列数 
DBGrid控 件 中 如 何 在 属 性 中 设 定 表 格 显 示 时 的 列 数 ？ 
<END>
71,怎样将DBGrid中的字段写回另一个表[VIP]中 
我 有 个 问 题 想 问 ： 
     datPrimaryrs.recordsource="select * from [dm]" 
     datSecondaryRS.RecordSource = "select [生 日 ],[身 份 证 号 ],[公 司 形 式 ],[月 收 入 ],[消 费 累 计 金 额 ] from [贵 宾 卡 ] where [姓 名 ]='" & datPrimaryRS.Recordset![姓 名 ] & "'" & " Order by [填 表 日 期 ]" 
     dbgrid.DataSource=datSecondaryRS 
     怎 样 将 dbgrid中 的 字 段 写 回 另 一 个 表 [VIP]中 ？ [vip]中 含 有 以 上 字 段 ！ 
<END>
72,如何才能向非绑定DBGrid控制追加数据 
在 使 用 DBGrid控 制 的 时 候 ， 如 果 datamode的 值 设 为 1， 如 何 才 能 向 dbgrid控 制 追 加 数 据 ? 
<END>