标题：VBA文本显示

1楼

黄金精算师 发表于：2016/4/14 10:20:52

你好可以帮看一下下VBA文本显示吗？

想在格子里显示３３３３３

Sub UserForm1_CommandButton1_Click() '主控策略暂停或运行

if UserForm1_CommandButton1.Caption="运行中" then

' if UserForm1_CommandButton4.Caption="运行中" then

iRun=0 '暂停

UserForm1_CommandButton1.Caption="暂停中"

UserForm1_CommandButton1.backcolor=rgb(255,0,0)

else

iRun=1 '运行

UserForm1_CommandButton1.Caption="运行中"

UserForm1_CommandButton1.backcolor=rgb(0,255,0)

end if

End Sub

'VBA启动时执行，用于对变量进行初始赋值、设置计时器等

Sub APPLICATION_VBAStart()

iRun=0 '默认值设置为0，就是不启动

UserForm1.Show '打开主控窗体

TextBox1=33333　　　　　　　　　　　　　　　　　　　　　　　　'主控窗体有个显示窗，属姓名为：TextBox1，我想在这个格子里显示３３３３３

End Sub

2楼

yukizzc 发表于：2016/4/14 10:39:01

UserForm1_TextBox1.text = 333

[此贴子已经被作者于2016/4/14 10:40:03编辑过]

3楼

黄金精算师 发表于：2016/4/14 10:51:36

谢谢，谢谢，谢谢，成了

共3 条记录, 每页显示 10 条, 页签: [1]