在 from1.vb 这个窗口中点属性
十余年的新源网站建设经验，针对设计、前端、开发、售后、文案、推广等六对一服务，响应快，48小时及时工作处理。营销型网站建设的优势是能够根据用户设备显示端的尺寸不同，自动调整新源建站的显示方式，使网站能够适用不同显示终端，在浏览器中调整网站的宽度，无论在任何一种浏览器上浏览网站，都能展现优雅布局与设计，从而大程度地提升浏览体验。创新互联公司从事“新源网站设计”,“新源网站推广”以来，每个客户项目都认真落实执行。
在属性里有个 text 把后面的空格 加上你所想要的标题，如果不想要标题，直接为空
点选窗体、一点要点选上.然后在属性栏里、把text属性里的字取消、清空、那么窗体的标题就没有了.
一句两句说不清楚..
建议你去自己学习下
希望对你有帮助..祝你成功
窗口的FormBorderStyle是修改窗口属性的~，可以改成None这样就没有边框和标题栏了
如果仅仅要去掉标题栏，修改窗口ControlBox为false，并吧Text属性置空就好了
1、无边框窗体也就是无标题栏窗体，对于这样的窗体移动需要编程实现。
2、vb有两种办法实现，一直接编程实现，二调用windows API编程实现。
3、这里示例直接编程实现：
Option Explicit
Dim BolIsMove As Boolean, MousX As Long, MousY As Long
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then BolIsMove = True
MousX = X
MousY = Y
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim CurrX As Long, CurrY As Long
If BolIsMove Then
CurrX = Me.Left - MousX + X
CurrY = Me.Top - MousY + Y
Me.Move CurrX, CurrY
End If
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
BolIsMove = False
End Sub
呵呵，最近刚刚研究了这个方面的东西。
实现你说的效果并不是很难，引用一下第三方控件就可以了。我推荐给你两个控件一个是skin++（又叫skinplusplus）,一个是skinmagic。我是用skin++实现的vb，skinmagic实现的vc。实现起来并不是很麻烦，控件当中对按钮、窗体、对话框、各类控件的颜色和形状都可以进行改变，伴随这控件提供了很多界面方案，效果都是不错的，同时还有编辑工具、可以自定义方案。
如果你想研究的话，去网上查查两个控件的使用方法，demo也是相当多的，下个demo看看你就能搞定了。
或者联系我也行，我公司封了qq，找我msn：boyjin821@163.com（或者等我阴了公司的防火墙qq 52964764）(暴金)
