首先,你已經完成的步驟是:
創新互聯公司專注為客戶提供全方位的互聯網綜合服務,包含不限于網站建設、成都網站設計、鎮原網絡推廣、重慶小程序開發、鎮原網絡營銷、鎮原企業策劃、鎮原品牌公關、搜索引擎seo、人物專訪、企業宣傳片、企業代運營等,從售前售中售后,我們都將竭誠為您服務,您的肯定,是我們最大的嘉獎;創新互聯公司為所有大學生創業者提供鎮原建站搭建服務,24小時服務熱線:028-86922220,官方網址:vcdvsql.cn
1.新建一個用戶控件[注意,用戶控件(UserControl)不是自定義控件(CustomControl)]
2.給用戶控件起個名字(我在此處起名叫 RadioList)
3.在用戶控件上畫一個 GroupBox,命名為 RadioGroup,
并將其 Dock 屬性設置為 Fill
然后,你需要做的是動態增減控件。
如果你以前用過 VB 6,你可能會想到控件數組,
但在此處,你可以直接增刪控件。
具體實現如下:
4.在 GroupBox 里畫一個 FlowLayoutPanel,命名為 RadioPanel,
將其 AutoScroll 屬性設置為 True,即自動顯示滾動條,
并設置其 FlowDirection 屬性(例如設置為 TopDown)
這樣就省去了手動調整 RadioButton 位置的麻煩
5.實現選項的動態增減(以下只是我的思路,你可以發揮一下)
(十分簡潔,注釋除外):
''' summary
''' 創建一個新的 RadioButton。
''' /summary
Private Function CreateRadio() As RadioButton
Dim NewRadio As New RadioButton
components.Add(NewRadio)
'components 字段由控件設計器自動創建,
'此代碼目的是使控件在銷毀(Dispose)時能自動銷毀 RadioButton
'詳情參見 RadioList.Designer.vb
NewRadio.Parent = RadioPanel
'設置容器
AddHandler NewRadio.CheckedChanged, AddressOf RadioButtons_CheckedChanged
'設置事件處理程序
Return NewRadio
End Function
''' summary
''' 移除已存在的 RadioButton。
''' /summary
Private Sub RemoveRadio(ByVal dest As RadioButton)
components.Remove(dest)
dest.Dispose()
End Sub
'無中生有的 RadioButton 的事件處理程序
Private Sub RadioButtons_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)
'在此處設置選中項的屬性,通過 sender 來確定不同的 OptionButton
'你可以通過將 OptionButton 放在一個列表,
'如 List(Of OptionButton) 中來像數組一樣維護選項的次序
'注意,此處需要判斷 sender 的 Checked 屬性是否為 True
'因為 Changed 是“改變”,而不是“選中”
'例如:
If DirectCast(sender, RadioButton).Checked Then
SelectedIndex = ...
End If
End Sub
n年前用VB做過幾個不同形式的工控系統。
1)VB很適合作上位機的用戶界面(UI)
2)一般地,上位機與現場設備或現場控制設備之間,采用RS232C/485/422通信。所以,掌握串行通信原理,比如,什么是同步傳輸,什么是異步傳輸,什么是奇偶校驗,什么是CRC校驗,什么是面向字符(字節)的傳輸,什么是透明傳輸,等等,這些概念對構建一個上位系統非常重要。對于VB6而言,就是掌握MSCOMM控件;對于VB.NET而言,掌握SerialPort
3)有的時候,上位機于現場設備之間的通信,采用特定的接口板塊。例如,在上位機PCI卡槽中插入特定功能的接口版。VB通過操縱這些接口版,與設備通信。通常,接口版制造商提供DLL形式的編程接口,VB調用這些DLL即可操縱這些接口版。所以,需要掌握VB調用DLL的知識。
4)工業以太網得到越來越多的應用,VB可以通過工業以太網操縱設備。這需要掌握Socket編程。對vb6而言,就是WinSock控件;對VB.NET就是SOCKET類
1、vb.net ?完全符合面向對象的編程語言抽象、封裝、繼承的四大特性,而vb不支持繼承。
2、錯誤處理不同。
vb中只是On Error.....goto和On Errer Resume Next ,這些錯誤稱為非結構化異常處理。而在vb.net中采用的結構化異常處理機制,try...catch....finally控制。
3、兩者產生的窗體不同。
vb.net 允許創建不同類型的應用程序,例如,創建ASP.NET和ASP.NET Web 服務應用程序,還允許創建控制臺應用程序和作為桌面服務運行的應用程序。但是vb 只能創建Windows窗體。
4、數據庫訪問的差別。
vb6.0是通過ADO(Active X Data Objext)來實現對數據庫訪問。而vb.net 是通過ADO.NET來訪問數據庫。
擴展資料
Visual Basic(簡稱VB)是Microsoft公司開發的一種通用的基于對象的程序設計語言,為結構化的、模塊化的、面向對象的、包含協助開發環境的事件驅動為機制的可視化程序設計語言。是一種可用于微軟自家產品開發的語言。
“Visual” 指的是開發圖形用戶界面 (GUI) 的方法——不需編寫大量代碼去描述界面元素的外觀和位置,而只要把預先建立的對象add到屏幕上的一點即可。
“Basic”指的是 BASIC (Beginners All-Purpose Symbolic Instruction Code) 語言,是一種在計算技術發展歷史上應用得最為廣泛的語言。
Visual Basic源自于BASIC編程語言。VB擁有圖形用戶界面(GUI)和快速應用程序開發(RAD)系統,可以輕易的使用DAO、RDO、ADO連接數據庫,或者輕松的創建Active?X控件,用于高效生成類型安全和面向對象的應用程序 。
參考資料:百度百科-Visual Basic
Private WithEvents NewTextBox As TextBox
'通過使用WithEvents關鍵字聲明一個對象變量為新的命令按鈕
Private Sub Command1_Click()
If NewTextBox Is Nothing Then
Set NewTextBox = Controls.Add("VB.TextBox", "cmdNew", Form1)
NewTextBox.Move 200, 200
NewTextBox.Width = Form1.Width - 450
NewTextBox.Height = Form1.Height - 1400
NewTextBox.Visible = True
End If
End Sub
Private Sub Command2_Click()
If NewTextBox Is Nothing Then
Exit Sub
Else
Controls.Remove NewTextBox
Set NewTextBox = Nothing
End If
End Sub
當前名稱:vb.net控件工控 vb窗體控件
當前網址:http://vcdvsql.cn/article2/hepcoc.html
成都網站建設公司_創新互聯,為您提供定制網站、面包屑導航、建站公司、品牌網站設計、關鍵詞優化、用戶體驗
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯