重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
方法如下:
创新互联是一家专注于成都网站制作、成都网站建设与策划设计,淮北网站建设哪家好?创新互联做网站,专注于网站建设10年,网设计领域的专业建站公司;建站业务涵盖:淮北等地区。淮北做网站价格咨询:18980820575
1、打开例1.1创建的工程。
2、选择窗体Form1并双击该窗体,出现窗体的调事件的过程代码体。
3、在窗体调用的过程代码体中编制如下过程代码:
Private Sub Form_Load()
Form1.Width = 4860
Form1.Height = 2520
End Sub
4、设置窗体Form1的SartUpPosition属性为2-屏幕中心,这样运行窗体可以发现,屏幕的大小与例1.6中通过属性设置的大小是一致的。
使用SplitContainer1控件不就行了,SplitContainer1控件的Fixedpanel属性设置为Panel1
SplitContainer1的Panel2里面再放置一个SplitContainer2
SplitContainer2控件的Fixedpanel属性设置为Panel2
二个SplitContainer设置为水平折为器方向
至于播放器控件就放在SplitContainer2控件Panel1里面
播放器控件DOCK设置为FILL
这样不管放大缩小界面,播放器控件总是自适应窗体大小而菜单按钮总是在最边缘
实现方法如下:
1.引用命名空间
using System.Runtime.InteropServices;
2.声明如下变量:
public class Form1 : System.Windows.Forms.Form
{
//.....
[DllImport("user32.dll",EntryPoint="GetSystemMenu")]
extern static IntPtr GetSystemMenu(IntPtr hWnd, IntPtr bRevert);
[DllImport("user32.dll",EntryPoint="RemoveMenu")]
extern static int RemoveMenu(IntPtr hMenu, int nPos, int flags);
//.....
}
3.在Form的构造函数里加入代码
public Form1()
{
const int MF_BYPOSITION = 0x0400;
const int MF_REMOVE = 0x1000;
FormBorderStyle = FormBorderStyle.FixedSingle;
MaximizeBox = false;
MinimizeBox = false;
RemoveMenu(GetSystemMenu(Handle,IntPtr.Zero),1,MF_BYPOSITION |MF_REMOVE);
}
就OK啦
VisualStudio 2010中的vb.net
锁定边框:
代码输入Me.FormBorderStyle = Windows.Forms.FormBorderStyle.Fixed3D
或者在属性列表里设置FormBorderStyle 为Fixed3D
最大化不可用:
代码输入Me.MaximizeBox = False
或者在属性列表里设置MaximizeBox 为 False
vb.net设置一个窗体为,宽度不能调节,而高度可以调节,
代码设置方法:
Dim form_width As Integer = Me.Width
Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
If Me.Width form_width Then
Me.Width = form_width
'Debug.Print(TimeString "-" CStr(Me.Width))
End If
End Sub
vb.net,即Visual Basic.NET是基于微软.NET Framework之上的面向对象的编程语言。其在调试时是以解释型语言方式运作,而输出为EXE程序是是以编译型语言方式运作。可以看作是Visual Basic在.Net Framework平台上的升级版本,增强了对面向对象的支持。