下载后可任意编辑VB 中 PictureBox 控件使用教程 PictureBox 对象可以说是任何对象的原始型态，它可以加载图片、显示文字、画图外，它还能与 Frame 对象一样，在自己本身里头加载其它的对象而自成一个小群组，用 PictureBox 可以仿真出任何对象的外观，PictureBox 是 VB 基本控件里变化最多，功能最多，也是令人最想去征服它的一个物件。 ●PictureBox 与 Frame 对象一样，本身都能装载其它的对象而自己形成一个对象群组。●假如要拿 PictureBox 装载对象时，可以把它视为 Frame 来使用。●与 Image 对象一样在设计阶段时，以 Picture 属性来加载图片。●与 Image 对象一样都是在属性对话窗口按一下〝...〞钮后，跳出〝加载图片〞对话框，选择所要的图档，然后加载。●在执行阶段，可以用 VB 的函数来帮 PictureBox 加载图片： Command1_Click() Picture1.Picture = LoadPicture("E:\MyGif\AniGif0562.gif") End Sub ●在设计阶段，若后悔加载图片，想把它消除时，可以把 PictureBox 按 Delete 键删掉，然后从工具箱拖曳一个新的 PictureBox，或是在属性对话框里的 Picture 属性，把〝(位图)〞这几个反白，或是移到〝(〞的最前端，按一下键盘的 Delete 键即可移除图片。●若在执行阶段，想把 PictureBox 内的图片移除，可再用 LoadPicture 函数，并且传空字符串给它： Private Sub Command1_Click() Picture1.Picture = LoadPicture("") End Sub --------------------------------------------------------------------------------●在 PictureBox 里画图：●PSet 方法：PSet 不只是用在 PictureBox 上，也可以用在窗体上，PSet 最主要功用用就是在某一点位置上画一个点，用法是 Object.PSet(X,Y), Color： Private Sub Command1_Click() Picture1.PSet(500,260),RGB(128,0,255) 'RGB 函数是以红色、绿色、蓝色来表示颜色，详情请到函数指令参考 End Sub●若颜色省略，则以 PictureBox 预设的颜色。 ●前面有学到随机数的运用，因此我们来做个范例看看，范例─满天繁星： Private Sub Timer1()_Timer Randomize X = Int(Rnd * Picture1.ScaleWidth) Y = Int(Rnd * Picture1.ScaleHeight) R = Int(Rnd * 256) G = Int(Rnd * 256) B = Int(Rnd * 256) Picture1.PSet (X, Y), RGB(R, G, B)End Sub●Line 方法：Line 方法专门...
