微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

匈牙利命名法之VB篇

参看《VB 编程标准》 第四章 命名约定 4.1 变量命名约定 所有变量的定义应该遵循匈牙利命名法,使用3个字母前缀来表示数据类型或控件类型,3个字母前缀必须小写,前缀后面是由表意性强的一个单词或多个单词组成的名字,而且每个单词的首写字母大写,其它字母小写,这样保证其他人阅读时对变量名能够进行正确的断句。 按照这种方式命名变量,在一个变量名就可以反映出变量类型和变量所存储的值的意义两方面内容,这使得程序中出现变量名的代码可读性强、更加容易理解。 常见的变量类型和控件类型前缀如下表所示: 变量类型前缀列表: 数据类型 前缀 示例 Boolean Bln BlnLoggedIn Currency Cur curSalary Control Ctl ctlLastControl Double dbl dblMiles ErrObject err errLastError Single sng sngYears Handle hwd hwdPicture Long lng lngOnHand Object obj objUserTable Integer int intAge String str strName user-defined type udt udtEmployee Variant (including Dates) vnt vntDateHired (空白)     控件类型前缀列表: 控件 前缀 举例 Check Chk chkPrint Combo Cbo cboTitle Command Cmd cmdCancel Data Dat datBiblio Directory list Box Dir dirsource Drive list Box Drv drvTarget File list Box Fil filSource Frame Fra fraLanguage Form Frm frmMain Group push button Gpb gpbChannel Horizontal scroll bar Hsb hsbVolume Image Img imgIcon Label Lbl lblHelpMessage Line Lin linVertical List Box Lst lstResultCodes MDI child form mdi mdiContact Menu mnu mnuFileOpen OLE container ole olePhoto Option button opt optSpanish Panel pnl pnlSettings Picture Box pic PicdiskSpace Picture clip clp ClpToolbar Shape shp ShpCircle Text Box txt TxtAddress Timer tmr TmrAlarm Vertical scroll bar Vsb VsbRate 当用户定义UDT(即用户自定义结构,Type结构)时,它应加上前缀“Type”,当定义枚举结构时,应加前缀“Enum”,以示与其它类型的区别。 例如: Type Typestudents Name as string Age as long End Type Enum EnumRoles flDoctor flNurse End Enum 注:fl为公司内部枚举元素的规定前缀。 开发人员如果遇到上述表格中未列举的类型,请书面通知开发部管理人员,由管理人员集中更新此列表内容,不得擅自启用未经确定的新变量前缀或控件前缀。

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。

相关推荐


Format[$] ( expr [ , fmt ] ) format 返回变体型 format$ 强制返回为文本 -------------------------------- 数字类型的格式化 --------------------------------     固定格式参数:     General Number 普通数字,如可以用来去掉千位分隔号     format$("100,1
VB6或者ASP 格式化时间为 MM/dd/yyyy 格式,竟然没有好的办法, Format 或者FormatDateTime 竟然结果和系统设置的区域语言的日期和时间格式相关。意思是尽管你用诸如 Format(Now, "MM/dd/yyyy"),如果系统的设置格式区域语言的日期和时间格式分隔符是"-",那他还会显示为 MM-dd-yyyy     只有拼凑: <%response.write
在项目中添加如下代码:新建窗口来显示异常信息。 Namespace My ‘全局错误处理,新的解决方案直接添加本ApplicationEvents.vb 到工程即可 ‘添加后还需要一个From用来显示错误。如果到这步还不会则需要先打好基础啦 ‘======================================================== ‘以下事件
转了这一篇文章,原来一直想用C#做k3的插件开发,vb没有C#用的爽呀,这篇文章写与2011年,看来我以前没有认真去找这个方法呀。 https://blog.csdn.net/chzjxgd/article/details/6176325 金蝶K3 BOS的插件官方是用VB6编写的,如果  能用.Net下的语言工具开发BOS插件是一件很愉快的事情,其中缘由不言而喻,而本文则是个人首创,实现在了用V
Sub 分列() ‘以空格为分隔符,连续空格只算1个。对所选中的单元格进行处理 Dim m As Range, tmpStr As String, s As String Dim x As Integer, y As Integer, subStr As String If MsgBox("确定要分列处理吗?请确定分列的数据会覆盖它后面的单元格!", _
  窗体代码 1 Private Sub Text1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single) 2 Dim path As String, hash As String 3 For Each fil
  Imports MySql.Data.MySqlClient Public Class Form1 ‘ GLOBAL DECLARATIONS Dim conString As String = "Server=localhost;Database=net2;Uid=root;Pwd=123456;" Dim con As New MySqlConnection
‘導入命名空間 Imports ADODB Imports Microsoft.Office.Interop   Private Sub A1() Dim Sql As String Dim Cnn As New ADODB.Connection Dim Rs As New ADODB.Recordset Dim S As String   S = "Provider=OraOLEDB.Oracl
Imports System.IO Imports System.Threading Imports System.Diagnostics Public Class Form1 Dim A(254) As String    Function ping(ByVal IP As Integer) As String Dim IPAddress As String IPAddress = "10.0.
VB运行EXE程序,并等待其运行结束 参考:https://blog.csdn.net/useway/article/details/5494084 Private Declare Function WaitForSingleObject Lib "kernel32" (ByVal hHandle As Long, ByVal dwMilliseconds As Long) As Long Pr