永发信息网

各位大神,我想用VB编写一个程序来表白,希望可以帮我,成人之美功德无量呀,谢啦!!!

答案:2  悬赏:30  手机版
解决时间 2021-02-20 03:25
具体要求是,点击命令按钮后会弹出一个窗口,里面每隔两秒钟会像PPT那样变换图片,请尽量设计的人性话一点,我没有财富值,就给不了了,祝好人一生平安!
最佳答案
方法:
1. 先将要轮流显示的图片编辑好,建议图片尺寸设置为一致!并转换为BMP格式的图片!
2. 打开VB,新建工程,单击窗体中【外接程序】=>【外接程序管理器】=>选择【VB 资源管理器】,并加载它!
3. 将图片添加进VB 资源管理器里面,文件的ID依次是 101 102 103 .... ...
4. 在工程项目中添加两个窗体,分别为 Form1 Form2
5. 在Form1窗体中添加一个Command控件, 并在窗体中添加如下代码:
    Private Sub Command1_Click()
        Form2.Show
    End Sub
6. 在Form2窗体中添加一个Timer控件,一个PictureBox控件,并在窗体中添加如下代码:
Dim i As Integer


Private Sub Form_Load()
   Timer1.Interval = 2000   '延时2000ms
    i = 1
End Sub


Private Sub Timer1_Timer()
    Picture1.Picture = LoadResPicture(100 + i, vbResBitmap) 
    i = i + 1
    If i = 6 Then i = 1    ' 数字6是代表有6张图片
End Sub
这样就按照你的要求做出一个每两秒钟就自动循环更换图片的程序了!
全部回答
搜一下:各位大神,我想用VB编写一个程序来表白,希望可以帮我,成人之美功德无量呀,谢啦!!!
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
想挽回前男友,问他有没有新女友,他说找了十
初中各科提高成绩的方法?
水仙花有香味吗
车过户了第二年保费能减吗
炭樵我想知道这个在什么地方
【游客损坏故宫文物】2013年2月一位名叫梁齐
舍我其谁的其是什么意思?
浩瀚文画书斋地址有知道的么?有点事想过去
人为什么学会骑自行车以后就不会忘记
一个人打开一口棺材有一个老爷爷突然坐起来这
梦到扶起摔倒的男老人
i make sure it get lots of sun 哪错了
埃尔咖啡华夏世贸广场店地址有知道的么?有点
聪明的过度就是愚蠢
济州岛适合玩几天
推荐资讯
我国东汉时期伟大的天文学家张衡说过:“君子
中国的各个平原都适合种植什么?
13000米等于多少千米
运动祛湿 运动可以祛湿吗
粮贸公司家属院在什么地方啊,我要过去处理事
photoshop cs5 的32与64有啥区别啊?
辽西石材在哪里啊,我有事要去这个地方
小松pc60-7到底是那一年生产的
请问,新浪博客怎么添加好友啊?,我创建了一个
广汉市雒城镇第三中学校地址有知道的么?有点
5D电影院在什么地方啊,我要过去处理事情
手机最低消费包含月租吗?拜托了各位 谢谢
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?