當前位置:編程學習大全網 - 站長素材 - vb...強力求助!!! 我想通過點擊按扭後彈出新窗口。

vb...強力求助!!! 我想通過點擊按扭後彈出新窗口。

'給妳壹個簡單的方法:

'比如說妳有兩個窗體,Form1有壹個按鈕(Command1),用於點擊來彈出圖片窗體;Form2放置壹個圖片控件(PictureBox1),並將控件調整到妳需要的位置及大小,用來顯示圖片。

'Form1添加按鈕點擊事件:

Private Sub Command1_Click()

Dim NewForm As Form

Set NewForm = New Form2

NewForm.Picture1.Picture = LoadPicture("圖片的文件路徑") '此處妳可以指定相應圖片的路徑

NewForm.Show

'... 妳可以添加窗體的Left及Top來定位,或者其它所需的代碼。

End Sub

'妳也可以在Form2上預設壹些代碼,放在Form_Load的事件裏,通過過載彈出窗體後執行。

  • 上一篇:天氣預報陜西寶雞市麟遊縣酒坊今天的天氣
  • 下一篇:最近很火的ins特效軟件
  • copyright 2024編程學習大全網