UC知道VB中如何设置打开文件的大小和位置那？？
来源：百度知道 编辑：UC知道 时间：2024/06/22 08:49:06
如何指定一个按钮单击后打开自定义的2个txt文件，然后每个文件的 高度，宽度，位置，都可以令设置那，
比如我想开2个TXT文件，单击按钮后，一个高 100 宽 50 显示在屏幕的左上角，令一个TXT文件 随第一个完成操作后自动打开位置在右上角。。
这个怎么可以实现，请教高手
我的意思是 ，在屏幕里显示这个EXE文件的定义的高度宽度，和位置，
比如我想开2个TXT文件，单击按钮后，一个高 100 宽 50 显示在屏幕的左上角，令一个TXT文件 随第一个完成操作后自动打开位置在右上角。。
这个怎么可以实现，请教高手
我的意思是 ，在屏幕里显示这个EXE文件的定义的高度宽度，和位置，
怎么会是做梦哩?
给你发过一次咯~这个做参考吧~
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
(ByVal lpClassName As String, _
ByVal lpWindowName As String) As Long
Private Declare Function MoveWindow Lib "user32" _
(ByVal hwnd As Long, _
ByVal x As Long, ByVal y As Long, _
ByVal nWidth As Long, _
ByVal nHeight As Long, _
ByVal bRepaint As Long) As Long
Private Sub Command1_Click()
Dim a As Long
Shell "notepad", vbNormalFocus
a = FindWindow(vbNullString, "无标题 - Notepad")
MoveWindow a, 0, 0, 50, 100, 0
End Sub
做梦~~