VisualBasic程序设计教程(第4版)实验答案

 时间:2015-06-08 10:20:38 贡献者:其阴不雨

导读:※声明:签显示在文本框中输入的姓名。Text1 Text=""Label1 Caption="我开始学习程序设计";End Sub实验1-4Caption = "双击窗体"图2.1.3 实验1.5运行界面Text1.FontSize = 25图2.1.4 实验1.6运行界面Private Sub Command2_

visualbasic程序设计教程 马铭,任正权 9787030311085
visualbasic程序设计教程 马铭,任正权 9787030311085

※声明:

签显示在文本框中输入的姓名。

Text1 Text=""

Label1 Caption="我开始学习程序设计";

End Sub

实验1-4

Caption = "双击窗体"

图2.1.3 实验1.5运行界面

Text1.FontSize = 25

图2.1.4 实验1.6运行界面

Private Sub Command2_Click()

Private Sub Command2_Click()

其中:Log(x)为对数函数,Log(2)缘由Log(13/26),0.8%需写成0.008

的3位数。

End Sub

提示:

Text2 = Asc(Text1.Text)

For i = 1 To 5

Print "平方为:"; pf; Space(3); "平方根为:"; pfg; Space(3); "立方为:"; lf; Space(3); "立方根为:"; lfg End Sub

y = x

Private Sub Form_Click()

Print ”排序后”& x &””& y &””&z ‘用”&”字符串连接符

Text4 = Val(Text1) + Val(Text2)

求鸡和兔各有多少只?

Else

要考虑实根,要求判断b^2-4*a*c>=0。

Private Sub Command2_Click()

提示:

Private Sub Text1_KeyPress(KeyAscii As Integer)

End Sub

Case 3

Label3 = Choose(Text1, "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday", "Sunday")

Label3.FontBold = True

 
 

微信扫一扫 送福利