📄 编码规范_vb.htm
字号:
color:black'>每一个可能不明显的参数。参数分别在单独的行上，并嵌入注释。</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'> <br>
</span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>返回</span><span style='font-size:
9.0pt;font-family:"\000B ";color:black'> </span><span style='font-size:9.0pt;
font-family:宋体;mso-ascii-font-family:"\000B ";mso-hansi-font-family:"\000B ";
color:black'>函数返回值的说明。</span><span lang=EN-US style='font-size:9.0pt;
font-family:"\000B ";color:black'> <br>
<br>
<br>
<b>5.02 </b></span><b><span style='font-size:9.0pt;
font-family:宋体;mso-ascii-font-family:"\000B ";mso-hansi-font-family:"\000B ";
color:black'>记住下列几点：</span></b><b><span lang=EN-US style='font-size:9.0pt;
font-family:"\000B ";color:black'> <br>
</span></b><span lang=EN-US style='font-size:9.0pt;font-family:"\000B ";
color:black'><br>
1) </span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:
"\000B ";mso-hansi-font-family:"\000B ";color:black'>每一个重要变量的声明应该包括一个嵌入注释，来描述该变量的使用。</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
<br>
<br>
2) </span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:
"\000B ";mso-hansi-font-family:"\000B ";color:black'>变量、控件及过程的命名应该足够清楚，使得只有复杂的执行细节才需要嵌入注释。</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
<br>
<br>
3) .Bas </span><span style='font-size:9.0pt;font-family:宋体;
mso-ascii-font-family:"\000B ";mso-hansi-font-family:"\000B ";color:black'>模块包含工程的</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'> Visual
Basic </span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:
"\000B ";mso-hansi-font-family:"\000B ";color:black'>一般常量声明，在其起始处，应该包括描述应用程序的综述，列举主要数据对象、过程、算法、对话、数据库及系统需求。有时，一段描述算法的伪码可能会有所帮助。</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'> <br>
4) </span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:
"\000B ";mso-hansi-font-family:"\000B ";color:black'>格式化代码</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
</span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>因为许多程序员仍然使用</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'> VGA </span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>显示器，所以在允许代码格式来反映逻辑结构和嵌套的同时，应尽可能地省屏幕空间。下面列出几点：</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'> <br>
<br>
5) </span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:
"\000B ";mso-hansi-font-family:"\000B ";color:black'>标准的、基于制表位的嵌套块应该被缩进四个空格（缺省情况下）。</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
<br>
<br>
6) </span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:
"\000B ";mso-hansi-font-family:"\000B ";color:black'>过程的功能综述注释应该缩进一个空格。跟在综述注释后面的最高级的语句应该缩进一个制表位，而每一个嵌套的块再缩进一个制表位。例如：</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'> <br>
'*****************************************************<br>
'</span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>目的：</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'> </span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>在用户列表数组中找出</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
' </span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>一个指定用户的第一次出现位置。</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
'</span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>输入：</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
' strUserList()</span><span style='font-size:9.0pt;font-family:
宋体;mso-ascii-font-family:"\000B ";mso-hansi-font-family:"\000B ";color:black'>：</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'>
</span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>被搜索的用户列表。</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
' strTargetUser</span><span style='font-size:9.0pt;font-family:
宋体;mso-ascii-font-family:"\000B ";mso-hansi-font-family:"\000B ";color:black'>：</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'>
</span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>要搜索的用户名。</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
' </span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:
"\000B ";mso-hansi-font-family:"\000B ";color:black'>返回：</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'>
</span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>在</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'>rasUserList </span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>数组中</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'>rsTargetUser <br>
' </span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>的第一次出现的索引。</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
' </span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>如果目标用户没找到，返回</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'>-1</span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>。</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
'*****************************************************<br>
<br>
Function intFindUser (strUserList() As String, strTargetUser As _<br>
String)As Integer<br>
Dim i As
Integer '
</span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>循环计数器。</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
Dim blnFound As Integer ' </span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>目标寻找标志。</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
intFindUser = -1<br>
i = 0<br>
While i <= Ubound(strUserList) and Not blnFound<br>
If strUserList(i) = strTargetUser Then<br>
blnFound = True<br>
intFindUser = i<br>
End If<br>
Wend<br>
End Function<br>
<br>
7) </span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:
"\000B ";mso-hansi-font-family:"\000B ";color:black'>给常量分组</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
</span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>变量和定义的常量应该按功能分组，而不是分散到单独区域或特定文件中。</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'>Visual
Basic </span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:
"\000B ";mso-hansi-font-family:"\000B ";color:black'>一般常量应该在单一模块中分组，以将它们与应用程序特定的声明分开。</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
<br>
8) & </span><span style='font-size:9.0pt;font-family:宋体;
mso-ascii-font-family:"\000B ";mso-hansi-font-family:"\000B ";color:black'>和</span><span
style='font-size:9.0pt;font-family:"\000B ";color:black'> </span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>＋</span><span style='font-size:
9.0pt;font-family:"\000B ";color:black'> </span><span style='font-size:9.0pt;
font-family:宋体;mso-ascii-font-family:"\000B ";mso-hansi-font-family:"\000B ";
color:black'>运算符</span><span lang=EN-US style='font-size:9.0pt;font-family:
"\000B ";color:black'><br>
</span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>在连接字符串时总是使用</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'> & </span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>运算符，而当处理数值时常用</span><span
style='font-size:9.0pt;font-family:"\000B ";color:black'> </span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>＋</span><span style='font-size:
9.0pt;font-family:"\000B ";color:black'> </span><span style='font-size:9.0pt;
font-family:宋体;mso-ascii-font-family:"\000B ";mso-hansi-font-family:"\000B ";
color:black'>运算符。当在两个变体上操作时，用</span><span style='font-size:9.0pt;font-family:
"\000B ";color:black'> </span><span style='font-size:9.0pt;font-family:宋体;
mso-ascii-font-family:"\000B ";mso-hansi-font-family:"\000B ";color:black'>＋</span><span
style='font-size:9.0pt;font-family:"\000B ";color:black'> </span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>运算符来连接可能会导致问题。例如：</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
<br>
vntVar1 = "10.01"<br>
vntVar2 = 11<br>
vntResult = vntVar1 + vntVar2 'vntResult = 21.01<br>
vntResult = vntVar1 & vntVar2 'vntResult = 10.0111<br>
<br>
9) </span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:
"\000B ";mso-hansi-font-family:"\000B ";color:black'>为</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'> MsgBox</span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>、</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'>InputBox </span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>及</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'> SQL </span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>查询创建字符串</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
</span><span style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>当产生长字符串时，使用下划线连接字符产生多行代码，这样便于阅读或调试字符串。当显示一个消息框</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'> (MsgBox) </span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>或输入框</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'> (InputBox)</span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>，或产生一个</span><span lang=EN-US
style='font-size:9.0pt;font-family:"\000B ";color:black'> SQL </span><span
style='font-size:9.0pt;font-family:宋体;mso-ascii-font-family:"\000B ";
mso-hansi-font-family:"\000B ";color:black'>字符串时，这一技术特别有用。例如：</span><span
lang=EN-US style='font-size:9.0pt;font-family:"\000B ";color:black'><br>
<br>
Dim Msg As String<br>
Msg = "This is a paragraph that will be " _<br>
& "in a message box. The text is" _<br>
& " broken into several lines of code" _<br>
& " in the source code, making it easier" _<br>
& &quo⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -