學習vb的心得體會
第1篇： VB學習的心得體會
一、 學習VB程式設計的方法
(1)保持良好的學習心態
1、要有自信，自強，積極主動學習。
2、克服畏難情緒，樹立學好程式設計的信心
(2)要有良好的學習習慣
1、課前預習，認真聽課並適當做些筆記，課後要認真複習消化所學內容，完成作業。
2、VB程式設計的入門學習並不難，但卻是一個十分重要的過程，因為程式設計思想就在這時形成的，良好的程式設計習慣也在這個階段養成。
(3)學習程式設計要注重理解一些重要的概念。
VB程式設計本身並不複雜，翻開一本程式設計學習的書籍，看到的無非就是變數，函式，條件語句，迴圈語句等概念。但要真正能進行程式設計，需要深入理解這些概念。因此，在 程式入門階段還是應該重視概念的學習。
(4)自己動手編寫程式
程式設計入門階段要經常自己動手抄寫或編寫一些小程式，親自動手進行程式設計是創造性思維應用的體現，是培養邏輯思維的好方法。因此一定要多動手編寫程式，而且要從小程式開發開始，逐漸提高寫程式的能力。
(5)閱讀，借籤別人設計的好程式
多看別人設計好的程式程式碼，包括教材上的例題程式。在讀懂別人程式後，要想他為什麼這麼設計能不能將程式修改完成更多的功能 則可以學到別人優秀的東西，幫助自己 提高自身水平。
(6) VB程式設計學習的重點
1、程式設計課是高強度的腦力勞動，不是聽會的，也不是看會的，而是練會的。
2、只有自己動手，編寫一些程式，才會有成就感，進而對課程產生興趣，學起來才比較從容。等你在編寫大量程式之後，我想過二級肯定沒問題，不過能不能做到真知灼見，運用自如我就不敢說了。
3、動手能力的培養是這門課和以往課程最大的不同之處。重點放在思路，演算法，程式設計構思和程式實現上。語句只是表達工具，要求堂上積極思考，儘量當堂學懂，並做到靈活應用。
)上機除錯程式應注意的幾點：
1、上機前應認真把實驗題在用紙上做一做(包括窗體介面設計，事件程式碼的編寫等)
2、每次上機後應總結，把沒有搞清楚的問題記錄下來，請教老師或同學。
3、平時應多抽課餘時間多上機除錯程式。注意系統的提示資訊，遇到問題多問幾次為什麼。
(6)養成良好的程式設計習慣
1、程式構思要有說明;
2、學會如何除錯程式;
3、對執行結果要做正確與否的分析。
二、複習過程簡單的說就是細看書，勤做題，最後練上機。
細看書，就是在考試前的一個月內，以看書為主，越細越好(如果你時間緊的話可只重點看些考點涉及的東西)，把書上的知識點(最好看幾份歷年試題，讓自己明白考什麼。)看懂看透，暫時不明白的或者不理解的先用筆記本記下。這樣你的筆記本就有每章你不懂的知識點和題目了，之後可以問同學，問老師……如此反覆，半個月下來你的筆試水平考試應該沒問題了;下半個月的時間可以一邊練習題目，一邊練習上機。切不可前一段時間做題，後一段時間上機，那樣的話會有很多忘記的知識點。
第2篇：學習vb的心得體會
學習VB兩個星期以來， (其實真正時間也不到兩個星期吧 平時有空閒就學習了下 在這裡是想告訴大家 VB基本操作不難，)第一個串列埠除錯程式通了 能夠實現更改波特率，串列埠號，接收資料實現字元也十六進位制顯示，在傳送文字框輸入資料 電機發送將在接收框內顯示 記住將RS232的2和3管腳直接接起來
下面是我測試實際過程
大家也可以和我一樣練習練習
下面是我的.原始碼 可以供大家參考下 也希望高手指點下 (框架就沒必要給了) Dim baud As String
Dim text2enbale, asciflag As Boolean '停止顯示標誌 false將不能顯示
Private Sub Check2_Click()
End Sub
Private Sub Combo1_Click()’埠控制
Select Case Combo1.Text
Case "COM1"
MSComm1.CommPort = 1
Case "COM2"
MSComm1.CommPort = 2
Case "COM3"MSComm1.CommPort = 3
Case "COM4"
MSComm1.CommPort = 4
Case "COM5"
MSComm1.CommPort = 5
Case "COM6"
MSComm1.CommPort = 6
End Select
End Sub
Private Sub Combo2_Click()’波特率控制
If MSComm1.PortOpen = True Then
MSComm1.PortOpen = False
Select Case Combo2.Text
Case "300"
baud = "300"
Case "600"
baud = "600"
Case "1200"
baud = "1200"
Case "2400"
baud = "2400"
Case "4800"
baud = "4800"
Case "9600"
baud = "9600"
Case "19200"
baud = "19200"
Case "38400"
baud = "38400"
End Select
MSComm1.Settings = baud & ",n,8,1"
MSComm1.PortOpen = True
Else
Select Case Combo2.Text
Case "300"
baud = "300"
Case "600"
baud = "600"
Case "1200"
baud = "1200"
Case "2400"
baud = "2400"
Case "4800"
baud = "4800"
Case "9600"
baud = "9600"
Case "19200"
baud = "19200"
Case "38400"
baud = "38400"
End Select
MSComm1.Settings = baud & ",n,8,1"
End If
End Sub
Private Sub Command5_Click()
'Dim s As String
Dim a() As Byte
If MSComm1.PortOpen = False Then
MsgBox "串列埠未開啟，請開啟串列埠", 48, "警告"
End If
'ReDim a(3)
'a(0) = &HF
'a(1) = &HFE
'a(2) = &HDD
'a(3) = &HCC
s = Text3.Text
'a = s
MSComm1.RThreshold = Len(s) ' UBound(a) + 1
If MSComm1.PortOpen = True Then
MSComm1.Output = s
End If
Call Delay(20)
End Sub
Private Sub MSComm1_OnComm()
Dim idata As Variant
Dim arr() As Byte
intInputLen = MSComm1.InBufferCount '不這樣將會提示不能給陣列賦值
ReDim arr(intInputLen) '和上面一樣
Select Case MSComm1.CommEvent
Case comEvReceive '接收成功資訊
arr = MSComm1.Input '得到 接收緩衝區資料
If asciflag = True Then
For i = 0 To UBound(arr)
Text2.Text = Text2.Text + Chr$$(arr(i))
Next i
Else
For i = 0 To UBound(arr)
Text2.Text = Text2.Text + " " & arr(i)
Next i
End If
MSComm1.InBufferCount = 0
End Select
End Sub
Private Sub Option1_Click()
If Option1.Value = True Then
asciflag = True
End If
End Sub
Private Sub Option2_Click()
If Option2.Value = True Then
asciflag = False
End If
End Sub
Private Sub Timer1_Timer()
Label11.Caption = Time
End Sub
Private Sub uart_open_Click()
MSComm1.PortOpen = Not MSComm1.PortOpen
If MSComm1.PortOpen Then
Shape2.BackColor = &HFF&
uart_open.Caption = "關閉串列埠"
Else
Shape2.BackColor = &HE0E0E0
uart_open.Caption = "開啟串列埠"
End If
End Sub
Private Sub text2_clr_Click()
Text2.Text = ""
End Sub
Private Sub text2_en_Click()
text2enable = Not text2enbale
End Sub
Private Sub Command6_Click()
End
End Sub
Private Sub Form_Load()
Show '沒有show後面的設定焦點將失敗 錯誤
text2enbale = True
Option2.Value = True '預設顯示是以16進位制顯示
MSComm1.CommPort = 1
MSComm1.Settings = "9600,n,8,1"
MSComm1.InputMode = comInputModeBinary '二進位制接收資料
MSComm1.InBufferCount = 0
MSComm1.RThreshold = 1 '緩衝區接收到4個字元 就產生一個oncomm事件
Text3.Text = ""
Text3.SetFocus
End Sub
至此 一個簡單的小工程就完成了，因為我是電子資訊工程專業對高階程式設計還是很菜鳥的，其實這個功能也是我一直想能夠自己實現的，因為之前一直以為學習VB 會花好多時間，就像之前一直在學習ARM一樣半天模不著頭腦。所以遲遲不敢接觸。估計也好多人和我一樣，其實學習開始了 也會發現並不是想象中那樣。
第3篇： VB學習心得體會
這學期選修了VB這門學科，想從學習中對計算機有更深刻的認知，也對我大學中的2級考試奠定基礎。那麼談談這學期的學習中對vb的認知和心體會。
透過學習vb我基本學會了編輯一些小程式，掌握了一些基本的知識，得到了以下一些收穫：
1.富業餘生活。曾經業餘時間到處遊手好閒的身影不見
了，以前沒事我肯定一動不動的坐在電腦面前擺弄電腦。是啊，想想以前，真是一無是處，一會找人砍大山，一會找人打遊戲，一會就傻傻的坐在小板登上兩眼無光，似是厭倦了紅塵。現在有了VB，它給了我無窮的快樂，讓我樂此不疲。
2、多了一門技術。VB是一門計算機程式語言，也算是一
項知識含量較高的東西。採用的是視覺化程式設計。學習的這段時間，我明白了萬事開頭難，剛剛開始，遇到些困難沒關係，慢慢來。 我們每學一點，就趕快把它用到實際的程式中去，自己多學多用多實踐，水平才能不斷提高，這就是“學以致用”。 只有這樣我才呢學有所成
3、鍛鍊意志。程式設計可不是一項輕鬆的活，尤其是一個人
開發製作軟體時，那工作量就多了。沒有一定的坐功、細心程度及耐性那是絕對做不到的。有時，把程式做完了需要除錯執行，但是就是不能達到自已設計的效果和目的，那你得戴上放大鏡找啊找啊，也許就是因為一個符號或一個字母，
你就得花上個幾個小時，半天，甚至更長。只要有一顆永不退縮的心，我相信你一定能找到問題所在，最後一定能見到你開心的笑容，也一定能找到成功者的感覺。
透過這個學期的學習，對了VB這種高階語言有了初
步的認知，對一些小的程式有了初步的設計方案，能根據要求設計出想要的程式，鍛鍊了自己的創造性思維，是培養邏輯思維的好方法，同時我經常看同學設計好的程式程式碼，然後想想別人為什麼這麼計就能達到效果，我的設計能不能完成更多的功能，這樣優秀了自己，幫助了自己，提高了自身水平，同樣，也欣賞了別人，對別人是讚美，對自己是幫助，總而言之，這學期的VB課程讓我收了很多。
第4篇： 學習vb的心得體會
命令按鈕Command button cmd cmdExit
通用對話方塊Common dialog dlg dlgFileOpen
目錄列表框Directory list box dir dirSource
驅動器列表框Drive list box drv drvTarget
檔案列表框File list box fil filSource
窗體Form frm frmEntry
圖象框Image img imgIcon
標籤Label lbl lblHelpMessage
列表框List box lst lstPolicyCodes
選單Menu mnu mnuFileOpen
單選按鈕Option button opt optGender
圖片框Picture box pic picVGA
文字框Text box txt txtLastName
時鐘控制元件Timer tmr tmrAlarm
變數
宣告所有的變數將會節省程式設計時間，因為鍵入操作引起的錯誤減少了(例如，究竟是 aUserNameTmp，還是 sUserNameTmp，還是 sUserNameTemp)。在 選項 對話方塊的 編輯器 標籤中，複選 要求變數宣告 選項。Option Explicit 語句要求在 Visual Basic 程式中宣告所有的變數。
應該給變數加字首來指明它們的資料型別。而且字首可以被擴充套件，用來指明變數範圍，特別是對大型程式。
用下列字首來指明一個變數的資料型別。
變數資料型別
資料型別 字首 例子
String (字串型別) str strFName
Integer (短整數型別) int intQuantity
Long (長整數型別) lng lngDistance
Single (單精度浮點數型別) sng sngAverage
Double (雙精度浮點數型別) dbl dblTolerance
Boolean (布林型別) bln blnFound
Byte(位元組型別) byt bytRasterData
Date (日期型別) dte dteNow
Currency (貨幣型別) cur curRevenue
Object (物件型別) obj objCurrent
Variant (變體型別) vnt vntCheckSum
4、在簡單的選擇條件情況下,使用IIf()函式
繁瑣的程式碼：
If nNum = 0 Then
sName = sancy
Else
sName = Xu
End If
簡單的程式碼：
sName=IIf(nNum=0, sancy , Xu )
5、儘量使用Debug.Print進行除錯
在很多初學者的除錯中,用MsgBox來跟蹤變數值.其實用Debug.Print不僅可以達到同樣的功效,而且在程式最後編譯過程中,會被忽略.而MsgBox必須手動註釋或刪除.
通常：
MsgBox nName
應該：
Debug.Print nName
6、在重複對某一物件的屬性進行修改時，儘量使用With....End With
通常：
Form1.Height = 5000
Form1.Width = 6000
Form1.Caption = This is MyLabel
應該：
With Form1
.Height = 5000
.Width = 6000
.Caption = This is MyLabel
End With
這種結構程式執行效率比較高，特別在迴圈語句裡。
7、MsgBox中儘量使用訊息圖示，這樣程式比較有規範
一般來說
vbInformation 用來提示確認或成功操作的訊息
vbExclamation 用來提示警告的訊息
vbCritical 用來提示危機情況的訊息
vbQuestion 用來提示詢問的訊息
8、在可能的情況下使用列舉