vb代码增加控件
发布网友
发布时间:2022-04-30 19:12
我来回答
共3个回答
热心网友
时间:2022-06-30 03:44
在
工具箱里
添加
就是
VB环境的
左边
那竖行就是的,呵呵!
热心网友
时间:2022-06-30 03:45
Private
WithEvents
NewButton
As
CommandButton
′增加控件
Private
Sub
Command1_Click()
If
NewButton
Is
Nothing
Then
′增加新的按钮cmdNew
Set
NewButton
=Controls.Add(″VB.CommandButton″,″cmdNew″,
Me)
′确定新增按钮cmdNew的位置
NewButton.Move
Command1.Left+Command1.Width+240,
Command1.Top
NewButton.Caption
=″新增的按钮″
NewButton.Visible
=
True
End
If
End
Sub
Private
WithEvents
NewButton
As
CommandButton
Private
Sub
Command1_Click()
If
NewButton
Is
Nothing
Then
Set
NewButton
=
Controls.Add("VB.CommandButton",
"cmdNew",
Me)
NewButton.Move
Command1.Left
+
Command1.Width
+
240,
Command1.Top
NewButton.Caption
=
"新增的按钮"
NewButton.Visible
=
True
End
If
End
Sub
热心网友
时间:2022-06-30 03:45
Private
WithEvents
NewButton
As
CommandButton
′增加控件
Private
Sub
Command1_Click()
If
NewButton
Is
Nothing
Then
′增加新的按钮cmdNew
Set
NewButton
=Controls.Add(″VB.CommandButton″,″cmdNew″,
Me)
′确定新增按钮cmdNew的位置
NewButton.Move
Command1.Left+Command1.Width+240,
Command1.Top
NewButton.Caption
=″新增的按钮″
NewButton.Visible
=
True
End
If
End
Sub
vb中怎么添加控件?
1、首先打开VB6.0,选择“标准EXE”。2、然后按下键盘上的“Ctrl+T”来选择部件。3、在其中找到“Microsoft Multimedia Control 6.0”选项。4、点击左侧的小框框来选中。5、点击对话框下部的确定按钮来完成添加。6、此时,工具箱内就会出现小部件。7、点击小部件,然后在窗体中画出小部件。8、画完...
VB怎么用代码添加控件数组
开始创建一个控件,index属性设为0,以后添加的话可以这样。以textbox为例:Load Text1(1)with text1(1).top=100 .left=100 ...visible=true end with
VB6.0里如何加代码
1. 首先,你需要在窗体上绘制一个命令按钮Command1。这可以通过工具栏上的"命令按钮"图标或者通过拖拽鼠标在窗体上绘制完成。2. 接下来,添加一个复选框Check1。同样,通过工具栏或鼠标在Command1旁边放置一个复选框,它会自动关联到Command1。3. 然后,复制这两个控件。在工具栏上找到"复制"按钮,...
vb向窗体中添加各种控件有哪几种方法?
第一种,是最常用的,也是使Vb变得简单的一个优势,就是直接从工具箱中选择空间,添加到窗体中,还可以选中控件,设置各种属性,设置好后,就无需再用代码进行设置。第二种,比较复杂,就是直接用代码添加控件。需要用代码指定控件的大小、位置等等各种属性,一般在Vb中用的较少。
VB6.0如何用代码添加控件
Form1.Controls.Add "VB.CommandButton", "cmdObj1", Frame1 With Form1!cmdObj1 .Visible = True .Width = 2000 .Caption = "Dynamic Button"End With End Sub 注意 上面的代码例子使用 ! 作为一个语法要素。您也可以使用标准集合语法如 Form1.Controls("cmdObj1") 来引用该控件。第二个...
VB 通过代码添加的按钮或者其他控件如何保存下来?
i = i + 1 Controls.Add "VB.CommandButton", "cmdOK" & Trim(Str(i))Controls(i).Caption = Trim(Str(i))Controls(i).Visible = True Controls(i).Move Controls(i - 1).Left + Controls(i - 1).Width End Sub Private Sub Form_Load()Open "d:\a.txt" For Input As 1 Do ...
VB如何实现窗体中添加按钮控件
1、打开VB6.0,新建一个工程,在窗体中添加一个命令按钮,caption分别改为“调用函数”,将窗体Form1的caption属性改为“VB6.0自定义函数”。2、双击窗体Form1,进入代码编辑窗口,单击左侧下拉三角形,选择通用。3、在通用段输入代码,并将Form_Load事件删除。4、双击“调用函数”命令按钮,进入代码编辑...
VB怎么用代码创建控件数组?
先定义一个控件(Option1),然后修改index值为0 ,就创建了控件数组,设置你要创建控件数组的其它属性.\x0d\x0aPrivate Sub Form_Load()\x0d\x0a Dim i%\x0d\x0a For i = 1 To 3\x0d\x0a Load Option1(i) 这句是关键,,,\x0d\x0a Option1(i).Top = Option1...
VB中向窗体添加控件后怎样打开代码窗口添加或编辑空间代码
直接在工程资源管理器的窗口上选择窗体,然后在快捷菜单中选择“添加”,然后在级联菜单中选择“窗体”就可以了。
VB中添加什么控件可播放音乐文件,添加的代码是什么?
接着在form 的 load 事件中写如下代码:Call PlaySound(App.Path + "音乐名字.wav", 0&, &H1)//必须在当前文件夹下 第二:添加Windows Media Player 控件 把Windows Media Player 控件visible 属性设置为false url 属性设置为 音乐文件的绝对路径并且加上音乐文件名字 或者在load 事件中设置此属性...