VB   发布时间:2022-04-03  发布网站:大佬教程  code.js-code.com
大佬教程收集整理的这篇文章主要介绍了[VB.NET]动态标题大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。
动态标题

实例说明

在本实例中,我们制作一个窗体的标题是动态变化的应用程序。程序启动时,窗体的标题就开始变化。程序运行结果如图95-1所示。

图95-1 运行结果

技术要点

l 使用Timer控件

l 更改窗体的标题

实现过程

■ 新建项目

打开Visual Studio.NET,选择"新建项目",在项目类型窗口中选择"Visual Basic项目",在模板窗口中选择"Windows应用程序",在名称域中输入"DynCaption",然后选择保存路径。单击"确认"。

■ 添加控件和设置属性

向当前窗体上添加一个Label控件和一个Timer控件,将Label控件的Text属性改为和界面一致。Timer控件的Interval属性设为200(ms),Enabled属性设置为True(默认值为False)。

■ 添加代码

Public Class Form1

Inherits System.Windows.Forms.Form

Dim strword As String

Dim startword As Short

Friend WithEvents Label1 As System.Windows.Forms.Label

Dim textword As String = "欢迎使用VB.NET!"

#Region " Windows Form Designer generated code "

Public Sub New()

MyBase.New()

InitializeComponent()

Me.Text = ""

startword = 1

End Sub

#End Region

Private Sub Timer1_Tick(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles Timer1.Tick

strword = Mid(textword,startword,1)

Me.Text = Me.Text & strword

If startword > Len(textword) Then

Me.Text = ""

startword = 1

End If

Beep()

startword = startword + 1

End Sub

End Class

■ 运行程序

单击菜单"调试|启动"或单击 图标运行程序。

小结

本实例通过使用Timer控件来控制窗体标题的变动。

大佬总结

以上是大佬教程为你收集整理的[VB.NET]动态标题全部内容,希望文章能够帮你解决[VB.NET]动态标题所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。
标签: