首先,你已經完成的步驟是:
成都創(chuàng)新互聯公司是一家專注于成都網站制作、成都做網站、外貿營銷網站建設和服務器托管的網絡公司,有著豐富的建站經驗和案例。
1.新建一個用戶控件[注意,用戶控件(UserControl)不是自定義控件(CustomControl)]
2.給用戶控件起個名字(我在此處起名叫 RadioList)
3.在用戶控件上畫一個 GroupBox,命名為 RadioGroup,
并將其 Dock 屬性設置為 Fill
然后,你需要做的是動態(tài)增減控件。
如果你以前用過 VB 6,你可能會想到控件數組,
但在此處,你可以直接增刪控件。
具體實現如下:
4.在 GroupBox 里畫一個 FlowLayoutPanel,命名為 RadioPanel,
將其 AutoScroll 屬性設置為 True,即自動顯示滾動條,
并設置其 FlowDirection 屬性(例如設置為 TopDown)
這樣就省去了手動調整 RadioButton 位置的麻煩
5.實現選項的動態(tài)增減(以下只是我的思路,你可以發(fā)揮一下)
(十分簡潔,注釋除外):
''' summary
''' 創(chuàng)建一個新的 RadioButton。
''' /summary
Private Function CreateRadio() As RadioButton
Dim NewRadio As New RadioButton
components.Add(NewRadio)
'components 字段由控件設計器自動創(chuàng)建,
'此代碼目的是使控件在銷毀(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
工具箱右鍵單擊——選擇項……——選擇.net組件或com組件——點擊“瀏覽”選擇控件dll文件,然后工具箱中就會出現新加的控件
我使用Visual Basic 2008 編寫
1、新建2個窗體Form1和Form2
2、Form1窗體新建一個Button按扭和一個Timer1控件
3、打開Form1編寫如下代碼
Public Class Form1
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Form2.Show()
Me.Hide() '隱藏本窗體
Timer1.Enabled = False '使其只執(zhí)行1次
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Enabled = True '能使用 其實這個在屬性窗口中更容易設置
Timer1.Interval = 2000 '毫秒 即2秒
End Sub
End Class
Option?Explicit
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
步驟如下:
1. 先到C:\WINDOWS\system32目錄下看看你的系統里是否已經有了MSADODC.ocx和MSDATGRD.ocx這兩個文件(多半是沒有的),要是有了就直接看第2步吧。
然后放到C:\WINDOWS\system32目錄下。
2. 在VS 2005中注冊MSADODC.ocx和MSDATGRD.ocx這兩個控件。在VS 2005中點擊"Tools" -- "Visual Studio 2005 Command Prompt",輸入如下命令即可:
regsvr32 msadodc.ocx
regsvr32 msdatgrd.ocx
給你舉個簡單的例吧
for()語句:
int i;
for(i=0;i=100;i++)
printf("%d",i);
意思是只要i=0叫做初值,100叫做終值 i++表示什么意思應該知道吧!此時的步長為1;要是i+=2時步長為2.
在本語句中i=0只在一開始的時候起了作用。以后無用。i在0和100之間(包含100)輸出i的值。當i=100時輸出100,此時i仍執(zhí)行++的動作,這就是說每次printf后先++在判斷i和100的關系。
也可以變行為:
int i=1;
for(;i=100;i++)
printf("%d",i);
或者
int i=1;
for(i=0;i=100;)
{
printf("%d",i);
i++;
}等等
其中for(;;)等價于while(1)
其實for語句等都可以用while等其他語句實現?。。。?!
本文題目:vb.net示波器控件的簡單介紹
URL鏈接:http://aaarwkj.com/article12/hsopgc.html
成都網站建設公司_創(chuàng)新互聯,為您提供品牌網站制作、企業(yè)建站、網頁設計公司、做網站、自適應網站、App設計
聲明:本網站發(fā)布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創(chuàng)新互聯