当前位置:首页 > 生活 > 正文

按键精灵安卓版提示信息showmessage的几种动态显示方法(按键精灵发出提示音代码)

一、倒计时显示



For i = 0 To 10

ShowMessage 倒计时 & 10-i & 秒

Delay 1000

Next


二、闪烁形式



For 5

ShowMessage ☆☆☆☆☆

Delay 500

ShowMessage ★★★★★

Delay 500

Next


三、进度加载形式



Dim k

For i = 0 To 100

For i mod 4

k = k & .

Next

ShowMessage 当前进度: & i & %请稍后&k,200,50,400

Delay 200

k=

Next


四、打字效果



Dim words=关注公众号:3分钟学堂, 获取安卓按键进阶教程 交流群:78237147

Dim word,word_line

For i = 1 To UTF8.Len(words)

word = UTF8.StrGetAt(words, i)

If word = Then

word_line = word_line & \n

Delay 100

End If

word_line = word_line & word

ShowMessage word_line & _, 200, 30, 200

Delay 100

Next

For 5

ShowMessage word_line & _, 200, 30, 200

Delay 300

ShowMessage word_line, 200, 30, 200

Delay 300

Next