VB题目,急需啊!!!!

来源:百度知道 编辑:UC知道 时间:2024/06/24 17:23:46
复习题
1、设计一个应用程序,在运行中当用鼠标单击窗体form1上的命令按钮(显示)时,在窗体form2上显示出“欢迎您来到VB世界! ”
2、设计一个应用程序,由用户输入长方形的边长数据,计算并输出长方形的面积
3、设计一个窗体,要求如下:
● 窗体没有最大化按钮;
● 窗体标题为“窗体示例1”;
● 设置窗体的前景色为紫色,背景色为蓝色;
● 单击窗体时,在窗体上输出文字为“当前字体:黑体,当前字号:20”,其中字体和大小为窗体的当前输出值;
● 双击窗体时,显示信息被清除。
4、在窗体上画两个命令按钮和一个标签,把两个命令按钮的标题分别设置为“缩小”和“放大”;把标签的标题设置为“vb程序设计”。当程序运行后,如果单击第一个命令按钮,则可使标签中的字缩小2倍;如果单击第二个命令按钮,则可使标签中的字扩大1.5倍。
5、编程计算30+54的和,并在窗体上输出。
6、设a=5,b=2.5,c=7.8,编程计算 y=∏ab/(a+b*c)
7、编程计算半径为5的圆面积及周长
8、利用vb实现本息计算器的作用,通过输入本金,期限和利率,计算并分别显示到期利息及本息和。
9、计算1到00之间的偶数累加之和。
10、点击确定改变文本框中的字体、字型和字号,设计界面和编写程序代码。

1、设计一个应用程序,在运行中当用鼠标单击窗体form1上的命令按钮(显示)时,在窗体form2上显示出“欢迎您来到VB世界! ”
sub command1_click()
form2.show
form2.print "欢迎您来到VB世界! "
end sub
2、设计一个应用程序,由用户输入长方形的边长数据,计算并输出长方形的面积
text1 接收收入长 text2 接收输入宽 text3 输出面积 command1 执行计算
sub command1_click() '计算
dim s as single
s=csng(text1.text)* csng(text2.text)
text3.text=s
end sub
3、设计一个窗体,要求如下:
● 窗体没有最大化按钮;
● 窗体标题为“窗体示例1”;
● 设置窗体的前景色为紫色,背景色为蓝色;
● 单击窗体时,在窗体上输出文字为“当前字体:黑体,当前字号:20”,其中字体和大小为窗体的当前输出值;
● 双击窗体时,显示信息被清除。
form1
设置属性: caption="窗体示例1" backcolor="&H8000000D&" forecolor="&H00C000C0&"

代码:
sub form_click()
FontSize = 20
FontName = "黑体"
print "当前字体:黑体,当前字号:20"
end sub

Private Sub Form_DblClick()
Cls
End Sub
4、在窗体上画两个命令按钮和一个标签,把两个命令按钮的标题分别设置为“缩小”和“放大”;把标签的标题设置为“vb程序设计”。当程序运行后,如果单击第一个命令按钮,则可使标签中的字缩小2倍;如