vb制作按钮动态文字

更新时间2021-06-30 09:32:50

Dim a As String
Private Sub Command1_Click()
 Me.Cls
 If a = "Hi！朋友5261，4102您好1653" Then 
a= "再见，欢迎再次光临"
else
a="Hi！朋友5261，4102您好1653"
end if
? a
end sub

你的变量a没有定义,不可能等于"Hi！朋友5261，4102您好1653"

且这样也没有意义 

一般要用文本框来输入内容的

或直接用inputbox输入

你要有具体的要求