VB里的Shape都有什么常用属性?
If Form1.Shape1(0).Left + Form1.Shape1(i).Width > Form1.Line1.X2 Then
这一句里的括号里的0是什么意思?Shape1的1又是什么意思?
Shape是VB中的图形控件,可以设置为椭圆(圆)、矩形(正方形)和圆角矩形并可以设置填充模式。在语句
If Form1.Shape1(0).Left + Form1.Shape1(i).Width > Form1.Line1.X2 Then中,Shape1是一个控件数组。括号中的0是这个控件在数组中的索引号(序号)。0表示控件数组中的第0个Shape控件,i表示第i个。
你可以查看一下Shape1的属性页,这个数字对应属性页中的Index属性。
完美!
VB里的Shape都有什么常用属性? If Form1.Shape1(0).Left + Fo
Shape是VB中的图形控件,可以设置为椭圆(圆)、矩形(正方形)和圆角矩形并可以设置填充模式。在语句 If Form1.Shape1(0).Left + Form1.Shape1(i).Width > Form1.Line1.X2 Then中,Shape1是一个控件数组。括号中的0是这个控件在数组中的索引号(序号)。0表示控件数组中的第0个Shape控件,i...
VB中shape控件的属性有哪些
shape控件没有鼠标点击事件,不过你可以将shape控件放入Picturebox容器中,给你个简单例子,在Shape控件上单击,shape立即变成红色:Private Sub Form_Load()Picture1.Move Shape1.Left,Shape1.Top,Shape1.Width,Shape1.Height Picture1.BorderStyle = 0 Shape1.Move 0,0 End Sub Private Sub Picture1...
在VB中shape1.shape=i的意思
意思如下:在窗体上添加Shape控件设置它的Shape属性,就可以了;Shape1.Shape=0'(缺省值)矩形Shape1.Shape=1'正方形Shape1.Shape=2'椭圆形Shape1.Shape=3'圆形Shape1.Shape=4'圆角矩形Shape1.Shape=5'圆角正方形。
vb中的“shape”是什么?
vb中的Shape是图形控件,显示矩形、正方形、椭圆、圆形、圆角矩形或者圆角正方形。Shape控件属轻量图形控件,只支持 PictureBox 的属性、方法和事件的一个子集。因此,它们需要较少的系统资源而且加载也比 PictureBox 控件更快。语法Shape说明或者不调用在运行时的 Circle 和 Line 方法而使用在设计时的 Sh...
VB小球运动
If Shape1.Left > Form1.ScaleWidth - Shape1.Width Then L = -L If Shape1.Top < 0 Then T = -T If Shape1.Left < 0 Then L = -L End Sub Top对应的应该是高度即Height,Left应对应Width。还有,小球是在窗体内部运动,而窗体内部有效的宽度和高度是ScaleWidth和ScaleHeight。按原来...
VB常用属性
(1) Appearance属性 该属性有两个可选值:0- Flat表示在窗体运行时不以3D方式显示,1-Flat表示在窗体运行时以3D方式显示。(2) BackColor和ForeColor属性 设置或返回窗体前景颜色和背景颜色。代码设置如下:Form1. BackColor=vbcolor Form1. ForeColor=vbcolor (3)Bordertyle属性 该属性是设置窗体的...
vb中combobox选中不同的项触发不同的事件的代码
Shape1(Combo1.ListIndex).BackColor = RGB(255, 0, 0) '红色 End Sub Private Sub Form_Load() '窗体加载 Dim n As Integer Combo1.AddItem "关闭所有" '先建立一行选择项 For n = 1 To 12 Combo1.AddItem "点亮第 " & n & " 个" '循环建立其它项 Next n Combo1.ListIndex = ...
VB中的shape移动问题
Private Sub Command1_Click()x0 = Me.ScaleWidth \/ 2 y0 = Me.ScaleHeight \/ 2 r = 1000 Timer1.Interval = 100 Timer1.Enabled = True End Sub Private Sub Timer1_Timer()Static a As Single If a < 2 * PI Then a = a + 0.1 Else a = 0 Shape1.Move x0 + r * Cos(...
vb的shape的fillcolor属性有什么用?
填充颜色.需要改变SHAPE的样式 比如实心 就会看见这个颜色值填充了整个SHAPE内部了
vb窗体常用的方法有
vb窗体常用的方法有:1、BorderStyle:这个属性是用来设置窗体的边框样式,属性取值分别为窗体没有外边框、窗体大小固定不变、运行时窗体大小可以改变、运行时窗体大小不可以改变、运行时窗体大小不可以改变、运行时窗体大小可以改变。2、MaxButton:设置窗体右上方的最大化按钮是否可用。值为True,最大化按钮...