请问个VB里面shape控件的作用是什么? 请问个VB里面shape控件的作用是什么?用了感觉也没什么不一样,想听各位的详解 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在 Visual Basic 6.0 中,Shape 控件提供了一种简单的方法,用于在设计时绘制矩形、圆和其他形状。Shape 控件是一个“轻量级”控件,这意味着它没有 Windows 句柄(也称为 HWnd)。设计时,可以通过添加 Label 控件并将 Text 属性设置为空字符串,以及将 BorderStyle 属性设置为 FixedSingle,将 BackColor、Width 和 Height 设置为所需颜色和尺寸,在窗体上绘制正方形或矩形。在 Visual Basic 6.0 中,可以通过向容器添加 Shape 控件,使用 Shape 控件在容器控件(例如 PictureBox 或 Frame 控件)上绘制形状。绘制矩形的代码' Visual Basic 6.0Private Sub Form_Load() ' Show a solid red rectangle 200 twips from the top left. Shape1.Top = 200 Shape1.Left = 200 Shape1.FillColor = vbRed Shape1.FillColor= vbFSSolid Shape1.BorderColor = vbRedEnd Sub绘制圆的代码Private Sub Form_Load() Draw a 1000 twip diameter red circle Shape1.Top = 0 Shape1.Left = 0 Shape1.Height = 1000 Shape1.Width = 1000 Shape1.Shape = vbShapeCircle Shape1.BorderColor = vbRedEnd Sub editgrid编辑的问题 Microsoft Visual Basic 6.0 桌面应用程序开发 如何让VB做成的软件会自动检测更新版本出来了。 说不明白,高手进来看吧,谢 获取windows安装路径问题。 关于安装(factory)急!急!急! 问题小,分不少? sql数据库向excel转换的问题。 十万火急!!!!如何将外设当成文件处理。各位英雄救命。 如何用 WindowFromPoint 函数获取不可用控件(即Enabled属性为False)的控件的句柄(内空) 如何让MSFlexGrid中的内容根据不同的结果显示不同的色彩 请教编写OCX的问题!
' Visual Basic 6.0
Private Sub Form_Load()
' Show a solid red rectangle 200 twips from the top left.
Shape1.Top = 200
Shape1.Left = 200
Shape1.FillColor = vbRed
Shape1.FillColor= vbFSSolid
Shape1.BorderColor = vbRed
End Sub绘制圆的代码
Private Sub Form_Load()
Draw a 1000 twip diameter red circle
Shape1.Top = 0
Shape1.Left = 0
Shape1.Height = 1000
Shape1.Width = 1000
Shape1.Shape = vbShapeCircle
Shape1.BorderColor = vbRed
End Sub