注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

纪念册~~

 
 
 

日志

 
 

VB实验内容(八)  

2010-12-25 17:26:06|  分类: 学海无涯 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |
 

三、实验原理及内容

实验题目1:

使用图片框设计“图片显示”窗体,包含1个图片框、4个命令按钮,分别为“春天图片”、“夏天图片”、 “清除图片”和“退出”。(图片从网上搜索,文件名分别为春天图片和夏天图片)

要求:

(1)图片框自动改变大小适应图片。

(2)单击“春天图片”或“夏天图片”按钮,显示对应的图片。

(3)单击“清除图片”,将会使图片框中的图片消失。

(4)单击“退出”按钮退出该应用程序。

实验题目1源程序代码:

Private Sub Command1_Click()

Picture1.Picture = LoadPicture("C:\Documents and Settings\K02\桌面\1.jpg")

End Sub

 

Private Sub Command2_Click()

Picture1.Picture = LoadPicture("C:\Documents and Settings\K02\桌面\2.jpg")

End Sub

 

Private Sub Command3_Click()

Picture1.Picture = LoadPicture("")

End Sub

实验题目2:

使用图像框设计应用程序,当单击某个“交换”命令按钮时,将两个图像框中的图片进行交换。

要求:图片自动调整大小以适应图像框的大小。

实验题目2源程序代码:

Private Sub Command1_Click()

Image3.Picture = Image1.Picture

Image1.Picture = Image2.Picture

Image2.Picture = Image3.Picture

End Sub

Private Sub Form_Load()

Image1.Picture = LoadPicture("C:\Documents and Settings\K02\桌面1.jpg")

Image2.Picture = LoadPicture("C:\Documents and Settings\K02\桌面2.jpg")

End Sub

 

 

 

 

实验题目3:

设置滚动条,最小值0,最大值100,最小变化量2,最大变化量4,当滚动条的刻度值发生改变时,将其刻度值显示在文本框。

 

实验题目3源程序代码:

Private Sub HScroll1_Change()

Text1.Text = HScroll1.Value

End Sub

 

 

 

实验题目4:

在标签上显示动态时间,每隔一秒变化一次。

提示:在窗体上设计一个标签和一个计时器控件,设置计时器控件的interval属性值为1000。在计时器控件的事件中设置标签的caption属性设置为time函数(即当前的系统时间),即label1.caption=time。

实验题目4源程序代码:

Private Sub Timer1_Timer()

Label1.Caption = Time

End Sub

实验题目4运行界面:

 

实验题目5:

设计一个程序实现投票程序。设计一个窗体,该窗体含2个标签和2个列表框,标签框用来显示提示信息“候选人员名单”和“被选中的人员名单”。运行程序时,单击“候选人员名单”列表框中的人员,该人员将移动到“被选中的人员名单”列表框中。单击“被选中的人员名单”中的人员,该人员将移动到“候选人员名单”列表框中。

实验题目5源程序代码:

Private Sub Form_Load()

List1.AddItem "马恺"

List1.AddItem "玉凤"

List1.AddItem "晓梅"

List1.AddItem "胖姐"

End Sub

 

Private Sub List2_Click()

List1.AddItem List2.Text

List2.RemoveItem List2.ListIndex

End Sub

 

Private Sub List1_Click()

List2.AddItem List1.Text

List1.RemoveItem List1.ListIndex

End Sub

 

 

 

实验题目5运行界面:

 

 

 

 

 

实验题目6:

设计个人情况登记程序。程序初始界面如下:

窗体中一共包含3个标签,3个组合框,1个图片框,2个命令按钮。

Combo1提供2个选项:东校区、西校区

Combo2提供5个选项:政法系、外语系、教心系、音乐系、美术系

Combo3提供5个选项:0901、0902、0903、0904、0905

程序运行时,当在3个组合框中分别选择相应内容后,单击“确认”按钮,会将选择的内容在图片框中打印出来。

 

 

实验题目6源程序代码:

Private Sub Command1_Click()

Picture1.Print Combo1.Text

Picture1.Print Combo2.Text

Picture1.Print Combo3.Text

End Sub

 

Private Sub Command2_Click()

End

End Sub

 

Private Sub Form_Load()

Combo1.AddItem "东校区"

Combo1.AddItem "西校区"

Combo2.AddItem "政法系"

Combo2.AddItem "外语系"

Combo2.AddItem "教心系"

Combo2.AddItem "音乐系"

Combo2.AddItem "美术系"

Combo3.AddItem "0901"

Combo3.AddItem "0902"

Combo3.AddItem "0903"

Combo3.AddItem "0904"

Combo3.AddItem "0905"

End Sub

 

实验题目6运行界面:

 

 

 

 

 

  评论这张
 
阅读(77)| 评论(0)
推荐 转载

历史上的今天

在LOFTER的更多文章

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2018