小编给大家分享一下VB语言如何实现自动打字效果,相信大部分人都还不怎么了解,因此分享这篇文章给大家参考一下,希望大家阅读完这篇文章后大有收获,下面让我们一起去了解一下吧!
本节知识案例目标
一、本节主要用到的知识点:
字符串分割函数left
全局变量
时钟控件timer
标签控件label
二、开发过程介绍
界面设计
需要使用label控件、Image控件、timer控件。设置image控件的stretch属性为true,代表图片可以按照比例自由伸缩。
这里的核心函数是left函数,以下我们介绍left函数的相关要点。
left函数的主要作用是字符串分割。
left函数的使用格式:
left(字符串,取的个数)
涉及相关知识介绍:
双引号 来表示一个字符串
变量:可变的量。
变量其实就是在声明了一下在内存空间中占据了一定的空间。
dim s as String
s="宁波市职教中心学校是全球一流的职业高中。"
注释代码使用单引号。
被注释的代码不会被程序运行,通常被注释的代码只需要用作说明解释。
cls命令
cls表示清空form窗体上的被print输出的内容。
案例涉及到的变量的类型:
整型变量integer
这个变量的类型中的数值都是整数。
数值类型通常用来比较大小、用作数学运行。
字符串类型(文本类型)String
文本类型用""双引号来表示。
文本类型可以用 & 和 ; 这两个符号将多个字符串连接起来。
相关变量的初始化
Form_Load事件是窗体启动的时候发生的。
代表窗体启动的时候要运行的代码。
初始化的代码,我们对需要打印的字符串写入全局变量s,对打印的字数输出到全局变量a中。
本节知识界面设计
timer控件属性配置
本节知识源代码:
Dim s As String
Dim a As Integer
Private Sub Form_Load()
s = "宁波市职教中心学校是全球一流的职业高中。"
a = 1
Label1.ForeColor = vbRed
End Sub
Private Sub Timer1_Timer()
'Cls
Label1.Caption = Left(s, a)
a = a + 1
End Sub
以上是“VB语言如何实现自动打字效果”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注编程网行业资讯频道!