重慶分公司,新征程啟航
為企業(yè)提供網(wǎng)站建設(shè)、域名注冊(cè)、服務(wù)器等服務(wù)
為企業(yè)提供網(wǎng)站建設(shè)、域名注冊(cè)、服務(wù)器等服務(wù)
這可以理解,bottom,right代表控件底和右部邊界的坐標(biāo)值,而非高度和寬度。移動(dòng)的話對(duì)邊的邊界自然同步移動(dòng)的了。
創(chuàng)新互聯(lián)公司主要從事網(wǎng)站建設(shè)、網(wǎng)站設(shè)計(jì)、網(wǎng)頁(yè)設(shè)計(jì)、企業(yè)做網(wǎng)站、公司建網(wǎng)站等業(yè)務(wù)。立足成都服務(wù)太原,10年網(wǎng)站建設(shè)經(jīng)驗(yàn),價(jià)格優(yōu)惠、服務(wù)專業(yè),歡迎來(lái)電咨詢建站服務(wù):028-86922220
見(jiàn)下面代碼,放置定時(shí)器,按鈕,標(biāo)簽各一個(gè)
Public?Class?Form1
Private?Sub?Timer1_Tick(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Timer1.Tick?'定時(shí)器
If?Label1.Right??Me.Width?Then
Label1.Left?+=?10'移動(dòng)距離
Else
Label1.Left?=?0
End?If
End?Sub
Private?Sub?Button1_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button1.Click?'開(kāi)啟或者關(guān)閉定時(shí)器
Timer1.Interval?=?1000?'1秒
If?Timer1.Enabled?=?False?Then
Timer1.Start()?'開(kāi)定時(shí)器
Else
Timer1.Stop()?'關(guān)定時(shí)器
End?If
End?Sub
End?Class
需要引用命名空間
Imports Microsoft.VisualBasic
或者在使用的時(shí)候,直接前導(dǎo)命名空間,例如;
s = Microsoft.VisualBasic.right("12345",3)
select case strings.right(S1,4)
case ".jpg",".bmp",".png"
你的處理代碼
end select
string 里的功能很基本。
strings類里有很多靜態(tài)的字符串處理函數(shù),很好用的,好好研究吧。