1樓：
首先新增一個timer控制元件和一個label控制元件。在label1的caption中寫入自己要寫的字。雙擊開啟書寫以下函式：
dim i%
timer1.interval=100 '每0.1秒觸發一次if i >form1.height then i=0i=i+10
label.move 10,i
2樓：匿名使用者
用timer控制字型lable的座標就好了。當到達某個值後開始加，到達另外一個之後在慢慢的減少。
3樓：匿名使用者
dim d as boolean
private sub form_load()label1.top = me.height - label1.height
timer1.interval = 100d = true
end sub
private sub timer1_timer()if d then
label1.top = label1.top - 90else
label1.top = label1.top + 90end if
if label1.top <= 0 thend = false
end if
if label1.top >= me.height - label1.height - 240 then
d = true
end if
end sub
在中如何使字變長，在word中如何 使字變長
具體設bai 置方法如下 1，把封面du的字打出來 zhi，字型調到最大。2，拉到頁dao面的最下內面，你會發現容a4下面還空著很大一部分。3，選擇字的範圍。4，找到調整字型大小的位置，在它的右邊有兩個a是可以調整字型大小的。5，把字型調到合適的大小，再居中，封面就好。6，字型的調整大小也可以用ct...
中，如何設定箭頭，然後箭頭上下都有字
1 2 3 4 右擊矩形，選擇新增文字可以了 插入 文字框在文字框裡面輸入內容，調整位置，再把邊框線去掉即可。在word中，怎麼在箭頭上下加文字？你所說的方案其實也可以,只是你沒把文字框設為透明,另一種方法是,選上文字,然後在格式 字型對話方塊裡,選上上標,需要文字在下方時,選上下標.文字框格式裡 ...
VB去除字串中的空格，VB 如何去掉一個字串中的空格
類似 dim a as string a a b 然後你可以呼叫a.trim 就是去掉空格。重新發一次 這樣,可去除空格 private sub command1 click dim a as string,b as stringa 1234 5678 for i 1 to len a if mid...