精华内容
下载资源
问答
  • 原因很简单:当窗体的尺寸缩放(如最大化),窗体内的控件的尺寸以及在窗体内的相对位置没有得到相应的调整。事实上,窗体和控件的大小分别是由窗体和控件的Width属性和Height属性确定的。所以,当程序界面设计完成...

    VB实现控件与窗体不能同步缩放呢?

    为什么会出现这种情况呢?原因很简单:当窗体的尺寸缩放(如最大化)时,窗体内的控件的尺寸以及在窗体内的相对位置没有得到相应的调整。事实上,窗体和控件的大小分别是由窗体和控件的Width属性和Height属性确定的。所以,当程序界面设计完成之后,窗体及其内部各控件的Width、Height属性便随之确定下来;从而窗体相对于每一个控件,它们的宽度之比、高度之比也被确定下来。

    例如:如果窗体Form1内的一个文本框控件Text1的宽度(Width)为3600,高度(Height)为1900,;而窗体Form1的这两个值分别为4900和3700,则它们的宽度之比和高度之比分别为:3600/4900、1900/3700。而当用户在程序启动后调整了窗体的尺寸,则窗体的宽度和高度分别为Form1.ScaleWidth和Form1.ScaleHeight。由此可以看出,要保证控件与窗体之间的原有比例,只要按比例来调整文本框控件Text1的高度和宽度值即可。即:

    调整后的Text1的Width值Κ(3600/4900)×Form1.ScaleWidth

    调整后的Text1的Height值Κ(1900/3700)×Form1.ScaleHeight

    将上面的例子中得出的结论推而广之:一般而言,当窗体尺寸调整后,窗体内控件的尺寸应按以下公式同步进行调整:调整后的控件的Width值Κ(控件原Width值/窗体原Width值)×窗体.ScaleWidth;调整后的控件的Height属性值Κ(控件原Height值/窗体原Height值)×窗体.ScaleHeight。

    窗体尺寸缩放的同时,窗体内的控件在窗体中的相对位置应如何同步调整呢?控件在窗体中的位置由该控件的Left和Top属性确定。程序启动后如果窗体被缩放,只要按照缩放的比例来重新调整窗体内各控件的Left和Top属性值即可。因此,根据上面介绍的同步调整控件尺寸的原理,在窗体被缩放的同时,只要按照下面的关系来设置控件的Left和Top值即可;调整后控件的Left值Κ(控件原Left值/窗体原Left值)×窗体.ScaleWidth;调整后控件的Top值Κ(控件原Top值/窗体原Top值)×窗体.ScaleHeight。

    上面谈了控件与窗体同步缩放及保持相对位置的原理,下面看看在VB程序中实现的具体方法。我们知道,Resize事件是窗体响应的一个事件;当窗体第一次显示或当窗体的状态被改变时(如窗体被最大化、最小化或被还原时)该事件发生。所以,只要将对控件大小和位置的调整代码写入窗体的Resize事件中便可达到目的。具体可在窗体的Re size事件过程中使用对象的Move方法:

    PrivateSubForm-Resize()

    Object.moveNewleft,Newtop,NewWidth,NewHeight

    EndSub

    其中:Object是需要调整大小和位置的任意一个控件的名称;NewLeft、NewTop、NewWidth与NewHeight分别是窗体缩放后控件应有的新的Left、Top、Width与Height的属性值,它们确定了当窗体被缩放后控件的大小和位置。NewWidth、NewHeight、NewLeft和NewTop可直接使用文中给出的相应公式的表达式。

    最后要注意的是,不要对窗体内的不可见控件(如果有的话)进行类似的处理,否则会出错。

    下面的代码可以实现,vb窗口最大化的时候,里面的控件一起变化

    Option Explicit

    Private InitWidth As Long       ' Form的原始大小Private InitHeight As Long

    Private Sub Form_Load()

    InitWidth = ScaleWidth

    InitHeight = ScaleHeight

    Dim Ctl As Control

    '记录每个Control的原始位置、大小、字型大小,放在Tag属性中On Error Resume Next '确保left, top, width, height, Tag属性没有全有的Control

    For Each Ctl In Me   '也能正常执行Ctl.Tag = Ctl.Left & " " & Ctl.Top & " " & Ctl.Width & " " & Ctl.Height & " "

    Ctl.Tag = Ctl.Tag & Ctl.FontSize & " "

    Next Ctl

    On Error GoTo 0

    End Sub

    Private Sub Form_Resize()

    Dim D(4) As Double

    Dim I As Long

    Dim TempPos As Long

    Dim StartPos As Long

    Dim Ctl As Control

    Dim TempVisible As Boolean

    Dim ScaleX As Double

    Dim ScaleY As Double

    ScaleX = ScaleWidth / InitWidth

    ScaleY = ScaleHeight / InitHeight

    On Error Resume Next

    For Each Ctl In Me

    TempVisible = Ctl.Visible

    Ctl.Visible = False

    StartPos = 1

    '读取Control的原始位置、大小、字型大小For I = 0 To 4

    TempPos = InStr(StartPos, Ctl.Tag, " ", vbTextCompare)

    If TempPos > 0 Then

    D(I) = Mid(Ctl.Tag, StartPos, TempPos - StartPos)

    StartPos = TempPos + 1

    Else

    D(I) = 0

    End If

    '根据比例设定Control的位置、大小、字型大小Ctl.Move D(0) * ScaleX, D(1) * ScaleY, D(2) * ScaleX, D(3) * ScaleY

    'Ctl.Width = D(2) * ScaleX

    'Ctl.Height = D(3) * ScaleY

    If ScaleX < ScaleY Then

    Ctl.FontSize = D(4) * ScaleX

    Else

    Ctl.FontSize = D(4) * ScaleY

    End If

    Next I

    Ctl.Visible = TempVisible

    Next Ctl

    On Error GoTo 0

    End Sub

    展开全文
  • VB做的网站浏览器,启动时最大化,适合做自己网站的快捷启动桌面程序
  • 1 //API Constant 2 private const int SW_MAXIMIZE = 3; 3 4 [DllImport("user32.dll")] 5 public static extern int ShowWindow(int hwnd, int nCmdShow); 6 7 private void button1_Click(object...

    1 // API Constant
    2 private const int SW_MAXIMIZE = 3 ;
    3
    4 [DllImport( " user32.dll " )]
    5 public static extern int ShowWindow( int hwnd, int nCmdShow);
    6
    7 private void button1_Click( object sender, RoutedEventArgs e)
    8 {
    9 SHDocVw.InternetExplorer ie = new SHDocVw.InternetExplorer();
    10
    11 ie.Visible = true ;
    12
    13 object objFlags = 0 ;
    14 object objTargetFrameName = string .Empty;
    15 object objPostData = string .Empty;
    16 object objHeaders = string .Empty;
    17
    18 ie.Navigate( " http://www.baidu.com " , ref objFlags, ref objTargetFrameName, ref objPostData, ref objHeaders);
    19
    20 ShowWindow(ie.HWND, SW_MAXIMIZE);
    21 }

    转载于:https://www.cnblogs.com/hongyu/archive/2011/07/12/2104397.html

    展开全文
  • ' V1.5 增加了窗口最大最小,隐藏显示正常的几个函数 2013/06/06 ' 增加了获取控件相关函数是否使用正则的参数UseRegExp默认F ' V1.6 将Left,Top函数改为属性,可获得可设置 2013/06/10 ' V1.7 增加函数:...
  • 窗体最大化但是并不真正最大化,这种效果怎么实现?比如命令提示符窗口,它的最大化点了以后并不最大化的。
  • ' V1.5 增加了窗口最大最小,隐藏显示正常的几个函数 2013/06/06 ' 增加了获取控件相关函数是否使用正则的参数UseRegExp默认F ' V1.6 将Left,Top函数改为属性,可获得可设置 2013/06/10 '====================...
  • 代码: Public Const WM_NULL = &amp;H0 '空消息Public Const WM_NCCREATE = &amp;H81 '当窗口第一次被创建,此...H1 '窗口被创建发送到它的窗口过程的消息Public Const WM_NCDESTROY = &amp;H82 ...

    代码:

    Public Const WM_NULL = &H0 '空消息
    Public Const WM_NCCREATE = &H81 '当窗口第一次被创建时,此消息在WM_CREATE消息发送前发送
    Public Const WM_CREATE = &H1 '窗口被创建时发送到它的窗口过程的消息
    Public Const WM_NCDESTROY = &H82 '当窗口的非客户区正在销毁时
    Public Const WM_DESTROY = &H2 '当窗口正在销毁时
    Public Const WM_ACTIVATEAPP = &H1C '窗口准备被激活前或准备失去激活状态后的消息
    Public Const WM_NCACTIVATE = &H86 '窗口非客户区准备被激活时或准备失去激活状态时的消息
    Public Const WM_ACTIVATE = &H6 '窗口准备被激活时或准备失去激活状态时的消息
    Public Const WM_SETFOCUS = &H7 '窗口得到焦点时(比如窗口由最小化还原时)的消息
    Public Const WM_KILLFOCUS = &H8 '窗口失去焦点时的消息

    Public Const WM_MOVE = &H3 '窗口移动后或最大,最小化,恢复,还原后发送到它的窗口过程的消息

    Public Const WM_SIZE = &H5 '窗口的大小改变后或最大,最小化后发送到它的窗口过程的消息(可用wParam判断最大还是最小化)
    'Size消息的附加信息(wParam)
    Const SIZE_RESTORED = 0
    Const SIZE_MINIMIZED = 1
    Const SIZE_MAXIMIZED = 2
    Const SIZE_MAXSHOW = 3
    Const SIZE_MAXHIDE = 4


    Public Const WM_ENABLE = &HA '当调用EnableWindow API函数使窗口或控件的Enable状态发生改变时窗口接收到的消息
    Public Const WM_SETREDRAW = &HB '设置窗口或控件是否能重画(附加消息wParam为0时不能重画,为1时可以重画)
    Public Const WM_SETTEXT = &HC '设置窗口标题或控件的内容。也可以用来向另一个应用程序发送数据的消息。效果:跟 相同 SetWindowText API函数
    Public Const WM_GETTEXT = &HD '获取窗口标题或控件的内容。效果:跟 GetWindowText API函数相同
    Public Const WM_GETTEXTLENGTH = &HE '获取窗口标题或控件的内容的长度。效果:跟 GetWindowTextLength API函数相同
    Public Const WM_PAINT = &HF '当窗口有无效区域时,系统要求窗口重画无效区域的消息。可以调用 InvalidateRect API函数使窗口有无效区域
    Public Const WM_CLOSE = &H10 '当窗口或应用程序要关闭时,或用来关闭另一个窗口或应用程序的消息
    Public Const WM_QUERYENDSESSION = &H11 '关机,注销,重新启动时或其他程序调用了ExitWindows API函数,系统依次发送给所有程序的消息
    Public Const WM_QUIT = &H12 '用来结束程序运行或当程序调用PostQuitMessage函数的消息
    Public Const WM_QUERYOPEN = &H13 '当窗口恢复以前的大小位置时,把此消息发送给某个图标
    Public Const WM_ERASEBKGND = &H14 '当窗口背景被擦除时。效果:跟 VB的Form_Paint过程相同(当AutoRedraw属性设置为True时)
    Public Const WM_SYSCOLORCHANGE = &H15 '当系统颜色改变时,发送此消息给所有顶层窗口
    Public Const WM_ENDSESSION = &H16 '当系统发出WM_QUERYENDSESSION消息后,等待检查WM_QUERYENDSESSION消息的返回值, 再接着发送此消息给应用程序,系统并根据返回值决定是否关机,注销或重启
    Public Const WM_SHOWWINDOW = &H18 '当调用ShowWindow API函数使窗口显示的状态改变或窗口显示的状态发生改变时
    Public Const WM_WININICHANGE = &H1A '当系统的Win.ini文件内容改变后,发送此消息给所有顶层窗口
    Public Const WM_DEVMODECHANGE = &H1B '当系统的设备模式改变后,发送此消息给所有顶层窗口
    Public Const WM_FONTCHANGE = &H1D '当系统的字体资源库改变后,发送此消息给所有顶层窗口
    Public Const WM_TIMECHANGE = &H1E '当调用API改变或重新设置系统的时间后,系统发送此消息给所有顶层窗口
    Public Const WM_CANCELMODE = &H1F '发送此消息来取消某种正在进行的模式(操作)
    Public Const WM_SETCURSOR = &H20 '当鼠标进入窗口时和在窗口上移动时
    Public Const WM_MOUSEACTIVATE = &H21 '当用鼠标激活窗口时
    Public Const WM_CHILDACTIVATE = &H22 '当MDI子窗口被激活,移动,改变大小
    Public Const WM_QUEUESYNC = &H23 '此消息由基于计算机的训练程序发送,通过WH_JOURNALPALYBACK的hook程序分离出用户输入消息???

    Public Const WM_GETMINMAXINFO = &H24 '当窗口将要改变大小或位置前
    Public Type MINMAXINFO
    ptReserved As POINTAPI
    ptMaxSize As POINTAPI
    ptMaxPosition As POINTAPI
    ptMinTrackSize As POINTAPI '可以用来限制窗口最小的大小
    ptMaxTrackSize As POINTAPI '可以用来限制窗口最大的大小
    End Type


    Public Const WM_DRAWITEM = &H2B '当button,combobox,listbox,menu的可视外观改变时,发送此消息给这些控件的父窗口
    Public Const WM_MEASUREITEM = &H2C '当list box 或 combo box被销毁 或 当某些项被删除通过LB_DELETESTRING, LB_RESETCONTENT, CB_DELETESTRING, 或 CB_RESETCONTENT 消息

    Public Const WM_SETFONT = &H30 '设置窗口或控件所使用的字体
    Public Const WM_GETFONT = &H31 '得到窗口或控件所使用的字体
    Public Const WM_SETHOTKEY = &H32 '设置一个跟窗口关联的热键
    Public Const WM_GETHOTKEY = &H33 '得到一个跟窗口关联的热键

    Public Const WM_COMPAREITEM = &H39 '发送此消息来判定combobox或listbox新增加的项的相对位置
    Public Const WM_GETOBJECT = &H3D '得到对象的信息
    Public Const WM_COMPACTING = &H41 '显示内存已经很少了

    Public Const WM_POWER = &H48 '当系统将要进入休眠状态时发送此消息
    Public Const WM_COPYDATA = &H4A '可以向另一个应用程序发送数据的消息
    Public Type COPYDATASTRUCT
    dwData As Long '附加数据
    cbData As Long '要发送的数据的大小
    lpData As Long '要发送的数据的地址
    End Type

    Public Const WM_CANCELJOURNAL = &H4B '取消日志HOOK
    Public Const WM_NOTIFY = &H4E 'ListView,TreeView等通用控件跟它们的父窗口通讯的消息
    Public Const WM_INPUTLANGCHANGEREQUEST = &H50 '当选择某种输入语言,或输入语言的热键改变时

    Public Const WM_TCARD = &H52 '当程序已经初始化Windows帮助例程时,发送此消息给应用程序
    Public Const WM_HELP = &H53 '在当前窗口活动时,按下F1键时收到的消息
    Public Const WM_USERCHANGED = &H54 '当用户已经登入或退出后发送此消息给所有的窗口,当用户登入或退出时系统更新用户的具体设置信息,在用户更新设置时系统马上发送此消息
    Public Const WM_NOTIFYFORMAT = &H55 '公用控件,自定义控件和他们的父窗口通过此消息来判断控件是使用ANSI还是UNICODE结构在WM_NOTIFY消息,使用此控件能使某个控件与它的父控件之间进行相互通信
    Public Const WM_CONTEXTMENU = &H7B '当在某个窗口中点击了一下右键就发送此消息给这个窗口
    Public Const WM_STYLECHANGING = &H7C '当调用SetWindowLong API函数改变一个或多个窗口的风格时
    Public Const WM_STYLECHANGED = &H7D '当调用SetWindowLong API函数改变一个或多个窗口的风格后
    Public Const WM_DISPLAYCHANGE = &H7E '当显示器的分辨率发生改变后,系统发送此消息给所有的窗口

    Public Const WM_GETICON = &H7F '获取窗口的图标句柄
    Public Const WM_SETICON = &H80 '改变窗口的图标
    '附加参数(wparam)的值
    Public Const ICON_SMALL = 0 '小图标
    Public Const ICON_BIG = 1 '窗口左上角那个大图标

    Public Const WM_NCCALCSIZE = &H83 '当需要计算窗口的非客户区大小时(例如:窗口大小改变了)。非客户区指的是窗口标题栏和窗口边框
    Public Const WM_NCHITTEST = &H84 '当鼠标进入窗口(包含非客户区)时和在窗口上(包含非客户区)移动时

    Public Const WM_NCMOUSEMOVE = &HA0 '当鼠标在窗口非客户区移动时
    Public Const WM_NCLBUTTONDOWN = &HA1 '当鼠标左键在窗口非客户区按下
    Public Const WM_NCLBUTTONUP = &HA2 '当鼠标左键在窗口非客户区放开
    Public Const WM_NCLBUTTONDBLCLK = &HA3 '当鼠标左键在窗口非客户区双击
    Public Const WM_NCRBUTTONDOWN = &HA4 '当鼠标右键在窗口非客户区按下
    Public Const WM_NCRBUTTONUP = &HA5 '当鼠标右键在窗口非客户区放开
    Public Const WM_NCRBUTTONDBLCLK = &HA6 '当鼠标右键在窗口非客户区双击
    Public Const WM_NCMBUTTONDOWN = &HA7 '当鼠标中键在窗口非客户区按下
    Public Const WM_NCMBUTTONUP = &HA8 '当鼠标中键在窗口非客户区放开
    Public Const WM_NCMBUTTONDBLCLK = &HA9 '当鼠标中键在窗口非客户区双击

    Public Const WM_KEYDOWN = &H100 '在键盘按下了某个键(Print Screen键,Alt键,Alt组合键和Win组合键除外),也可以用来模拟按键
    Public Const WM_KEYUP = &H101 '在键盘放开了某个键,也可以用来模拟按键
    Public Const WM_CHAR = &H102 '接收字符的消息,也可以用来向窗口发送字符
    Public Const WM_DEADCHAR = &H103 '死字符消息
    Public Const WM_SYSKEYDOWN = &H104 '在键盘按下了 Alt键 或 Alt组合键 的消息
    Public Const WM_SYSKEYUP = &H105 '在键盘放开了 Alt组合键
    Public Const WM_SYSCHAR = &H106 '系统字符消息
    Public Const WM_SYSDEADCHAR = &H107 '系统死字符消息

    Public Const WM_INITDIALOG = &H110 '系统标准对话框初始化时的消息,对话框使用此消息代替了WM_CREATE消息
    Public Const WM_COMMAND = &H111 '鼠标点击窗口菜单项后或窗口中的非图形控件(如Button)后发送的消息(其中hwnd为窗口句柄,wParam为控件ID,lParam为菜单或控件句柄)
    Public Const WM_SYSCOMMAND = &H112 '鼠标点击窗口的非客户区后发送的消息(可用wParam判断点击了非客户区的哪个地方)
    'SYSCOMMAND消息的附加信息(wParam)
    Const SC_SIZE = 61440 '系统菜单项上的大小
    Const SC_MOVE = 61456 '系统菜单项上的移动
    Const SC_MINIMIZE = 61472 '系统菜单项上的最小化
    Const SC_MAXIMIZE = 61488 '系统菜单项上的最大化
    Const SC_NEXTWINDOW = &HF040& '显示在下次后面的再打开窗口
    Const SC_PREVWINDOW = &HF050& '显示上次前面打开的窗口
    Const SC_CLOSE = 61536 '系统菜单项上的关闭
    Const SC_RESTORE = 61728 '系统菜单项上还原
    Const SC_SCREENSAVE = &HF140& '调用屏幕保护程序(如果设置有的话)
    Const SC_ICON = 61587 '点击了窗口左上角的图标
    Const SC_ZOOM = SC_MAXIMIZE '最大化
    Const SC_MONITORPOWER = &HF170& '关闭显示器(附加参数lParam的值为1或2)


    Public Const WM_TIMER = &H113 '定时器专用消息,可用SetTimer或KillTimer API函数安装或卸载一个定时器
    Public Const WM_HSCROLL = &H114 '水平滚动条滚动时
    Public Const WM_VSCROLL = &H115 '垂直滚动条滚动时
    Public Const WM_INITMENU = &H116 '当鼠标左键点击窗口菜单栏前
    Public Const WM_INITMENUPOPUP = &H117 '当鼠标左键点击窗口菜单栏后,菜单弹出前
    Public Const WM_MENUSELECT = &H11F '当菜单项被选中时
    Public Const WM_MENUCHAR = &H120 '当菜单已被激活且用户按下了某个键(不同于加速键),发送此消息给菜单的父窗口
    Public Const WM_ENTERIDLE = &H121 '当一个模态对话框或菜单进入空闲状态时,发送此消息给它的父窗口

    Public Const WM_MOUSEMOVE = &H200 '当鼠标在窗口客户区移动时
    Public Const WM_LBUTTONDOWN = &H201 '当鼠标左键在窗口客户区按下
    Public Const WM_LBUTTONUP = &H202 '当鼠标左键在窗口客户区放开
    Public Const WM_LBUTTONDBLCLK = &H203 '当鼠标左键在窗口客户区双击
    Public Const WM_RBUTTONDOWN = &H204 '当鼠标右键在窗口客户区按下
    Public Const WM_RBUTTONUP = &H205 '当鼠标右键在窗口客户区放开
    Public Const WM_RBUTTONDBLCLK = &H206 '当鼠标右键在窗口客户区双击
    Public Const WM_MBUTTONDOWN = &H207 '当鼠标中键在窗口客户区按下
    Public Const WM_MBUTTONUP = &H208 '当鼠标中键在窗口客户区放开
    Public Const WM_MBUTTONDBLCLK = &H209 '当鼠标中键在窗口客户区双击
    Public Const WM_MOUSEWHEEL = &H20A '当滚动鼠标滚轮时
    Public Const WM_PARENTNOTIFY = &H210 '当MDI子窗口被创建或被销毁,或按了一下鼠标键而光标在子窗口上时发送此消息给它的父窗口

    Public Const WM_SIZING = &H214 '当用户正在调整窗口大小时的消息,通过此消息应用程序可以监视窗口大小和位置也可以修改它们
    Public Const WM_CAPTURECHANGED = &H215 '鼠标捕获消息或调用SetCapture API后发送到窗口的消息
    Public Const WM_MOVING = &H216 '当窗口正在移动中
    Public Const WM_POWERBROADCAST = &H218 '系统广播消息给应用程序来通知它有关的电源管理事件
    Public Const WM_DEVICECHANGE = &H219 '当设备的硬件配置改变时,发送此消息给应用程序或设备驱动程序(比如:插入了可移动磁盘),可以调用RegisterDeviceNotification 和UnregisterDeviceNotification API函数 注册和销毁设备的硬件配置改变通知消息


    Public Const WM_DROPFILES = &H233 '文件拖动入窗口并放开的消息(窗口需要拥有WS_EX_ACCEPTFILES扩展风格,或调用DragAcceptFiles API函数。用DragQueryFile API函数可得到拖动文件名)

    Public Const WM_MOUSEHOVER = &H2A1 '在上次调用TrackMouseEvent API函数的指定时间里,鼠标盘旋在窗口的客户区时的消息
    Public Const WM_MOUSELEAVE = &H2A3 '鼠标离开上次调用TrackMouseEvent API函数时指定的窗口客户区时的消息。
    Public Const WM_CUT = &H300 '剪切剪贴板的内容
    Public Const WM_COPY = &H301 '复制剪贴板的内容
    Public Const WM_PASTE = &H302 '粘贴剪贴板的内容
    Public Const WM_CLEAR = &H303 '清除剪贴板的内容
    Public Const WM_UNDO = &H304 '撤消上一次的操作

    Public Const WM_DRAWCLIPBOARD = &H308 '当剪贴板的内容改变时发送此消息给剪贴板观察链的第一个窗口。可调用SetClipboardViewer API函数安装到剪贴板观察链上

    Public Const WM_HOTKEY = &H312 '当按下由RegisterHotKey API函数注册的热键时收到的消息,也可以用此消息模拟系统热键(比如模拟Win+D键:Call PostMessage(HWND_BROADCAST, WM_HOTKEY, 1, 0))

    Public Const WM_USER = &H400 '窗口自定义的消息

    摘自:网络整理


    VB相关


    VB 读写TXT文本文件函数

    VB 提取TextBox 文本框中指定一行字符串

    VB 获取汉字拼音的首字母

    VB 汉字字符串转换成拼音

    VB判断指定名字的进程是否存在函数

    VB 两种方法实现热键

    VB 使用SendMessage枚举文件与目录

    VB 二进制数组与十六进制字符串相互转换

    VB 二进制数据读写实例

    VB 进制转换大全(十进制、十六进制、八进制、二进制、二进制流)互转

    VB 判断是否文本文件

    VB 读取UTF-8编码文件函数

    VB 按指定编码格式写入文本文件

    VB UTF-8 URL编码函数

    VB 实现UTF-8 GB2312互转

    VB 设置ListView中指定一行的背景颜色

    VB SendMessage向其他程序窗口发送字符串消息实例

    VB Listview导出到CSV文件函数

    vb卸载所有窗体

    VBNull, Empty, Nothing, and vbNullString的区别

    利用API函数计算程序运行时间VB

    获取快捷方式原文件路径vb路径

    利用VB函数Dir()实现递归搜索目录

    VB数组的清除和重新定义

    RtlAdjustPrivilege来调整进程权限(VB6.0代码)

    获取对象的接口信息(方法/属性/事件)(VB6代码)

    VB6中给数组赋值的限制

    [vb]一些窗口消息的详解

    VB直接播放EXE文件中的声音文件

    VB中利用CopyMemory使用指针

    VB读写注册表的三种方法

    [VB]SaveSetting 语句 和 DeleteSetting 语句

    VB APP对象属性一览表 + 灵活使用VBAPP对象

    [vb]SendMessageA函数

    使用VB绘制抛物线动画曲线

    关于vb中的容器

    [vb]利用WScript.Shell对象隐藏cmd命令行运行

    浅析VB For Each.Next语句

    VB中窗体模块、标准模块、类模块的区别

    引用 VB类模块

    VB中什么是类,类模块有什么作用

    VB SendKeys 语句

    VB 全局热键

    VB轻松调用其他程序

    vb读取txt文件到textbox

    如何去优化你的VB程序3

    如何去优化你的VB程序2

    如何去优化你的VB程序1

    [VB]在状态栏中显示帮助信息

    [VB]把屏幕保存为图像

    Mp3Play.ocx控件让音乐之声响起来


    更多精彩>>>
    展开全文
  • ' V1.5 增加了窗口最大最小,隐藏显示正常的几个函数 2013/06/06 ' 增加了获取控件相关函数是否使用正则的参数UseRegExp默认F ' V1.6 将Left,Top函数改为属性,可获得可设置 2013/06/10 ' V1.7 增加了CloseApp...
  • VB窗体启动、关闭涉及的主要事件

    千次阅读 热门讨论 2013-10-27 15:23:50
    一、启动窗体,事件顺序是: 1 Form_Initialize  Initialize 事件即初始事件,任何窗体生命周期的第一个事件都是Initialize。只要在项目中使用了窗体的名称,或在Visual Basic 6.0创建实际窗口及其控件之前,...

    一、启动窗体时,事件顺序:

    1 Form_Initialize 

    	Initialize 事件即初始化事件,任何窗体生命周期的第一个事件都是Initialize。只要在项目中使用了窗体的名称,或在Visual Basic 6.0创建实际窗口及其控件之前,都会发生initialize事件。可以在initialize事件处理过程中正确地初始化窗体变量,它在Load事件之前发生。此事件一般用在类、模块、用户控件及用户文档等对象中,在窗体对象中使用load。

    2 Form_Load 

    	一个窗体加载到内存的时候触发。在load事件中,对变量进行初始化,设置控件的初始属性。当使用 Show 方法或将窗体的 Visible 属性设置为 True时窗体才会显示,否则,一个用 Load 语句加载的窗体是不可见的。

    3 Form_Resize 

    	在窗体大小发生变化时或最小化、最大化时激发。

    4 Form_Activate 

    	当窗体变成活动窗体时(得到焦点)发生。正常情况下一个form,在其生存期内,form_load只会发生一次,而form_activate可能会发生无数次。

    5 Form_Paint 

    	当窗体重新绘制图形时触发,如:窗体初始化、窗体改变大小、窗体移动,都会触发该事件。

    二、退出窗体时,事件顺序:

    1 Form_QueryUnload

    	事件在一个窗体或应用程序关闭之前发生。此事件的典型用法是在关闭一个应用程序之前用来确保包含在该应用程序中的窗体中没有未完成的任务。例如,如果还未保存某一窗体中的新数据,则应用程序会提示保存该数据。 

    2 Form_Unload 

    	在退出窗体时发生。

    3 Form_Terminate

    	在窗体对象被销毁时发生。(注意,这个事件一般不会立即发生,只有在程序退出时才会发生)

    三、form.show / hide

    	show和hide是窗体的方法,用于显示和隐藏窗体。Visible 是属性,当visible=ture时窗体可见,visible=false时窗体加载后也看不到。
    展开全文
  • ' V1.5 增加了窗口最大最小,隐藏显示正常的几个函数 2013/06/06 ' 增加了获取控件相关函数是否使用正则的参数UseRegExp默认F ' V1.6 将Left,Top函数改为属性,可获得可设置 2013/06/10 ' V1.7 增加函数:...
  • ' V1.5 增加了窗口最大最小,隐藏显示正常的几个函数 2013/06/06 ' 增加了获取控件相关函数是否使用正则的参数UseRegExp默认F ' V1.6 将Left,Top函数改为属性,可获得可设置 2013/06/10 ' V1.7 增加了CloseApp...
  • VB.net使用Selenium学习笔记、启动Selenium的一些设置> Imports OpenQA.Selenium Imports OpenQA.Selenium.Chrome '这里Imports之后,下面就不用输入完整的命名空间 Public Class Form1 Private Sub Form1_Load...
  • VB 布局随窗口大小改变

    千次阅读 2010-11-02 21:21:00
    TIMESEEKER 的 VB 布局随窗口大小改变 凡用过VB编写Windows应用程序的用户都可能有过这样的经历:当一个经过精心设计的应用程序运行后,如果用户重新调整了窗体的大小,则控制在窗体中的相对位置、控件与窗体...
  • VB6.0中的窗口控制技巧(1)

    千次阅读 2011-02-18 00:44:00
    移动没有标题栏的窗口 我们一般是用鼠标按住窗口的标题栏,然后移动窗口,当窗口没有标题栏,我们可以用下面的方法来移动窗口:在 BAS 文件中声明:Declare Function ReleaseCapture Lib "user32" () As ...
  • VB6.0中的窗口控制技巧(3)

    千次阅读 2011-02-18 00:46:00
    用Visual Basic设计更好的用户界面  有时在一个窗口中出现较多的控制件,如果能向导式地建议用户下一步该做什么,不失为上策。 在Visual Basic的程序设计中,我们可以使用语句:Object.SetFaocus...
  • 安徽大学VB选择题

    2021-07-13 01:38:05
    简单VB程序设计对于窗体,下面______属性在程序运行其属性设置起作用。 (A)MaxButton (B)BorderStyle (C)Name (D)Left类是对象的抽象,对象则是类的具体。在窗体上建立的一个控件称为______。 (A)对象 (B)容器 ...
  • VB用DDE,代码只需要几句,却能给程序增加很炫酷的功能,本资源有如下内容: 范例1:用DDE非常简便地实现了程序之间的...范例3:用DDE实现一个程序控制另一个程序,比如最大化、最小化、移动窗口等您可以自己丰富它。
  • 可是测试却发现事与愿为,代码并没有依我们所想象的那样在窗体界面实时显示工作进度或工作时间,而且窗体失去响应,无法拖动,点击按钮也没有反应,甚至计时器压根就没有启动计时工作。因为不知道是否成功运行了...
  • 【www.okfie.com--英语考试】vb程序设计的试卷...在代码中引用一个控件,应使用控件的( b )属性。A.Caption B.Name C.Text D.Index2.设变量x = 4,y = -1,a = 7,b = -8,下面表达式( a )的值为“假”。A.x+a &...
  • 展开全部VB中Shell执行CMD命令使用如下代码Shell"cmd.exe/c你要执行的命令"其中要执行的命令中需要62616964757a686964616fe78988e69d8331333365656662注意空格问题 如果一个参数中有空格就需要使用双引号引起来,双...
  • VB 切换到指定的应用程序上写回答 VB 切换到指定的应用程序上比如说按一下Command按钮就自动切换到"哈哈"这个游戏程序然后执行按键代码要详细点- - 展开写回答有奖励共3个回答hankcs2016-04-08 超过15用户采纳过TA的...
  • 控制台程序不显示dos窗口的方法

    千次阅读 2020-07-03 21:33:34
    在实际项目中,为了实现某些功能,但是不希望给用户显示windows窗口或者dos窗口时,以下是比较常用的两种方式实现窗口隐藏: 方法1: 在头文件下加上一句预处理命令: #pragma comment( linker, "/subsystem:\...
  • 管我们使用什么计算机语言开发,VC,VB,BCB,JAVA,NET你都脱离不开操作系统,它就是我们软件的生存土壤,JAVA的跨平台其实是因为它的虚拟机,实质上虚拟机还是要依靠操作系统,.net可以说博大精深但是它最终还是...
  • 还可以使其他应用的窗口最大化或最小化。下面我们探讨一种十分有意义的应用。  我们很希望在程序激活其它窗口仍使得封面窗口处于前台,也就是说该窗口具有“总在最前面”(“Always On Top”)这一特性。其实...
  • VB 6.0 可以使用MQTT

    千次阅读 2021-02-25 17:25:19
    前段时间,承接了一个项目,软件开发的,时间紧,就用VB扣了一个。后来用户提出要把数据传输到他们的MQTT服务器上进行分发,就用VB 6.0的代码又扣了个几天,弄出来个能和MQTT Broker 进行通信的 VB 6.0 的程序。 ...
  • 初三VB教学资料.doc

    2021-07-02 01:16:11
    掌握VB6.0的启动和退出方法。2.熟悉VB6.0的窗口界面。3.了解VB6.0的程序设计语言基础知识。能力:1.培养学生调用已有知识储备的能力。2.在主体探究过程中培养学生的使用意识。情感、态度和价值观:体会VB6.0...
  • vb3.0 升级vb6.0 I'm currently working for a company where I have to upgrade over 50 VB6 programs to VB.NET 2008. So far I'm about half way through, and I've learned quite a few tric...
  • 全国计算机等级考试二级VB无纸上机题库【21-40】2013年3月全国计算机等级考试二级VB上机题库题干第二十一套题干186一、基本操作题请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。(1)在名称为...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 5,336
精华内容 2,134
关键字:

vb启动时窗口最大化