把一个窗体显示在屏幕的中心用什么API函数。 把一个窗体显示在屏幕的中心用什么API函数。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 form1.move (screen.width-width)/2,(screen.height-height)/2 form1.move (screen.width-width)/2,(screen.height-height)/2 设置窗体的StartUpPosition属性 为2屏幕中心 无相关api函数,只能自定义。如下:'-----------------------------------------------------------' SUB: CenterForm' 居中传递过来的窗体,在屏幕中心的上面'-----------------------------------------------------------Public Sub CenterForm(frm As Form) frm.Top = Screen.Height \ 2 - frm.Height \ 2 frm.Left = Screen.Width \ 2 - frm.Width \ 2End Sub 这只是平面解析几何问题,不是编程问题,更不是Win32 API问题 如何在指定位置创建数据库 如何找到webbrower控件打开网页中各个元素在网页中的坐标位置 简单的求和问题 怎么将一串字符串变成乱码并且能转换回原来的字符? 送给大家一个商业源码 listbox问题讨论 SQL语句求教: MSHflexgrid能任意行拆分列吗? 谁能把头上的星星借给我戴几天,最好是红色的? 我用VB打包的安装程序,怎么也注册不上ADO控件呢?请高手指教?(在线等待) vbforums 请问vb6.0中有vaSpread控件吗?
' SUB: CenterForm
' 居中传递过来的窗体,在屏幕中心的上面
'-----------------------------------------------------------
Public Sub CenterForm(frm As Form)
frm.Top = Screen.Height \ 2 - frm.Height \ 2
frm.Left = Screen.Width \ 2 - frm.Width \ 2
End Sub