VB.net学习笔记

VB.net学习笔记
1.  显示带双引号的字符串，可用连续使用两次双引号，Eg：I'm:""Oh!""，显示为I'm:"Oh!"

2.  Dim i As Integer = 1         过程内部局部变量的声明（成员函数内）

     PrivateiTemp As Integer        模块内部私有变量的声明（类私有成员变量）

     SharediStatic As Integer       局部变量的声明

3.  创建MDI应用程序

    (1)、创建应用程序的付窗口，并将其“IsMDIContainer”属性设置为“True”；

    (2)、创建应用程序的子窗口，在子窗口中输入如下语句：

      Dim MDIChild As NewForm1()

          MDIChild.MdiParent = Me

           MDIChild.Show()

4.  终止一个应用程序，可以使用End语句，而stop只是暂停一个应用程序，不释放对象的引用

5.  获取命令行参数的方法：

Private Sub Form1_Load(sender As System.Object, eAs System.EventArgs) Handles MyBase.Load

    DimmyArg() As String, i As Integer

    myArg =System.Environment.GetCommandLineArgs

    IfmyArg.Length > 0 Then

        Fori = 1 To UBound(myArg)

           MsgBox(myArg(i).ToString)

        Next

    End If

End Sub

6.  消息对话框的使用：

MsgBox("Do you want to exit?", MsgBoxStyle.DefaultButton3 OrMsgBoxStyle.YesNoCancel or MsgBoxStyle.Exclamation, "My Application")

            MessageBox.Show("Doyou want to exit?", "My Application", MessageBoxButtons.YesNo,MessageBoxIcon.Hand)

7.  With ... End With，将一系列的操作放在一起，提高代码的效率，具体操作如下：

    Private Sub InitializeComponent()

           With Button1

                   .Text = "OK"

                   .Visible = True

                   .Top = 200

                   .Left = 5000

                   .Enabled = True

           End With

         EndSub

8.  以最大化或最小化显示窗口的方法：

frmNew.WindowState = 0|1|2（其中，0表示正常显示、1表示最小化显示、2表示最大化显示）

9.  问题：在函数传参过程中，是否只要是自定义的类对象，就是引用传递（不管ByVal还是ByRef）？

10. 判断对象属于哪个类的方法：

方法一：使用关键字TypeOf，只能使用在If…Then…Else表述中

方法二：使用函数TypeName()，通用，以字符串返回该类的名称，通过判断即可得出

Eg：If TypeOf myControl Is CheckBox Then   或  If TypeName(myControl) =“CheckBox” Then
11. 用一个字符名称调用一个属性或方法：（CallByName函数）

CallByName（object，procName，callType，args()）

第一个参数object表示用户需要操作的对象

第二个参数proName指的是用户要操作的方法、属性或者过程名称的字符表示

第三个参数callType是一个常数选项，CallType.Method表示操作的是方法、CallType.Let表示操作的是设置属性、CallType.Get表示操作的是得到属性、CallType.Set表示操作的是设置对象属性的值
第四个参数Args是一个变量数组，该数组包含了过程的所有参数
缺点：由于CallByName函数调用一个过程会比后期绑定慢一些，故效率比一般的要低
12. 一个完整事件的处理过程：

方法一：

1)   事件的声明：使用关键字Event，Eg：Event AnEvent(ByValEventNumber As Integer)

事件的引发：使用关键字RaiseEvent，Eg：RaiseEventAnEvent(EventNumber)

2)   声明处理函数：sub FinishedAnEventHandler(ByValEventNumber As Integer)

              End Sub

3)   将事件声明函数和处理函数绑定起来：AddHandlerAnEvent, AddressOf FinishedAnEventHandler

方法二：将步骤二和步骤三两步合为一步，如下：

subFinishedAnEventHandler(ByVal EventNumber As Integer)
Handler Me.AnEvent

End Sub

13. 重新定义数组的长度：Dimx() As Single       x = New Single(20) { }