精华内容
下载资源
问答
  • VB实现窗口文字大小随窗体大小变化,实现了窗体文字的随窗口大小自适应改变,只要用鼠标拖动窗口的大小,即可改变窗口内所属控件的文字大校自适应大小的窗口框架,注意,把需要随窗体改变大小的空间的tab属性设置成 ...
  • VB加载窗体属性设置后保存参数,适用于VB6.0的开发中,本源码功能介绍:  通过对配置文件的操作  1、判断程序是否异常关闭  2、实现使用次数的统计  3、记录窗体大孝位置  4、修改程序标题
  • VB在运行时改变窗体的一些属性,在运行时可以改变窗体标题、是否显示最大化、最小化以及工具栏窗口,是否在最前端显示,是否允许移动,或者是在任务栏显示,是否能够控制菜单与按钮。还可以设置两项行为:是否是...
  • VB窗体的窗体的属性及说明

    万次阅读 2018-02-26 18:57:43
    放了寒假呆在家里,我爸比较喜欢周易里的一些东西,于是问我能不能帮助他编写一个小程序来算卦。我想了想发现如果使用...在这里我整理了一些关于窗口属性的介绍,如下: Name 窗体的名称 ActiveControl 返回焦点...

    放了寒假呆在家里,我爸比较喜欢周易里的一些东西,于是问我能不能帮助他编写一个小程序来算卦。我想了想发现如果使用c语言直接做出来的页面太简陋,更美观的话需要一些API,而java也好久没有用过很生疏了。最后我想到了用VB来制作,发现用VB编写一些小型程序还是很方便的。

    程序样式如下:

    在这里我整理了一些关于窗口属性的介绍,如下:

    Name 窗体的名称

    ActiveControl 返回焦点所在的控件,该属性设计阶段不可用,运行时只读。

    Appearance外观效果,取值为:0 平面1 3D(立体)

    AutoRedraw是否自动刷新或重画窗体上所有图形[获得或设置从绘图

    (graphics)方法到一个持久性位图的输出],取值为:True False

    BackColor 背景颜色,可从弹出的调色板选择。

    BorderStyle设置边界类型,取值为:0 None(无边界框架)1 FixedSingle(窗口大小固定不变的单线框架)2 Sizable(窗口大小可变的标准双线框架)3 FixedDialog(窗口大小固定的对话框窗体)4 FixedToolWindow(窗口大小固定的工具箱窗体)5 Sizable ToolWindow(窗口大小可变的工具箱窗体)

    Caption 窗体的标题

    ClipControls决定Paint 事件的graphics 方法是重画整个对象,还是重画新显示的区域。取值为:True 或False

    ControlBox是或有控制框, 取值为:True 有False 无

    DrawMode设定窗体上绘图(graphics 方法),Shape,Line 等控件的输出外观,有16 种可选:1 黑色2 非或笔,设置值15 的反相3 与非笔,背景色以及画笔反相二者共有颜色的组合4 非复制笔,设置值13 的反相5 与笔非,画笔以及显示色反相二者共有颜色的组合6 反相,显示颜色反相7 异或笔,画笔颜色以及显示颜色的异或8 非与笔,设置值9 的反相9 与笔,画笔以及显示色二者共有颜色的组合10 非异或笔,设置值7 的反相11 无操作,该设置实际上是不画图12 或非笔,显示颜色与画笔颜色反相的组合13 复制笔,用ForeColor 属性指定的颜色,此为默认值14 或笔非,画笔颜色与显示颜色反相的组合15 或笔,画笔颜色与显示颜色的组合16 白色

    DrawStyle设定绘图相关方法使用的直线样式, 有7 种可选:0 实线,此为默认值1 虚线2 点线3 单点划线4 双点划线5 无线6 内部实线

    DrawWidth 设定绘图相关方法使用的直线宽度Enabled是或把鼠标或键盘事件发送到窗体,取值为:True 可用False 不可用

    FillColor 填充颜色, 可从弹出的调色板选择。

    FillStyle填充样式, 有8 种可选:0 全部填充1 透明,此为默认值2 水平直线3 竖直直线4 上斜对角线5 下斜对角线十字线7 交叉对角线

    Font 字型,可从弹出的对话框选择字体,大小和风格

    FontTransparent输出数据是否允许重叠(获得或设置一个值,决定是否显示窗体,打印机或PictureBox 上的背景文本/图形)。取值为:True 或False

    ForeColor 前景颜色,可从弹出的调色板选择。

    HasDC决定是否为该控件分配了唯一的显示上下文。取值为:True 或False

    Height 窗体的高度

    HelpContextID 指定一个对象的缺省帮助文件上下文标识符

    Icon 为窗体设计图标,该图标位于标题栏的左端

    KeyPrevier获得或设置是否在激活对象的上的控件的键盘事件之前,优先激活对象键盘事件。取值为:True 或False

    Left 窗体距屏幕左边界的距离

    LinkMode获得或设置用于DDE 会话的链接类型并激活连接,取值为:0 None

    SourceLinkTopic 获得或设置目标控件的源应用程序和主题

    MaxButton窗体右上角最大化按钮是否显示,运行时只读, 取值为:True 显示False 不显示

    MDIChild是否为MDI 窗体的子窗体, 取值为:True 为MDI 窗体的子窗体False 否MinButton窗体右上角最小化按钮是否显示,运行时只读, 取值为:True 显示False 不显示

    MouseIcon MousePointer=99 时,设定一个自定义的鼠标图标

    MousePointerMoveable是否可以移动窗体, 取值为:True 可以移动False 不可以移动

    NegotiateMenus决定是否将对象的菜单合并到该窗体的菜单栏上。取值为:True 或False

    OLEDropMode获得或设置该对象是否能作为一个OLE 放下目标, 取值为:0 None(无)1 Manual(手动)

    Palette获得或设置一个图象,包含了当PaletteMode 被设置为Custom 时用于调色板的对象。

    PaletteMode获得或设置一个值,决定对于对象的控件使用哪个调色板。取值为:0 Halftone1 UseZOrder2 Custom

    Picture 窗体背景图片

    RightToLeft文本书写是否自左向右。取值为:TrueFalse 自右向左

    ScaleHeight 自定义坐标系的纵坐标轴的高度

    ScaleLeft 自定义坐标系的左边界起点的横坐标

    ScaleMode获得或设置一个值,指示当使用graphics 方法或可定位的控件时,自定义坐标系的单位, 有8 种可选:0 自定义1 表示单位为twip(缇),每英寸=1440 缇,每厘米=567 缇2 表示单位为point(磅) ,每英寸=72 磅,每磅=20 缇3 表示单位为像素,是监视器或打印机分辨率的最小单位4 表示单位为字符,每个水平单位为120 缇,每个垂直单位为240 缇5 表示单位为in(英寸)6 表示单位为mm(毫米)7 表示单位为cm(厘米)

    ScaleTop 自定义坐标系的上边界起点的纵坐标

    ScaleWidth 自定义坐标系的横坐标轴的宽度

    ShowInTaskbar窗体或MDI 窗体是否出现在Windows95 的任务栏。取值为:True 出现False 不出现

    StartUpPosition窗体第一次出现的位置, 有4 种可选:0 没有指定初始位置1 设定在所属项目的中央2 设置在屏幕的中央3 设置在屏幕的左上角Tag 存储程序所需的附加数据Top 窗体距屏幕顶部边界的距离

    Visible窗体是否可见, 取值为:True 该对象可见False 该对象不可见

    WhatsThisButton获得或设置是否在一个窗体或MDI 窗体的标题上显示这是什么按钮。取值为:True 或False

    WhatsThisHelp获得或设置是否在上下文相关帮助中, 使用Windows95 帮助或主帮助窗口提供的这是什么弹出菜单。取值为:True 或False

    Width 窗体的宽度

    WindowStart获得或设置一个窗体窗口运行时的可见状态, 取值为:0 窗体正常状态1 窗体最小状态2 窗体最大状态

    展开全文
  • VB窗体控件大小随窗体大小变化自動調整 有时窗体变化后,如改变分辨率后控件大小却不能随之改变。手工代码调整实在麻烦,下面的模块实现自动查找窗体上控件并使其改变大小以适应窗体变化。 在Form的Resize事件中...
  • vb窗体的常用属性及其功能

    千次阅读 热门讨论 2017-06-11 10:12:49
    VB窗体的常用属性及其功能属性名称 功能 属性值及功能 窗体名称 为窗体指定一个名字 Appearance 设置一个窗体运行时是否以3D效果显示 0-Flat:窗体以平面的形式显示1-3D:窗体以3D的形式显示(默认值) AutoRedraw...

    VB中窗体的常用属性及其功能

    属性名称  功能 属性值及功能  

     窗体名称  为窗体指定一个名字   

     Appearance  设置一个窗体运行时是否以3D效果显示 0-Flat:窗体以平面的形式显示

    1-3D:窗体以3D的形式显示(默认值)

      

     AutoRedraw  控制窗体的重画  True:若无其它窗体覆盖当前窗体再返回该窗体时,VB将重画该窗体的所有图形

    False:VB必须调用一个事件过程才能完成重画

     

     

     BackColor  设置对象中文本和图形的背景色   

     ForeColor  设置对象中文本和图形的前景色   

     BorderStyle  为窗体等对象设置边框的式样  0-None:窗体无边框

    1-FixeSingle:程序运行后窗体大小不被改变,单线边框

    2-Sizable:程序运行后窗体大小可以被改变,双线边框

    3-FixedDouble:程序运行后窗体大小不被改变,双线窗体

    4-FixedToolWindow:程序运行后窗体大小可以被改变,单线边框

    5-SizableToolWindow:程序运行后窗体大小可以被改变

     

     

     Caption  设置窗体标题栏显示的文本 True:重画整个对象

    False:重画新显示的区域

      

     ControlBox  运行程序时该属性有效。在窗体标题栏左边设置一个任务列表,点击窗体图标左上角显示系统菜单  True:能显示系统菜单

    False:不能显示系统菜单

     

     

     DrawMode  设置绘图方运河或决定用Shap,Line控件输出时的外观  共16个值(略)

     DrawStyle  设置用绘图方法输出时的线条类型  0-Solid:实线(默认值)

    1-Dash:虚线

    2-Dot:点线

    3-DashDot:点划线

    4-DashDotDot:双点划线

    5-Invisible:无线

    6-InsideSolid:内收实线

     

     

     DrawWidth  设置用绘图方法输出时的线条宽度   

     Enabled  设置一个对象是否对用户生成的事件的响应  True:用户操作被响应(默认值)

    False:用户操作不被响应

     

     

     FillColor  设置填充圆、方框等封闭图形所使用的颜色  标准RGB颜色,默认情况下,设置为0(黑色)

     FillStyle  设置Shape控件中所生成图表的填充样式 0-Solid:实线

    1-Transparent透明(默认值)

    2-HorizontalLine:水平直线

    3-VerticalLine:垂直直线

    4-UpwardDiagonal:上斜对角线

    5-DownwardDiagonal:下斜结角线

    6-Cross:十字线

    7-DiagonalCross:交叉结角线

     

     

     Height  设置窗体的高度   

    Width   设置窗体的宽度   

     Font  设置窗体上的字形、字号等   

     FontTransparent  设置是否显示窗体、打印机、或图片框上的背景文本、图片   True:显示(默认值)

    False:不显示

     

     

     HelpContexID  设置一个对象或缺省帮助文件的上下文标识符   

     Icon  设置窗体左上角的小图标   

     KeyPreview  捕获键盘事件并响应  True或False

     Left  设置窗体内部最左端与空的容器最左边之间的距离   

     Top  设置窗体内部最上端与它的容器最上端之间的距离   

     Moveable  设置是否能移动一个窗体  True:可以移动

    False:不可以移动

     

     

     Picture  设置在窗体中显示的图片   

     StartupPosition  决定窗体首次出现时在屏幕上的位置  0-Manual:手动,窗体的初始位置由Left和Top决定

    1-CenterOwner:窗体出现在使用环境的中心位置

    2-CenterScree:窗体出现在屏幕的中心位置

    3-WindowsDeflt:窗体以默认位置出现在屏幕上,一般是左上角

     

     Visible  设置窗体是被显示还是被隐藏  True:窗体被显示(默认值)

    False:窗体被隐藏

     

     WindowState  设置一个窗体运行时的大小状态  0-Normal:此时的窗体大小由width、Height等属性决定(默认值)

    1-Minimized:使窗体最小化成图标

    2-Maximized:使窗体以全屏方式显示

       

     

     

     

    展开全文
  • Dim BF As BLENDFUNCTION, lBF As Long Const AC_SRC_OVER = &H0 Set Frm = Fm Set Panel = Fm.Controls.Add(“vb.PictureBox”, “Panel”) Panel.AutoRedraw = True Panel.AutoSize = True Panel.Picture = Pic ...

    在这里插入图片描述
    '将下面的代码放到标准模块中:
    Option Explicit
    Private Declare Function AlphaBlend Lib “msimg32.dll” (ByVal hdc As Long, ByVal lInt As Long, ByVal lInt As Long, ByVal lInt As Long, ByVal lInt As Long, ByVal hdc As Long, ByVal lInt As Long, ByVal lInt As Long, ByVal lInt As Long, ByVal lInt As Long, ByVal BLENDFUNCT As Long) As Long
    Private Declare Sub RtlMoveMemory Lib “kernel32.dll” (Destination As Any, Source As Any, ByVal Length As Long)
    Private Type BLENDFUNCTION
    BlendOp As Byte
    BlendFlags As Byte
    SourceConstantAlpha As Byte
    AlphaFormat As Byte
    End Type
    Public Pic As New StdPicture
    Dim Panel As PictureBox
    Dim Frm As Form

    Public Sub Image_Scaling(P As Object) ’ 图片缩放
    Di

    展开全文
  • 但是,PrintForm 不允许您控制大小或在打印输出的比例,或打印窗体在非工作区 (标题和边框)。下面的代码示例将使用 Windows API 函数来打印整个窗体,并提供了一种方法来控制输出的大小。 此方法还可用于打印仅...

    概要:

    Visual Basic 的 Windows PrintForm 方法提供了一种打印窗体的工作区的方法。但是,PrintForm 不允许您控制大小或在打印输出的比例,或打印窗体在非工作区 (标题和边框)。 

    下面的代码示例将使用 Windows API 函数来打印整个窗体,并提供了一种方法来控制输出的大小。 此方法还可用于打印仅客户端区域特定的大小,并控制允许文本或其他图形作为窗体的图像在同一页上打印在打印出的表单的位置。该方法也是适用于打印项目中的所有窗体。 

    注: 本示例将无法正常工作的 PostScript 打印机。 正常工作例如打印机必须使用标准的非 PostScript 激光打印机配置 (如 PCL/HP)。

    More:
    组合用 Windows API 函数 BitBlt、 StretchBlt、 CreateCompatibleDC、 DeleteDC、 SelectObject,和转义符允许更好地控制位置和打印窗体的大小比 PrintForm 方法。在两个部分组成的过程中的整个窗体图像捕获到一个不可见的图片使用 BitBlt 和变成永久位图使用 AutoRedraw 属性。然后使用该方法的打印图片控件 (通过以下单词 Microsoft 知识库中相应的查询来找到一个单独文章中做了概述) 打印图片: 

    CreateCompatibleDC


    在最大化窗体,以及任何较小的窗体时,此方法有效。 使用 GetSystemMetrics 允许以处理不同的窗口的边框样式传递给它的查询窗口以像素为单位) 的标准边框大小的视频驱动程序的通用过程。 

    下面的示例需要与不可见的图片控件在单个窗体。 

    示例

    1. 将下面的代码添加到新项目在窗体的一般声明级别: 

      注: 下面的所有声明语句都必须在同一行中。 

      DefInt A-Z
      Declare Function BitBlt Lib "gdi" (ByVal hDestDC, ByVal X, ByVal Y,
               ByVal nWidth, ByVal nHeight, ByVal hSrcDC, ByVal XSrc,
               ByVal YSrc, ByVal dwRop&)
      Declare Function CreateCompatibleDC Lib "GDI" (ByVal hDC)
      Declare Function SelectObject Lib "GDI" (ByVal hDC, ByVal hObject)
      Declare Function StretchBlt Lib "GDI" (ByVal hDC, ByVal X, ByVal Y,
               ByVal nWidth, ByVal nHeight, ByVal hSrcDC, ByVal XSrc,
               ByVal YSrc, ByVal nSrcWidth, ByVal nSrcHeight, ByVal dwRop&)
      Declare Function DeleteDC Lib "GDI" (ByVal hDC)
      Declare Function Escape Lib "GDI" (ByVal hDC, ByVal nEscape,
               ByVal nCount, lplnData As Any, lpOutData As Any)
      Declare Function GetSystemMetrics Lib "User" (ByVal nIndex)
      
      Const SM_CYCAPTION = 4
      Const SM_CXBORDER = 5
      Const SM_CYBORDER = 6
      Const SM_CXDLGFRAME = 7
      Const SM_CYDLGFRAME = 8
      Const SM_CXFRAME = 32
      Const SM_CYFRAME = 33
      
      Const TWIPS = 1
      Const PIXEL = 3
      Const NILL = 0&
      Const SRCCOPY = &HCC0020
      Const NEWFRAME = 1
      
      Dim ModeRatio, XOffset, YOffset As Integer
      

      2. 在设计时设置下列属性:

       Control         Property      Setting
         -------         --------      -------
         Form1           Name          Form1 (default)
         Form1.Picture1  Name          Picture1 (default)
         Form1.Picture2  Name          Picture2 (default)
         Form1.File1     Name          File1 (default)
        
         (In Visual Basic version 1.0 for Windows, set the CtlName/FormName
          Property for the above objects instead of the Name property.)
      

        您可以添加到该窗体,用于打印的任何其他控件。如果在运行时绘制图片控件,请务必设置 StretchBlt 通过其 AutoRedraw 属性为 True,以便将图形传输由 Windows API 调用 BitBlt 并最终打印。

      3.将下面的代码添加到 Form1 的 Form_Load 过程中:

      Sub Form_Load ()
      
      ' Size the form explicitly to match parameters of StretchBlt.
      ' Or use design time size to set coordinates.
              Form1.Move 1095, 1200, 8070, 5280
      
      ' Size two example controls.
              File1.Move 4080, 120, 2775, 2535
              Picture1.Move 240, 120, 2775, 2535
      
      ' Put up a caption to indicate how to print the form.
          Form1.Caption = "Double Click to Print Form And Text"
      
      ' The following *optional* code illustrates creating a persistent
      ' bitmap that will successfully StretchBlt to the printer.
          Picture1.AutoRedraw = -1  ' Create persistent bitmap of picture
                                    ' contents.
          Picture1.Line (0, 0)-(Picture1.ScaleWidth / 2,
          Picture1.ScaleHeight / 2), , BF
          Picture1.AutoRedraw = 0   ' Toggle off.
      
      ' Make sure the temporary workspace picture is invisible.
          Picture2.visible = 0
      End Sub
      

      4.将下面的代码添加到窗体的一般过程级别: 

      Sub FormPrint (localname As Form)
      
      ' Display cross.
          screen.MousePointer = 2
      ' Calculate ratio between ScaleMode twips and ScaleMode pixel.
          localname.ScaleMode = PIXEL
          ModeRatio = localname.height \ localname.ScaleHeight
          localname.ScaleMode = TWIPS
      
      XOffset = (localname.width - localname.ScaleWidth) \ ModeRatio
      YOffset = (localname.height - localname.ScaleHeight) \ ModeRatio
      CapSize% = GetSystemMetrics(SM_CYCAPTION) ' The height of the caption.
      
        ' The size of the fixed single border:
      FudgeFactor% = GetSystemMetrics(SM_CYBORDER)
      ' The fudgefactor is due to inevitable mapping errors when converting
      ' logical pixels to screen pixels. This example is coded for 640X480
      ' screen resolution. For 800X600, remove the fudgefactor.
      ' For other resolutions, tweak for perfection!
      
      Select Case localname.BorderStyle
      Case 0      ' None.
              XOffset = 0
              YOffset = 0
      
      Case 1      ' Fixed Single.
              XOffset = GetSystemMetrics(SM_CXBORDER)
              YOffset = GetSystemMetrics(SM_CYBORDER) + CapSize% - FudgeFactor%
      
      Case 2      ' Sizeable.
              XOffset = GetSystemMetrics(SM_CXFRAME)
              YOffset = GetSystemMetrics(SM_CYFRAME) + CapSize% - FudgeFactor%
      
      Case 3      ' Fixed Double.
              XOffset = GetSystemMetrics(SM_CXDLGFRAME) + FudgeFactor%
              YOffset = GetSystemMetrics(SM_CYDLGFRAME) + CapSize%
      
      End Select
      
      ' Size the picture to the size of the form's non-client (complete)
      ' area.
      
         Picture2.Move 0, 0, localname.Width, localname.Height
      
      ' NOTE: Bitblt requires coordinates in pixels.
         Picture2.ScaleMode = PIXEL
      ' Clear Picture property of any previous BitBlt image.
         Picture2.Picture = LoadPicture("")
      ' -1 equals true: Must Have This!!!
         Picture2.AutoRedraw = -1
      ' Assign information of the destination bitmap.
         hDestDC% = Picture2.hDC
              X% = 0: Y% = 0
              nWidth% = Picture2.ScaleWidth
              nHeight% = Picture2.ScaleHeight
      
      ' Assign information of the source bitmap.
      ' Source is entire client area of form (plus non-client area)
      ' XOffset and YOffset settings depend on the BorderStyle chosen for
      ' the form.
              hSrcDC% = localname.hDC
              XSrc% = -XOffset: YSrc% = -YOffset
      ' Show transition to BitBlt by changing MousePointer.
         Screen.MousePointer = 4
      ' Assign the SRCCOPY constant to the Raster operation.
         dwRop& = SRCCOPY
         ' The following statement must appear on one line.
         Suc% = BitBlt(hDestDC%, X%, Y%, nWidth%, nHeight%, hSrcDC%, XSrc%,
                      YSrc%, dwRop&)
      ' Start the StretchBlt process now.
      ' Assign persistent bitmap to Picture property:
         Picture2.Picture = Picture2.Image
      ' StretchBlt requires pixel coordinates.
             Picture2.ScaleMode = PIXEL
             Printer.ScaleMode = PIXEL
      ' * The following is an example of mixing text with StretchBlt.
             Printer.Print "This is a test of adding text and bitmaps "
             Printer.Print "This is a test of adding text and bitmaps "
             Printer.Print "This is a test of adding text and bitmaps "
      ' * If no text is printed in this procedure,
      ' * then you must add minimum: Printer.Print " "
      ' * to initialize Printer.hDC.
      
      ' Now display hour glass for the StretchBlt to printer.
         screen.MousePointer = 11
      
         hMemoryDC% = CreateCompatibleDC(Picture2.hDC)
         hOldBitMap% = SelectObject(hMemoryDC%, Picture2.Picture)
      
      ' You adjust the vertical stretch factor of the form in the
      ' argument "Printer.ScaleHeight - 1000":
         ApiError% = StretchBlt(Printer.hDC, 0, 192,
                     Printer.ScaleWidth - 300, Printer.ScaleHeight - 1000,
                     hMemoryDC%, 0, 0, Picture2.ScaleWidth,
                     Picture2.ScaleHeight, SRCCOPY)  ' concatenate above
      ' The second parameter above allows for text already printed: modify
      ' accordingly.
         hOldBitMap% = SelectObject(hMemoryDC%, hOldBitMap%)
         ApiError% = DeleteDC(hMemoryDC%)
      ' * The following is an example of mixing text with StretchBlt.
      ' Set the printer currentY to allow for the size of the StretchBlt
      ' image. (This is relative to size of form and stretch factors chosen)
             Printer.currentY = 2392 ' In Twips.
             Printer.Print "This is for text after the StretchBlt"
             Printer.Print "This is for text after the StretchBlt"
             Printer.Print "This is for text after the StretchBlt"
         Printer.EndDoc
         ApiError% = Escape(Printer.hDC, NEWFRAME, 0, NILL, NILL)
      
      ' Reset MousePointer to default.
         Screen.MousePointer = 1
      
      End Sub
      

      5..将下面的代码添加到 Double_Click 事件: 

      Sub Form_DblClick ()
         FormPrint Form1
      End Sub
      		
      

      6.后保存该项目运行该示例。 

      双击该窗体以调用 FormPrint 过程。将打印作为参数传递给 FormPrint 任何窗体。BitBlt 将转移到图片控件的图像,然后 StretchBlt 将其传送到打印机 DC,将打印已传输的 BitBlt 的图像。 

      (可选),您可以打印与 StretchBlt 前放置图片 (Form1.Picture2) 中的文本或图形或直接打印到使用 Printer.Print 或 Printer.Line 页。如果调整 StretchBlt 的第二个和第三个参数选择后, 一种方法可以使已打印的内容能跟在同一页上的窗体的图像。\

      参考:http://support.microsoft.com/kb/84066

     

    转载于:https://www.cnblogs.com/laojiefang/archive/2011/12/20/2294846.html

    展开全文
  • width、height表示窗体的实际大小,什么是实际大小,比如现实中一块木板,是多长多宽就是多长多宽,这两个属性就是表示窗体的实际长宽。 scalewidth、scaleheith表示的是你认为的大小,什么是你认为的大小,比如一块...
  • 窗口边体属性(FormBorderStyle)设定为: Fixed3D '模式 FixedDialog '模式 FixedSingle '模式 FixedToolWindow中的任意一个, 都可以使窗体不可调整大小
  • vb6.0自适应窗体大小示例源代码(工程文件),附带文档介绍原理,针对少数、多数控件、含不希望调节尺寸的隐藏控件的处理方法。
  • vb.net控件随窗口大小调整

    千次阅读 2016-07-03 21:34:35
    ' === 窗体控件自适应大小 2016-7-3 ===  Private yuanH, yuanW  Private yHW As Single(,)  Private Sub FormTest_Load(sender As Object, e As EventArgs) Handles Me.Load  yuanH = Me.Height  
  • 正在做贪吃蛇游戏,发现窗口大小一变化,按键位置就很诡异,故找了一下禁止改变窗体的设置。 Form.FormBorderStyle = Windows.Forms.FormBorderStyle.FixedSingle‘这个可以防止鼠标更改窗体大小 Form.MaximizeBox =...
  • 展开全部1、首先我们打开vb6.0软件进入到标准”工程1“界面,这些32313133353236313431303231363533e78988e69d8331333433626538比较简单,就不一一上图了,在”form1“窗口上加载一个文本框”text1”如图。...
  • ActiveControl活动控件ActiveForm活动窗体Alignment文本对齐类型Align指定图形在图片框中的位置Archive文本列表框是否含有文档属性AutoRedraw控制对象自动重画AutoSize控制对象自动调整大小BBackColor背景颜色...
  • 有了这个控件就方便多了,Resize事件中一行代码不用写,只需将这个控件拖动到窗体上,然后设置被调整控件的Tag属性,在运行时刻就可以进行调整了.VB6ResizerLib 2.0 版本新增分隔条控件,运行时可动态调整.同时修改了1.x...
  • VB form 控制窗口BorderStyle 属性

    千次阅读 2013-05-15 10:17:39
    BorderStyle 属性 vbBSNone 0 无(没有边框或与边框相关的元素)。  vbFixedSingle 1 固定单边框。可以包含控制菜单框,标题栏,“最大化”按钮,和“最小化”按钮。只有使用最大化和最小化按钮才能改变...
  • 先将窗体的BorderStyle属性值设为0,代码如下: Option Explicit Private Declare Function GetWindowLong Lib “user32” Alias “GetWindowLongA” (ByVal hWnd As Long, ByVal nIndex As Long) As Long Private ...
  • vb.net 禁止调整窗口大小(亲自实践)

    千次阅读 2012-07-03 11:19:05
    窗口边体属性(FormBorderStyle)设定为: Fixed3D,FixedDialog,FixedSingle,FixedToolWindow中的任意一个, 都可以使窗体不可调整大小.
  • VB.NET窗体的Localizable属性

    千次阅读 2013-09-29 15:43:49
    这个属性,可以让窗口支持多种语言 一:窗体的本地化 对于windows窗体,你需要做的第一步是确定你的默认界面语言,默认语言是指当执行程序无法找到已定义的本地化资源时,默认使用的语言,由于.net使用utf-8...
  • vb6.0 控件适应窗口大小

    千次阅读 2011-10-18 21:14:04
    我们在编写vb6.0控件适应窗口大小时,往往使用以下方法:(按照窗体尺寸缩放比例自动调整控件的大小)  窗体和控件的大小由窗体和控件的Width属性和Height属性确定。所以当用户界面设计完成之后,窗体及其内部的各...
  • 目的:不能更改窗体大小又能最小化 解决方案: 1、把Form窗体属性borderstyle设为1    '固定窗体; 2、把Form窗体属性minbutton设为true    '最小化可用。 备注:如果需要最大化可用,就把Form窗体属性...
  • 先将窗体的BorderStyle属性值设为0,然后添加一个标准模块,模块代码如下: Option Explicit '将鼠标捕获设置到指定的窗口。在鼠标按钮按下的时候,这个窗口会为当前应用程序或整个系统接收所有鼠标输入. Private ...
  • VB 动态改变图像框Image的Stretch属性,用户通过自定义的两款代码,可随意改变image的长度和宽度大小,不过本源码将此两种操作封装在按钮事件中,用户只需单击按钮,即可放大或缩小image框,动态改变了Image的...
  • VB6 给窗体添加滚动条,调整水平滚动条的一些属性。当窗体大小发生变化时发生,垂直滚动条与窗体相对位置不变,滚动条的大小随着窗体大小的改变而改变,命令按钮作水平滚动条与垂直滚动条交接处的填充。  因代码...
  • VB控件属性大全

    万次阅读 多人点赞 2018-06-14 08:54:57
    1.01、窗体(FORM)的常用属性... 21.02、标签控件(Lable)的常用属性... 71.03、文本框控件(TextBox)的常用属性... 91.04、框架控件(Frame)的常用属性... 131.05、命令按钮控件(CommandButton)的常用属性... 151.06、...
  • VB2012窗体大小设定

    千次阅读 2014-02-24 18:18:13
    最近刚学VB.NET以前会一点...现在问题来了,以前在VB6.0中只要把窗体设定为无边框样式就能够任意改变窗体大小,现在到了2012版本貌似窗体的最大尺寸限制在当前使用电脑分辨率+12.所以无法设计所有元素,希望各位高手赐教!
  • 属性说明Name复选框控件的名称Alignment设置标题文本的对齐方式, 取值为: 0 左对齐 1 右对齐Appearance是否用立体效果绘制,取值为: 0 平面 1 3D(立体)BackColor设置背景颜色,可从弹出的调色板选择。Caption复选框...
  • Bold is "read-only" in VB.NET. This article tells you how to change that. 在VB.NET中,粗体为“只读”。 本文告诉您如何更改它。 In VB6, it was dead easy to change a font to bold. You simply coded ...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 12,966
精华内容 5,186
关键字:

vb控制窗体大小的属性