vb中怎么添加控件?

1、首先打开VB6.0，选择“标准EXE”。

2、然后按下键盘上的“Ctrl+T”来选择部件。

3、在其中找到“Microsoft Multimedia Control 6.0”选项。

4、点击左侧的小框框来选中。

5、点击对话框下部的确定按钮来完成添加。

6、此时，工具箱内就会出现小部件。

7、点击小部件，然后在窗体中画出小部件。

8、画完后，展现效果图。

9、关于MMcontrol的设置可以在右侧进行。

10、就这样，MMcontrol添加成功，可以为它书写代码了。

1、首先是要先从手机上打开vb软件app，进入到该软件app的主界面。

2、其次在进入到该软件界面后，选择“我的”功能登录账号。

3、最后在界面左上角的设置功能中，找到工作栏布局管理功能，选择shape控件，点击置顶选项即可。

添加3个控件后，复制以下代码：

Option Explicit

Private Sub Form_Load()

Label1.Caption = "参数："

Label1.AutoSize = True

Text1.MaxLength = 5

Text1.Text = "圆形"

End Sub

Private Sub Text1_Change()

Select Case Text1.Text

Case "矩形"

Shape1.Shape = 0

Case "正方形"

Shape1.Shape = 1

Case "椭圆形"

Shape1.Shape = 2

Case "圆形"

Shape1.Shape = 3

Case "圆角矩形"

Shape1.Shape = 4

Case "圆角正方形"

Shape1.Shape = 5

End Select

End Sub

说明：

改变Shape控件的Shape属性，可以使得Shape绘制不同图形：

Opject.Shape = 常数

Shape属性的常数与图形形状对应如下：

常数 设置值 形状描述

VbShapeRectangle0（缺省值） 矩形

VbShapeSquare 1 正方形

VbShapeOval 2 椭圆形

VbShapeOval 3圆形

VbShapeRoundedRectangle 4 圆角矩形

VbShapeRoundedSquare 5 圆角正方形

---