1.不要使用任何中文字符声明变量！
Private 数据1 As String
2.不要用汉语拼音声明变量！不知道对应英文请自行查百度翻译。
Private yonghuming As String
Private yhm As String
3.不到迫不得已，不要这样
Private s1,s2,s3,s4,s5,s6 ..... As String
4.常量不要声明为变量
已知 var1 为Int32型常量 数值为 5
Dim var1 As Int32 = 5