-
匿名使用者2024-02-07放置標籤 1、計時器 1
set 或其他整數，越小越快）。
private sub timer1_timer()if >=100 then
end if
end sub
-
匿名使用者2024-02-06這是乙個左移程式，需要新增乙個計時器控制項和乙個標籤控制項。
private sub form_load()= 1000
end sub
private sub timer1_timer()if < 0 then
else = - 100
end if
end sub
-
匿名使用者2024-02-05新增計時器計時器1
private sub form_load()= 100
true 每 100 毫秒檢查一次。
end sub
private sub timer1_timer()'使用 if 語句確定標籤的位置。
if < val( then 'label = +100（未完全排除在表單之外）
else 0 - val( '標籤顯示 End If 從窗體的左側
end sub
-
匿名使用者2024-02-04private sub form_load()= true
end sub
private sub timer1_timer()= + 50
if > then =
end sub
- 自己在label1中寫下文字。
-
匿名使用者2024-02-03使用乙個計時器控制項和兩個標籤控制項。
讓兩個標籤控制項交替移動。
-
匿名使用者2024-02-02樓上不明白他的意思。 移動標籤可能無法達到您想要的效果，最好將單詞移到裡面。 它更好一點，更容易控制。
-
匿名使用者2024-02-01if < then '這意味著當 label1 向左移動時，它完全進入了表單的左側，而 label1 超出了表單的範圍，並且 label1 不可見
將 label1 移動到窗體的右側，如果它仍然不在窗體範圍內，則將其移動到左側以檢視 label1
end if
-
匿名使用者2024-01-31-"它表示減號，例如 -1000
本書的意義：
當 label1 的左邊框為 <-label1 的寬度時，即 label1 的右邊框< 0，即 label1 移出 form1 窗體。
將 label1 的左邊框設定為 form1 窗體的右邊框，否則 label1 將向左移動 100
而你寫的**，和form1在螢幕上的位置和label1的寬度有很大關係。
通常，form1 形式偏向於螢幕**，而 labe1 的寬度較小，因此在大多數情況下，“is true”不會因 if 語句的執行而改變。
因此，只需執行，即將 label1 標籤移出 form1 表單。
如果將 form1 窗體移動到螢幕的最左側，然後執行語句，則可以看到 label1 標籤逐漸向左移動，直到消失。
-
匿名使用者2024-01-30label1 的左邊是它在 form1 中的相對位置，即 **。
if < then
而且總是一樣的，當然不會達到動態效果。
** 在書中：“表示當 label1 的最右邊向左移動到不可見（注意：< 0 並不意味著它已經移動到 form1 的最左邊，因為 label1 有寬度），label1 移回 form1 的最右邊，不知道這個解釋會不會對你有幫助。
-
匿名使用者2024-01-29哎呀，你說的有點奇怪。 比尺寸？ 你看一下 vb 的值。 和。 我嘗試了這兩個程式。 結果是一樣的。
-
匿名使用者2024-01-28如果發生這種情況，請小心。
當判斷時間符合要求時（例如等於、等於、假寬巨集大量年份，將label2設定為秒的標籤，n為乙個數字的寬度，根據你的字型大小嘗試多少合適），當你想重新計時時，千萬不要還原。
一開始，我沒有想過一直移動，所以我把時間的判斷條件改為等於、等於、不小於。
-
匿名使用者2024-01-27取換車時的銀子，加上以下**，=真
+ 10 '最後乙個常數，帆宴可以自行調整。
-
匿名使用者2024-01-26'爭論淮紅和朋友們都很謹慎。
dim lsstr as string
lsstr="秒"
-
匿名使用者2024-01-25我給你寫了乙個，你需要建立乙個標籤 label1 和乙個時間控制 timer1，將 timer1 的 interval 屬性設定為 10，並將 enable 屬性設定為 false。 窗體的高度和寬度屬性分別設定為 4620 和 6465。 可以修改 timer1 的 interval 屬性（值越小越快）或者在程式中更改 -20 和 20 的值（越大越快），如果表單大小不合適，自己調整一下，希望對您有所幫助。
dim i%
private sub form_load()i = 20
trueend sub
private sub timer1_timer()= + i
if > 5880 then i = -20if < 0 then i = 20
end sub
-
匿名使用者2024-01-24他的意思是要做出移動文字的效果，就像線上製作中的效果一樣！ 我也不會這樣做，誰能說謝謝
-
匿名使用者2024-01-23是我。 首先新增兩個標籤，做乙個定時器控制 private sub form load（）=
純搖滾攤位 2
vbredvbred true
end sub
private sub timer1_timer()= - 30
if < 0 then = - 30if < then = : =
end sub
-
匿名使用者2024-01-221 它們都需要新增乙個定時器定時器1
private sub form_load()= 100
true 每 100 毫秒檢查一次。
end sub
private sub timer1_timer()'使用 if 語句確定標籤的位置。
if < val( then 'label = +100（未完全排除在表單之外）
else 0 - val( '標籤顯示 End If 從窗體的左側
end sub
-
匿名使用者2024-01-21使用計時器，設定其觸發間隔，然後在計時器的事件中修改標籤的 left 屬性值以增加或減去，以控制標籤的左移或右移。 另外，不要忘記檢查標籤是否已移出父控制項。 如果有什麼不明白的地方，可以新增問題。
直接給**不利於學習@@
很遺憾。 歐聯科技友直接給**，**這個想法就是我上面寫的想法。
教人釣魚比教他釣魚好）。
-
匿名使用者2024-01-20只需更改標籤標籤的左側屬性的大小即可。
-
匿名使用者2024-01-19通過標籤逐步閱讀文字內容。 例如，一次只能閱讀 5 個單詞？ 更換速度由定時器控制。
-
匿名使用者2024-01-18最簡單的方法是使標籤略寬於文字。
然後移動標籤
我以前做過，見下圖。