Debug.Print str1
db.Execute(str1)
这段代码我该怎样理解
debug是一个隐藏的对象,用于进行和调试相关的工作。
有点类似于C#中的控制台。
在调试程序的时候使用Debug会很方便。
比如Debug.Print a
会在VB界面下方的“立即”窗口中显示出a的值,这样你就不必修改程序的界面来显示a或者中断程序来查看a。
再比如当你在某处需要a>5的时候,你可以加一句Debug.Assert(a>5)
当a<=5的时候程序执行到此处就会暂停,然后你就可以查看a为何没有满足a>5的条件,从而找到代码错误。
Debug的一个重要优点是,当你把程序编译成成品EXE之后,这些Debug语句都被剔除,也就是说你在程序中加入Debug语句并不会影响最终成品的效率和界面。Debug只是为调试人员存在的。
Execute 方法
================================
应用于 Find 对象的 Execute 方法。
================================
运行指定的查找操作。如果查找成功,则返回 True。Boolean 类型。
expression.Execute(FindText, MatchCase, MatchWholeWord, MatchWildcards, MatchSoundsLike, MatchAllWordForms, Forward, Wrap, Format, ReplaceWith, Replace, MatchKashida, MatchDiacritics, MatchAlefHamza, MatchControl)
expression 必需。该表达式返回 Find 对象。
FindText Variant 类型,可选。指定需搜索的文本。可用空字符串 ("") 搜索格式,也可通过指定相应的字符代码搜索特殊字符。例如,“^p”对应段落标记,“^t”对应制表符。有关可以使用的特殊字符列表,请参阅查找和替换文本或其他项。
MatchCase Variant 类型,可选。如果为 True,则指定查找文本区分大小写。相当于“编辑”菜单“查找和替换”对话框中的“区分大小写”复选框。
MatchWholeWord Variant 类型,可选。如果为 True,则查找操作只定位于完全匹配的单词,而并非长单词中的部分文字。相当于“查找和替换”对话框中的“全字匹配”复选框。
MatchWildcards Variant 类型,可选。如果为 True,则查找的文字包含特殊搜索操作符。相当于“查找和替换”对话框中的“使用通配符”复选框。
MatchSoundsLike Variant 类型,可选。如果为 True,则查找操作定位于与要查找的文字发音相近的单词。相当于“查找和替换”对话框中的“同音”复选框。
MatchAllWordForms Variant 类型,可选。如果为 True,则查找操作定位于要查找的文字的所有形式(例如,查找“sit”的同时,还查找“sitting”和“sat”),相当于“查找和替换”对话框中的“查找单词的各种形式”复选框。
Forward Variant 类型,可选。如果为 True,则向下(向文档尾部)搜索。
Wrap Variant 类型,可选。如果搜索从不是文档的起始位置开始,并已搜索到文档的末尾(如 Forward 设置为 False,则相反),用本参数控制接下来的操作。当存在选定内容或区域,而又没有在该选定内容或区域中找到搜索文字时,也可用本参数控制接下来的操作。可取下列 WdFindWrap 常量之一。
WdFindWrap 可以是下列 WdFindWrap 常量之一:
wdFindAsk 搜索完选定内容或者区域后,Microsoft Word 会显示一条消息,询问是否搜索文档的其他部分。
wdFindContinue 到达搜索区域的开始或者结尾时,继续执行查找操作。
wdFindStop 到达搜索区域的开始或者结尾时,停止执行查找操作。
Format Variant 类型,可选。如果为 True,则查找操作定位于格式或带格式的文本,而不是查找文本。
ReplaceWith Variant 类型,可选。替换文字。若要删除由 Find 参数指定的文字,可使用空字符串 ("")。与 Find 参数相似,本参数也可以指定特殊的字符和高级搜索条件。若要将图形对象或者其他非文本项指定为替换内容,可将这些项置于“剪贴板”上,然后将 ReplaceWith 指定为“^c”。
Replace Variant 类型,可选。指定执行替换的个数:一个、全部或者不替换。可取下列 WdReplace 常量之一。
WdReplace 可以是下列 WdReplace 常量之一:
wdReplaceAll
wdReplaceNone
wdReplaceOne
MatchKashida Variant 类型,可选。如果为 True,则查找结果应与阿拉伯语文档中区分 kashidas 的文本相匹配。由于选择或安装的语言支持不同(例如,英语(美国)),此参数可能不可用。
MatchDiacritics Variant 类型,可选。如果为 True,则查找操作在从右向左的语言的文档中按照匹配音调符号来匹配文字。由于选择或安装的语言支持不同(例如,英语(美国)),此参数可能不可用。
MatchAlefHamza Variant 类型,可选。如果为 True,则在阿拉伯语文档中,查找内容应与区分 Alef Hamzas 的文本相匹配。由于选择或安装的语言支持不同(例如,英语(美国)),此参数可能不可用。
MatchControl Variant 类型,可选。如果为 True,则在从右向左的语言的文档中,查找内容应与区分双向控制字符的文本相匹配。由于选择或安装的语言支持不同(例如,英语(美国)),此参数可能不可用。
说明
如果 MatchWildcards 为 True,可为 FindText 参数指定通配符和其他高级搜索准则,例如,“*(ing)”查找任何以“ing”结尾的单词。
若要搜索符号字符,可键入脱字符号 (^)、零 (0),然后键入符号字符的代码。例如,“^0151”对应一条长划线 (—)。
除非另外指定,否则替换文本将沿用文档中被替换文本的格式。例如,如果用“xyz”替换字符串“abc”,那么加粗“abc”将被加粗字符串“xyz”所替换。
另外,如果 MatchCase 为 False,那么查找到的大写文本将被大写的替换文本替换,而无论搜索文本和替换文本是否大小写。上例中,“ABC”将被“XYZ”替换。
===================================
应用于 Dialog 和 KeyBinding 对象的 Execute 方法。
===================================
对于 Dialog 对象:应用 Microsoft Word 对话框的当前设置。
对于 KeyBinding 对象:运行与指定的组合键相关的命令。
expression.Execute
expression 必需。该表达式返回以上一个对象。
================================
应用于 MailMerge 对象的 Execute 方法。
================================
执行指定的邮件合并操作。
expression.Execute(Pause)
expression 必需。该表达式返回以上一个对象。
Pause Variant 类型,可选。如果为 True,则会在找到一个邮件合并错误时,暂停 Microsoft Word 的运行并显示一个疑难解答对话框;如果为 False,则会报告新文档中的错误。
===================================
示例
==================================
当应用于 Find 对象时。
本示例查找并选择下一个“library”。
With Selection.Find
.ClearFormatting
.MatchWholeWord = True
.MatchCase = False
.Execute FindText:="library"
End With
===================================
本示例在活动文档中查找所有的“hi”,并且将其替换为“hello”。
Set myRange = ActiveDocument.Content
myRange.Find.Execute FindText:="hi", _
ReplaceWith:="hello", Replace:=wdReplaceAll
=====================================
当应用于 Dialog 对象时。
下面的示例激活“段落”对话框的“换行和分页”选项卡中的“与下段同页”复选框。
With Dialogs(wdDialogFormatParagraph)
.KeepWithNext = 1
.Execute
End With
=================================
当应用于 KeyBinding 对象时。
本示例将 Ctrl+Shift+C 组合键指定给 FileClose 命令,然后执行这个组合键(关闭当前文档)。
CustomizationContext = ActiveDocument.AttachedTemplate
Keybindings.Add KeyCode:=BuildKeyCode(wdKeyControl, _
wdKeyShift, wdKeyC), KeyCategory:=wdKeyCategoryCommand, _
Command:="FileClose"
FindKey(BuildKeyCode(wdKeyControl, wdKeyShift, wdKeyC)).Execute
======================================
当应用于 MailMerge 对象时。
如果活动文档是一个带有附加数据源的主文档,则本示例执行邮件合并。
Set myMerge = ActiveDocument.MailMerge
If myMerge.State = wdMainAndDataSource Then MyMerge.Execute
有点类似于C#中的控制台。
在调试程序的时候使用Debug会很方便。
比如Debug.Print a
会在VB界面下方的“立即”窗口中显示出a的值,这样你就不必修改程序的界面来显示a或者中断程序来查看a。
再比如当你在某处需要a>5的时候,你可以加一句Debug.Assert(a>5)
当a<=5的时候程序执行到此处就会暂停,然后你就可以查看a为何没有满足a>5的条件,从而找到代码错误。
Debug的一个重要优点是,当你把程序编译成成品EXE之后,这些Debug语句都被剔除,也就是说你在程序中加入Debug语句并不会影响最终成品的效率和界面。Debug只是为调试人员存在的。
Execute 方法
================================
应用于 Find 对象的 Execute 方法。
================================
运行指定的查找操作。如果查找成功,则返回 True。Boolean 类型。
expression.Execute(FindText, MatchCase, MatchWholeWord, MatchWildcards, MatchSoundsLike, MatchAllWordForms, Forward, Wrap, Format, ReplaceWith, Replace, MatchKashida, MatchDiacritics, MatchAlefHamza, MatchControl)
expression 必需。该表达式返回 Find 对象。
FindText Variant 类型,可选。指定需搜索的文本。可用空字符串 ("") 搜索格式,也可通过指定相应的字符代码搜索特殊字符。例如,“^p”对应段落标记,“^t”对应制表符。有关可以使用的特殊字符列表,请参阅查找和替换文本或其他项。
MatchCase Variant 类型,可选。如果为 True,则指定查找文本区分大小写。相当于“编辑”菜单“查找和替换”对话框中的“区分大小写”复选框。
MatchWholeWord Variant 类型,可选。如果为 True,则查找操作只定位于完全匹配的单词,而并非长单词中的部分文字。相当于“查找和替换”对话框中的“全字匹配”复选框。
MatchWildcards Variant 类型,可选。如果为 True,则查找的文字包含特殊搜索操作符。相当于“查找和替换”对话框中的“使用通配符”复选框。
MatchSoundsLike Variant 类型,可选。如果为 True,则查找操作定位于与要查找的文字发音相近的单词。相当于“查找和替换”对话框中的“同音”复选框。
MatchAllWordForms Variant 类型,可选。如果为 True,则查找操作定位于要查找的文字的所有形式(例如,查找“sit”的同时,还查找“sitting”和“sat”),相当于“查找和替换”对话框中的“查找单词的各种形式”复选框。
Forward Variant 类型,可选。如果为 True,则向下(向文档尾部)搜索。
Wrap Variant 类型,可选。如果搜索从不是文档的起始位置开始,并已搜索到文档的末尾(如 Forward 设置为 False,则相反),用本参数控制接下来的操作。当存在选定内容或区域,而又没有在该选定内容或区域中找到搜索文字时,也可用本参数控制接下来的操作。可取下列 WdFindWrap 常量之一。
WdFindWrap 可以是下列 WdFindWrap 常量之一:
wdFindAsk 搜索完选定内容或者区域后,Microsoft Word 会显示一条消息,询问是否搜索文档的其他部分。
wdFindContinue 到达搜索区域的开始或者结尾时,继续执行查找操作。
wdFindStop 到达搜索区域的开始或者结尾时,停止执行查找操作。
Format Variant 类型,可选。如果为 True,则查找操作定位于格式或带格式的文本,而不是查找文本。
ReplaceWith Variant 类型,可选。替换文字。若要删除由 Find 参数指定的文字,可使用空字符串 ("")。与 Find 参数相似,本参数也可以指定特殊的字符和高级搜索条件。若要将图形对象或者其他非文本项指定为替换内容,可将这些项置于“剪贴板”上,然后将 ReplaceWith 指定为“^c”。
Replace Variant 类型,可选。指定执行替换的个数:一个、全部或者不替换。可取下列 WdReplace 常量之一。
WdReplace 可以是下列 WdReplace 常量之一:
wdReplaceAll
wdReplaceNone
wdReplaceOne
MatchKashida Variant 类型,可选。如果为 True,则查找结果应与阿拉伯语文档中区分 kashidas 的文本相匹配。由于选择或安装的语言支持不同(例如,英语(美国)),此参数可能不可用。
MatchDiacritics Variant 类型,可选。如果为 True,则查找操作在从右向左的语言的文档中按照匹配音调符号来匹配文字。由于选择或安装的语言支持不同(例如,英语(美国)),此参数可能不可用。
MatchAlefHamza Variant 类型,可选。如果为 True,则在阿拉伯语文档中,查找内容应与区分 Alef Hamzas 的文本相匹配。由于选择或安装的语言支持不同(例如,英语(美国)),此参数可能不可用。
MatchControl Variant 类型,可选。如果为 True,则在从右向左的语言的文档中,查找内容应与区分双向控制字符的文本相匹配。由于选择或安装的语言支持不同(例如,英语(美国)),此参数可能不可用。
说明
如果 MatchWildcards 为 True,可为 FindText 参数指定通配符和其他高级搜索准则,例如,“*(ing)”查找任何以“ing”结尾的单词。
若要搜索符号字符,可键入脱字符号 (^)、零 (0),然后键入符号字符的代码。例如,“^0151”对应一条长划线 (—)。
除非另外指定,否则替换文本将沿用文档中被替换文本的格式。例如,如果用“xyz”替换字符串“abc”,那么加粗“abc”将被加粗字符串“xyz”所替换。
另外,如果 MatchCase 为 False,那么查找到的大写文本将被大写的替换文本替换,而无论搜索文本和替换文本是否大小写。上例中,“ABC”将被“XYZ”替换。
===================================
应用于 Dialog 和 KeyBinding 对象的 Execute 方法。
===================================
对于 Dialog 对象:应用 Microsoft Word 对话框的当前设置。
对于 KeyBinding 对象:运行与指定的组合键相关的命令。
expression.Execute
expression 必需。该表达式返回以上一个对象。
================================
应用于 MailMerge 对象的 Execute 方法。
================================
执行指定的邮件合并操作。
expression.Execute(Pause)
expression 必需。该表达式返回以上一个对象。
Pause Variant 类型,可选。如果为 True,则会在找到一个邮件合并错误时,暂停 Microsoft Word 的运行并显示一个疑难解答对话框;如果为 False,则会报告新文档中的错误。
===================================
示例
==================================
当应用于 Find 对象时。
本示例查找并选择下一个“library”。
With Selection.Find
.ClearFormatting
.MatchWholeWord = True
.MatchCase = False
.Execute FindText:="library"
End With
===================================
本示例在活动文档中查找所有的“hi”,并且将其替换为“hello”。
Set myRange = ActiveDocument.Content
myRange.Find.Execute FindText:="hi", _
ReplaceWith:="hello", Replace:=wdReplaceAll
=====================================
当应用于 Dialog 对象时。
下面的示例激活“段落”对话框的“换行和分页”选项卡中的“与下段同页”复选框。
With Dialogs(wdDialogFormatParagraph)
.KeepWithNext = 1
.Execute
End With
=================================
当应用于 KeyBinding 对象时。
本示例将 Ctrl+Shift+C 组合键指定给 FileClose 命令,然后执行这个组合键(关闭当前文档)。
CustomizationContext = ActiveDocument.AttachedTemplate
Keybindings.Add KeyCode:=BuildKeyCode(wdKeyControl, _
wdKeyShift, wdKeyC), KeyCategory:=wdKeyCategoryCommand, _
Command:="FileClose"
FindKey(BuildKeyCode(wdKeyControl, wdKeyShift, wdKeyC)).Execute
======================================
当应用于 MailMerge 对象时。
如果活动文档是一个带有附加数据源的主文档,则本示例执行邮件合并。
Set myMerge = ActiveDocument.MailMerge
If myMerge.State = wdMainAndDataSource Then MyMerge.Execute
温馨提示:答案为网友推荐,仅供参考
第1个回答 2010-04-12
unsigned int
uchar miao,shi,fen;
void write_ds(uchar,uchar);
uchar read_ds(uchar);void
uchar miao,shi,fen;
void write_ds(uchar,uchar);
uchar read_ds(uchar);void
第2个回答 2010-04-12
Debug.Print str1
这个是打印调试信息用的吧,在VB的“立即窗口”中可以看到打印出来的信息。
立即窗口如果没有显示出来的话,按键盘的ctrl+G就可以显示出来了
至于db.Execute(str1)
应该是执行数据库查询SQL语句的。
==================
两段代码放在一起的话,就是在执行数据库查询时,先打印出执行数据库查询的SQL查询语句,便于除错。
这个是打印调试信息用的吧,在VB的“立即窗口”中可以看到打印出来的信息。
立即窗口如果没有显示出来的话,按键盘的ctrl+G就可以显示出来了
至于db.Execute(str1)
应该是执行数据库查询SQL语句的。
==================
两段代码放在一起的话,就是在执行数据库查询时,先打印出执行数据库查询的SQL查询语句,便于除错。