各位,如何做到界面与显示器的分辨率变化而变化? 我现想做到程序的界面随显示器分辨率的变化而自动调整界面的布局??? 谢谢!!! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 可以根据screen.height和screen.width来设置form的height和width,然后在form_resize中重新布局窗体。 screen.height=form.heightscreen.width=form.width简单的方法可以用timer控件来控制!-----------------------------------------------------------------------人在江湖,人不由已!我喜欢程序员这职业! Private Sub Command1_Click()Timer1.Enabled = FalseEnd SubPrivate Sub Timer1_Timer()Form1.Top = 0Form1.Left = 0Form1.Height = Screen.HeightForm1.Width = Screen.WidthEnd Sub不一定能达到效果,可是可提一下方法。-----------------------------------------------------------------------人在江湖,人不由已!我喜欢程序员这职业! vb 如何分割 jpg 图片? 圣诞节无条件放分! 关于对MSFlexGrid1单元格的计算 teechart的point序列,单击时怎样获得最近点的值 VB中列表框中的项目含有复选框的怎么实现 关于自销毁技术:怎么复制一个进程,并用这个复制出来的进程杀掉原进程? sdi and mdi 很急 ADO如何验正SQL语句? 回复有分,打包问题!! VBA中用put函数写文件,为何文件中的内容字节顺序反转了? datagrid在新增一条记录时,如何将某些指定信息直接写入datagrid的某个单元格中,马上给分! 500分求二进制文件的比较算法,最好有源程序
screen.width=form.width
简单的方法可以用timer控件来控制!
-----------------------------------------------------------------------
人在江湖,人不由已!我喜欢程序员这职业!
Timer1.Enabled = False
End SubPrivate Sub Timer1_Timer()
Form1.Top = 0
Form1.Left = 0
Form1.Height = Screen.Height
Form1.Width = Screen.Width
End Sub不一定能达到效果,可是可提一下方法。
-----------------------------------------------------------------------
人在江湖,人不由已!我喜欢程序员这职业!