程序设计语言VB

-回复 -浏览
楼主 2018-11-07 13:25:23
举报 只看此人 收藏本贴 楼主

程序设计语言VB

一、单选题

1. A    2. A    3. A    4. A    5. B   6. C   7. C   8.9.10. D

11. C   12. D  13. B   14. B   15. C

二、填空题1

16. 20    

17. 9

三、 简答题 (   每题20分,共1题,共20分    )  

18.简述下图程序界面的设计步骤,包括添加控件、设置属性和编程(备注:图片路径及图片文件名为:“F:\桌面图片\123.jpg”)。


四、 综合设计题

19. Private Sub Command1_Click()

Dim i, j As Integer

For i = 1 To 4

  For j = 1 To (2 * i - 1)

     Print "A";

  Next j

  Print

Next i

For i = 4 To 1 Step -1

  Forj = (2 * i - 1) To 1 Step -1

     Print "B";

  Next j

  Print

Next i

End Sub

 

20. Private Sub c1(ByVal a As Single, ByVal b As Single, c)

If a > b Then c = a Else c = b

End Sub

Private Sub Command1_Click()

 Dima, b, c As Single

 a =Val(Text1.Text)

 b =Val(Text2.Text)

 Call c1(a, b, c)

 Print c

End Sub

 

21.Private SubCommand1_Click()

Picture1.PSet (Picture1.Width / 2,Picture1.Height / 2)

End Sub

Private Sub Command2_Click()

Picture1.Line (0, 0)-(Picture1.Width,Picture1.Height)

End Sub


我要推荐
转发到