VB2010等版本用法相同
步骤一:(鼠标左键)单击左侧工具条里按钮图标
步骤二:在窗体上点住鼠标左键不放,拖拽出按钮后再松开即可
工具条上其它控件的使用方法也一样的用法。祝你学习VB的旅程愉快顺利
从左边的工具箱里,点击command控件,添加上就可以了啊。如图:
如果你没有看到或者没有对应的工具,可能是你软件未安装好的原因,请卸载后重新安装试试。
按以下步骤实现动态添加命令按钮
(1)新建一个VB6工程
(2)Form1窗体代码
Option Explicit'定义要动态添加的命令按钮变量(带事件处理)
Dim WithEvents cmdX As CommandButton
'点击动态添加的按钮,d出对话框
Private Sub cmdX_Click()
MsgBox "动态添加的命令按钮!!!"
End Sub
'鼠标双击窗体,动态添加一个命令按钮
Private Sub Form_DblClick()
If cmdX Is Nothing Then
Set cmdX = Controls.Add("VB.CommandButton", "cmd1")
cmdX.Caption = "点击我呀"
cmdX.Width = 4500
cmdX.Move 150, 150
cmdX.Visible = True
End If
End Sub
(3)运行
启动后
鼠标双击窗体
点击命令按钮,d出一个对话框
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)