Private
Sub
form_Load()
Command1.ToolTipText
=
"单击这里程序兄指昌逗粗开始"羡扒
End
Form_Load()
"镇扮单和旅笑击这里程序开始"
end
sub
Command1
的
ToolTipText
属性
private
form_load()
command1.backcolor
vbred
改变形状?比如三角形的....从未听说伍段过,碰橘枝
貌似不能.
ToolTipText是鼠标移动到制定控件上才会显穗态示出来的
Command1.Default
True
是设按钮为默认按钮含运,按Enter键就相当于按猜老源了command1
把自戚则动换行让启改成你的菜坦仔如单名
Private Sub 自动换行_Click()
If 自动换行.Checked Then
自动换行.Checked = False
Else
自动换行.Checked = True
End If
End Sub
在菜单设计的时候 把 复选 勾上
Private Sub Cmd1_Click()
Dim i As Integer
For i = Opt1.LBound To Opt1.UBound
If Opt1(i).Value Then
i = (i + 1) Mod Opt1.Count
Opt1(i).Value = True
Exit For
Next
value值不同
Private Sub Command1_Click()
If (Option1.Value = True) Then MsgBox ("塌盯Option1 is select!"森磨)
添加一个OPTION控散链顷件,复制-粘贴,建立 控件组
在设计界面选中这个按钮后,在属性窗口中找到name属性(中文下也就是
(名称)
这个属性),修改为你需要的即可.
以上就是土嘎嘎小编大虾米为大家整理的相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!