请选择您的班级
公告栏
1:

3.5 活动探究

活动1(回顾): 想一想。

1、在VB语言中,下列变量名中合法的是( )。
2、 下列给出的赋值语句中正确的是( )。
B、-M =M C、B=A-3 D、x + y = 0


活动2(巩固):
动动手。完善程序,然后在VB中验证结果(下载)

程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c


活动3(拓展): VB小程序中的字幕是怎样实现滚动的?你找到其中奥妙吗?你能修改其滚动速度吗?(下载)



提示:字幕的名称是L1,这个程序只有一行关键代码,你想明白了吗?
Private Sub Timer1_Timer()
   L1.Left = L1.Left + 200
End Sub


2:

3.5 活动探究

活动1(回顾): 想一想。

1、在VB语言中,下列变量名中合法的是( )。
2、 下列给出的赋值语句中正确的是( )。
B、-M =M C、B=A-3 D、x + y = 0


活动2(巩固):
动动手。完善程序,然后在VB中验证结果(下载)

程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c


活动3(拓展): VB小程序中的字幕是怎样实现滚动的?你找到其中奥妙吗?你能修改其滚动速度吗?(下载)



提示:字幕的名称是L1,这个程序只有一行关键代码,你想明白了吗?
Private Sub Timer1_Timer()
   L1.Left = L1.Left + 200
End Sub


3:

活动1(回顾): 想一想。

1、在VB语言中,下列变量名中合法的是( )。
2、 下列给出的赋值语句中正确的是( )。
B、-M =M C、B=A-3 D、x + y = 0


活动2(巩固):
动动手。完善程序,然后在VB中验证结果(下载)

程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c


活动3(拓展): VB小程序中的字幕是怎样实现滚动的?你找到其中奥妙吗?你能修改其滚动速度吗?(下载)



提示:字幕的名称是L1,这个程序只有一行关键代码,你想明白了吗?
Private Sub Timer1_Timer()
   L1.Left = L1.Left + 200
End Sub


4: 

c=2*r*r

程序1:字符串运算 程序2:计算圆的面积与周长

  

dim s2 as string      声明字符串变量s2

dim s1 as string      声明字符串变量s1



s1="您的密码是"
s2="Morning"
Print s1+s2

  

dim r as integer     声明整数型变量r

dim S as Single     声明单精度实数变量S

dim c as Single     声明单精度实数变量Sc



r=6
s=3.14*r*r
  

c=2*r*r


Print "面积s="; s
Print "周长c="; c



5:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

6:活动2(巩固): 动动手。完善程序,然后在VB中验证结果(下载)
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c



7:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

8:活动2(巩固): 动动手。完善程序,然后在VB中验证结果(下载)
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c



9:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

10:活动2(巩固): 动动手。完善程序,然后在VB中验证结果(下载)
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

11:


活动2(巩固):
动动手。完善程序,然后在VB中验证结果(下载)

程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

12:


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c



13:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

14:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

15:


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

16:


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

17:活动2(巩固): 动动手。完善程序,然后在VB中验证结果(下载)
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

18:

活动1(回顾): 想一想。

1、在VB语言中,下列变量名中合法的是( )。
2、 下列给出的赋值语句中正确的是( )。
B、-M =M C、B=A-3 D、x + y = 0


活动2(巩固):
动动手。完善程序,然后在VB中验证结果(下载)

程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

19:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

20:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c



21:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c



22: 
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

23:活动2(巩固): 动动手。完善程序,然后在VB中验证结果(下载)
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

24:活动2(巩固): 动动手。完善程序,然后在VB中验证结果(下载)
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

25:活动2(巩固): 动动手。完善程序,然后在VB中验证结果(下载)
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c



26:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

27:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

28:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c



29:活动2(巩固): 动动手。完善程序,然后在VB中验证结果(下载)
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

30:

3.5 活动探究

活动1(回顾): 想一想。

1、在VB语言中,下列变量名中合法的是( )。
2、 下列给出的赋值语句中正确的是( )。
B、-M =M C、B=A-3 D、x + y = 0


活动2(巩固):
动动手。完善程序,然后在VB中验证结果(下载)

程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

31:活动2(巩固): 动动手。完善程序,然后在VB中验证结果(下载)
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

32:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c



33:


活动2(巩固):
动动手。完善程序,然后在VB中验证结果(下载)

程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c



34:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

35:

活动1(回顾): 想一想。

1、在VB语言中,下列变量名中合法的是( )。
2、 下列给出的赋值语句中正确的是( )。
B、-M =M C、B=A-3 D、x + y = 0


活动2(巩固):
动动手。完善程序,然后在VB中验证结果(下载)

程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c



36:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c



37:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

38:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

39:活动2(巩固): 动动手。完善程序,然后在VB中验证结果(下载)
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

40:

Private Sub Command1_Click()
Dim s1 As String
    s1 = "您的密码是"
    s2 = "Morning"
    Print s1 & s2
End Sub

Private Sub Command2_Click()

    r = 6
    s = 3.14 * r * r
    c = 3.14 * 2 * r
    Print "面积s="; s
    Print "周长c="; c
End Sub


41:活动2(巩固): 动动手。完善程序,然后在VB中验证结果(下载)
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

42:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c



43:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

44:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

45:
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c

46:                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                            活动2(巩固): 动动手。完善程序,然后在VB中验证结果(下载)
程序1:字符串运算 程序2:计算圆的面积与周长


s1="您的密码是"
s2="Morning"
Print s1+s2


r=6
s=3.14*r*r

Print "面积s="; s
Print "周长c="; c