概述
Public Function colour(ByVal Code As Int16) As Color'顏色
Select Case Code
Case 1
colour = Color.White'白色
Case 2
colour = Color.Yellow'黃色
Case 3
colour = Color.Red'紅色
Case 4
colour = Color.Silver'灰色
End Select
End Function
Private Sub A1()
TextBox1.BackColor = colour(1)'l背景色白
TextBox1.BackColor = colour(2)'l背景色黃
TextBox1.BackColor = colour(3)'l背景色紅
TextBox1.BackColor = colour(4)'l背景色灰
End Sub
转载于:https://www.cnblogs.com/leme-chen/p/9288564.html
最后
以上就是拉长洋葱为你收集整理的vb.net Function使用的全部内容，希望文章能够帮你解决vb.net Function使用所遇到的程序开发问题。
如果觉得靠谱客网站的内容还不错，欢迎将靠谱客网站推荐给程序员好友。
本图文内容来源于网友提供，作为学习参考使用，或来自网络收集整理，版权属于原作者所有。
发表评论 取消回复