求高手写VB小程序

485关注624浏览

展开全部
收起
2回答
提交回答
  • 至过去的我

    2044人对此回答表示赞同

    我是未来的你,你现在是不是在年找寻小程序答案。你不要感觉诧异,给你来信原因,就是让你不在后悔。今天去学习如何推广小程序,相信......点击查看更多>
    发布于
  • 史蒂芬孙

    58人对此回答表示赞同

    私人小Command1_Click()
    暗淡了(10)作为整数,我作为整数

    对于i = 1到10

    A(I)= INT(*的Rnd 90 + 10)

    打印(一)

    打印“反向输出:”

    对于i = 10到1步骤-1

    打印(I)接下来
    小尾
    展开
    58
    0回复
    发布于 6年前

    评论(0)

    收起评论

  • Willow

    58人对此回答表示赞同


    api showwindow()
    如果这两个程序都是你写的,自己在formload中form2.show()就可以了

    Private Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

    Private Declare Function ShowWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long '声明

    sub form_load() handle form.load
    hwnd=findwindow(null,"exe名")
    if hwnd=0 then
    msg "进程未找到"
    exit sub
    end if
    ret%=showwindow(hwnd,SW_SHOWNORMAL)
    if ret=0 then
    msg "窗口未发现"
    exit sub
    end if
    end sub

    不是 是自己编写的两个独立程序 但运行A程序会在系统时间区域透明显示的 然后那个程序一直会置顶显示 B程序则运行 用户关闭在进程显示 然后点击A程序呼出B进程界面显示



    追答
    你可以把两个程序代码汇总到一个项目里
    sub formA.load
    formB.visible=false
    formB.load
    end sub

    sub formA.click
    formB.show
    end sub

    要么就像之前的两个API那样找到进程,隐藏显示窗口,VB也就只能这样了,最好是再一个项目里做,反正项目所有程序都是你自己的
    要是想把B程序做成独立项目,让之后的程序共用的话也只能通过API的方式,不过既然你了解B的窗口类名,那么findwindow("类名","窗口标题")能准确找到你的B程序。



    展开
    58
    0回复
    发布于 8年前

    评论(0)

    收起评论

A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
咨询热线

13312967497

扫码添加业务即可随时咨询 还可领取小程序推广攻略

业务咨询: 13312967497
扫码咨询

扫码咨询套餐

回到顶部