1樓:誰是真心英雄
單擊一下command1按鈕,加一個**:或label1.
top的值加上一個需要移動的步長即可。單擊10次,則移動到最左邊(,可通過原始label1.
left/10算出步長。
2樓:靈敏且透徹的小好漢
'建立標籤label1,按鈕command1'無論標籤放在什麼位置都可以,然後複製**就去即可。
dim aprivate sub command1_click() a / 10end sub
private sub form_load()a =
end sub
3樓:傻傻的瘋豬
dim oldleft
private sub command1_click()if > 0 then '如果label1的left值為大於零 那麼。
= oldleft / 10
elsemsgbox "標籤已經在最左邊。"
end if
end sub
private sub form_load()oldleft = sub
4樓:匿名使用者
很簡單的 改變top和left
再根據你的要求移動。
求教!vb 怎麼讓標籤在窗體中左右來回移動
5樓:網友
你的k初值,應該在timer1_timer以外賦,要不每次,都是正,還有 改成 ,label1的autosize調成自動適應內容大小。
dim k as integer
private sub form_load() truek = 1
end sub
private sub timer1_timer() time()d =
= k * dif + then
k = 1elseif <=0 thenk = 1
end if
end sub
vb的標籤移動題目!求高手!!!!急
vb裡面這種**怎麼寫 這裡沒有用到標籤
6樓:我是小柊
嗯,如果沒有使用label的話,那應該是使用了print方法。
我簡單的演示一下:
private sub form_load() true
= 嗯。。。
("讓我想想。。。我知道了!!"end sub
上圖為執行效果,字型等可以修改視窗的font屬性進行具體修改。
vb中怎麼向左或向右移動一段文字,
7樓:魚木混豬喲
需要新增定時器timer來實現。
**及註釋如下:
private sub form_load()'窗體出現時,定義定時器的出發間隔為。
'定時器啟動end sub
private sub timer1_time()'label1的左邊距離,每0.
5s向右移動100,由於文字位於label上,因此label移動,就會看到文字移動的效果。
end sub
8樓:網友
在窗體上有一個有文字的文字框,一個計時器,一個按鈕private sub command1_click()
end sub
private sub timer1_time() sub
VB下標籤內容修改
有個ini檔案的操作類,你google上找一下,使用很方便,專門用來讀寫ini配置檔案的。很不錯。 如果通過form2裡面的text1來修改其內容這個很簡單!但是你要下次再生效你必須生成一個txt讀取配置才可以的!怎麼更改vb中label標籤文字的大小 四舍 入 更改vb中label標籤文字的字型 ...
VB高手幫幫忙,向VB大神求救
form1包括控制元件 image1 0 5 command1 如下 private sub command1 click load form2 end sub private sub form load 路徑自己改吧。form1結束 form2開始 form2,包括控制元件 image1,comm...
vb陣列移動編碼,vb中將陣列中某個位置的元素移動到指定位置
sub showpicbox dim i as integer,h as singlefor i 3 to 0 step 1if picture1 i visible thenh h picture1 i heightpicture1 i move 300,me.scaleheight h 150 ...