
動態(tài)生成的控件:

萊陽網站建設公司創(chuàng)新互聯(lián),萊陽網站設計制作,有大型網站制作公司豐富經驗。已為萊陽上1000家提供企業(yè)網站建設服務。企業(yè)網站搭建\外貿營銷網站建設要多少錢,請找那個售后服務好的萊陽做網站的公司定做!
Private?Sub?UserControl1_Load(sender?As?System.Object,?e?As?System.EventArgs)?Handles?MyBase.Load
Dim?myPicture?=?New?System.Windows.Forms.PictureBox()
Me.Panel3.Controls.Add(myPicture)
myPicture.Size?=?New?System.Drawing.Size(115,?160)
myPicture.TabStop?=?False
myPicture.Name?=?"p"?
myPicture.Cursor?=?Cursors.Hand
AddHandler?myPicture.Click,?AddressOf?mypic_Click?'添加事件
End?Sub
處理事件的過程:
Private?Sub?mypic_Click()?'ByVal?id?As?String
Dim?bookInfo?As?New?BookInfo
bookInfo.Show()
Me.Parent.Enabled?=?False
常見事件有鼠的標單擊、雙擊、移動;
有鍵盤的鍵按下、鍵松開、按鍵;
有窗體加載、窗體卸載等等。
軟糖來回答羅。
“調用事件”有歧義,你的意思是不是下面兩種:
調用事件處理方法
直接調用對象名.方法名
'例如有這樣一個按鈕點擊事件處理程序
Private?Sub?Button1_Click(sender?As?Object,?e?As?EventArgs)?Handles?Button1.Click
秒表.Start()
End?Sub
'調用它直接用
Button1_Click(me,?new?EventArgs())
引發(fā)事件
Button1.Click.Invoke(me,?new?EventArgs())
另外?RaiseEvent 也可以引發(fā)事件,但不能使用 RaiseEvent?來引發(fā)派生窗體的控件事件,只有自己定義的類的事件才能用它引發(fā)。
如滿意,請采納,謝謝。
先要新建一個index為0的菜單(設置為不可見),然后把動態(tài)生產的菜單加入進來,這樣就可以使用遍歷菜單的方法,并判讀下當前按下的菜單名稱。
參看:網頁鏈接
一定要先在VB中添加excel引用。
在工程中引用Microsoft Excel類型庫: 從"工程"菜單中選擇"引用"欄;選擇Microsoft Excel 11.0 Object Library(EXCEL2003),然后選擇"確定"。表示在工程中要引用EXCEL類型庫。
調用excel的工作表中的命令按鈕,代碼如下:
Private Sub Command1_Click()
Dim xlApp As Excel.Application
Dim xlBook As Excel.WorkBook
Dim xlSheet As Excel.Worksheet
Dim FileName, SheetName As String
FileName = "e:\data.xls" '打開的工作簿路徑名稱
SheetName = "sheet1" '命令按鈕所在的工作表名
Set xlApp = CreateObject("Excel.Application") '創(chuàng)建EXCEL對象
Set xlBook = xlApp.Workbooks.Open(FileName) '打開已經存在的EXCEL工件簿文件
……
xlBook.Close (True) '保存并關閉工作簿
xlApp.Quit '結束EXCEL對象
Set xlApp = Nothing '釋放xlApp對象
end sub
名稱
說明
Activated
當使用代碼激活或用戶激活窗體時發(fā)生。
AutoSizeChanged
當?AutoSize?屬性更改時發(fā)生。
AutoValidateChanged
當?AutoValidate?屬性更改時發(fā)生。
BackColorChanged
當?BackColor?屬性的值更改時發(fā)生。(從?Control?繼承。)
BackgroundImageChanged
當?BackgroundImage?屬性的值更改時發(fā)生。(從?Control?繼承。)
BackgroundImageLayoutChanged
當?BackgroundImageLayout?屬性更改時發(fā)生。(從?Control?繼承。)
BindingContextChanged
當?BindingContext?屬性的值更改時發(fā)生。(從?Control?繼承。)
CausesValidationChanged
當?CausesValidation?屬性的值更改時發(fā)生。(從?Control?繼承。)
ChangeUICues
焦點或鍵盤用戶界面 (UI) 提示更改時發(fā)生。(從?Control?繼承。)
Click
在單擊控件時發(fā)生。(從?Control?繼承。)
ClientSizeChanged
當?ClientSize?屬性的值更改時發(fā)生。(從?Control?繼承。)
Closed
關閉窗體時發(fā)生。
Closing
關閉窗體時發(fā)生。
ContextMenuChanged
當?ContextMenu?屬性的值更改時發(fā)生。(從?Control?繼承。)
ContextMenuStripChanged
當?ContextMenuStrip?屬性的值更改時發(fā)生。(從?Control?繼承。)
ControlAdded
在將新控件添加到?Control.ControlCollection?時發(fā)生。(從?Control?繼承。)
ControlRemoved
在從?Control.ControlCollection?移除控件時發(fā)生。(從?Control?繼承。)
CursorChanged
當?Cursor?屬性的值更改時發(fā)生。(從?Control?繼承。)
Deactivate
當窗體失去焦點并不再是活動窗體時發(fā)生。
Disposed
當通過調用?Dispose?方法釋放組件時發(fā)生。(從?Component?繼承。)
DockChanged
當?Dock?屬性的值更改時發(fā)生。(從?Control?繼承。)
DoubleClick
在雙擊控件時發(fā)生。(從?Control?繼承。)
DragDrop
拖放操作完成時發(fā)生。(從?Control?繼承。)
DragEnter
在將對象拖入控件的邊界時發(fā)生。(從?Control?繼承。)
DragLeave
將對象拖出控件的邊界時發(fā)生。(從?Control?繼承。)
DragOver
在將對象拖到控件的邊界上發(fā)生。(從?Control?繼承。)
EnabledChanged
在?Enabled?屬性值更改后發(fā)生。(從?Control?繼承。)
Enter
進入控件時發(fā)生。(從?Control?繼承。)
FontChanged
在?Font?屬性值更改時發(fā)生。(從?Control?繼承。)
ForeColorChanged
在?ForeColor?屬性值更改時發(fā)生。(從?Control?繼承。)
FormClosed
關閉窗體后發(fā)生。
FormClosing
關閉窗體前發(fā)生。
GiveFeedback
在執(zhí)行拖動操作期間發(fā)生。(從?Control?繼承。)
GotFocus
在控件接收焦點時發(fā)生。(從?Control?繼承。)
HandleCreated
在為控件創(chuàng)建句柄時發(fā)生。(從?Control?繼承。)
HandleDestroyed
在控件的句柄處于銷毀過程中時發(fā)生。(從?Control?繼承。)
HelpButtonClicked
單擊“幫助”按鈕時發(fā)生。
HelpRequested
用戶請求控件幫助時發(fā)生。(從?Control?繼承。)
ImeModeChanged
在?ImeMode?屬性更改后發(fā)生。(從?Control?繼承。)
InputLanguageChanged
更改窗體的輸入語言后發(fā)生。
InputLanguageChanging
當用戶嘗試更改窗體的輸入語言時發(fā)生。
Invalidated
控件的顯示要求重新繪制時發(fā)生。(從?Control?繼承。)
KeyDown
在控件有焦點的情況下按下鍵時發(fā)生。(從?Control?繼承。)
KeyPress
在控件有焦點的情況下字符、空格或退格鍵時發(fā)生。(從?Control?繼承。)
KeyUp
在控件有焦點的情況下釋放鍵時發(fā)生。(從?Control?繼承。)
Layout
在控件應重新定位其子控件時發(fā)生。(從?Control?繼承。)
Leave
在輸入焦點離開控件時發(fā)生。(從?Control?繼承。)
Load
在第一次顯示窗體前發(fā)生。
LocationChanged
在?Location?屬性值更改后發(fā)生。(從?Control?繼承。)
LostFocus
在控件失去焦點時發(fā)生。(從?Control?繼承。)
MarginChanged
當?Margin?屬性更改時發(fā)生。
MaximizedBoundsChanged
在?MaximizedBounds?屬性的值更改后發(fā)生。
MaximumSizeChanged
在?MaximumSize?屬性的值更改后發(fā)生。
MdiChildActivate
在多文檔界面 (MDI) 應用程序內激活或關閉 MDI 子窗體時發(fā)生。
MenuComplete
當窗體菜單失去焦點時發(fā)生。
MenuStart
當窗體菜單接收焦點時發(fā)生。
MinimumSizeChanged
在?MinimumSize?屬性的值更改后發(fā)生。
MouseCaptureChanged
當控件失去鼠標捕獲時發(fā)生。(從?Control?繼承。)
MouseClick
用鼠標單擊控件時發(fā)生。(從?Control?繼承。)
MouseDoubleClick
用鼠標雙擊控件時發(fā)生。(從?Control?繼承。)
MouseDown
當鼠標指針位于控件上并按下鼠標鍵時發(fā)生。(從?Control?繼承。)
MouseEnter
在鼠標指針進入控件時發(fā)生。(從?Control?繼承。)
MouseHover
在鼠標指針停放在控件上時發(fā)生。(從?Control?繼承。)
MouseLeave
在鼠標指針離開控件時發(fā)生。(從?Control?繼承。)
MouseMove
在鼠標指針移到控件上時發(fā)生。(從?Control?繼承。)
MouseUp
在鼠標指針在控件上并釋放鼠標鍵時發(fā)生。(從?Control?繼承。)
MouseWheel
在控件有焦點且鼠標輪移動時發(fā)生。(從?Control?繼承。)
Move
在移動控件時發(fā)生。(從?Control?繼承。)
PaddingChanged
在控件空白區(qū)更改時發(fā)生。(從?Control?繼承。)
Paint
在重繪控件時發(fā)生。(從?Control?繼承。)
ParentChanged
在?Parent?屬性值更改時發(fā)生。(從?Control?繼承。)
PreviewKeyDown
在焦點位于此控件上的情況下,當有按鍵動作時發(fā)生(在?KeyDown?事件之前發(fā)生)。(從Control?繼承。)
QueryAccessibilityHelp
在?AccessibleObject?為輔助功能應用程序提供幫助時發(fā)生。(從?Control?繼承。)
QueryContinueDrag
在拖放操作期間發(fā)生,并且允許拖動源確定是否應取消拖放操作。(從?Control?繼承。)
RegionChanged
當?Region?屬性的值更改時發(fā)生。(從?Control?繼承。)
Resize
在調整控件大小時發(fā)生。(從?Control?繼承。)
ResizeBegin
窗體進入大小調整模式時發(fā)生。
ResizeEnd
窗體退出大小調整模式時發(fā)生。
RightToLeftChanged
在?RightToLeft?屬性值更改時發(fā)生。(從?Control?繼承。)
RightToLeftLayoutChanged
更改?RightToLeftLayout?屬性值之后發(fā)生。
Scroll
用戶或代碼滾動工作區(qū)時發(fā)生。(從?ScrollableControl?繼承。)
Shown
只要窗體是首次顯示就發(fā)生。
SizeChanged
在?Size?屬性值更改時發(fā)生。(從?Control?繼承。)
StyleChanged
在控件樣式更改時發(fā)生。(從?Control?繼承。)
SystemColorsChanged
系統(tǒng)顏色更改時發(fā)生。(從?Control?繼承。)
TabIndexChanged
此 API 支持 產品 基礎結構,不能在代碼中直接使用。?當?TabIndex?屬性的值更改時發(fā)生。
TabStopChanged
當?TabStop?屬性更改時發(fā)生。
TextChanged
在?Text?屬性值更改時發(fā)生。(從?Control?繼承。)
Validated
在控件完成驗證時發(fā)生。(從?Control?繼承。)
Validating
在控件驗證時發(fā)生。(從?Control?繼承。)
VisibleChanged
在?Visible?屬性值更改時發(fā)生。(從?Control?繼承。)