习题7解答(VB.NET)探讨.doc

第7章 常用控件 7．1 填空题 1.答案：界面设计、程序功能设计控件、组件、组件“属性”、 程序代码Control、所有True 6．答案：n=val（InputBox（“请输入一个求阶乘的数：”，“求数的阶乘”） 7．答案：r=MsgBox（“退出本系统?”，4+32+0，UrI属性、Navigate方法Text 10．答案：True 11. 答案：发生改变12．答案：PictureBox1.Image = Image.FromFile(D:\sample\diannt.jpg ) 13．答案：AutoSize 14. 答案：Select 15．答案：先后顺序 16．答案：Button1.Enabled=True 17．答案：False 18. 答案：True 19．答案：False 20．答案：0、Count-1 21．答案：ListBox1.Items.Remove(ListBox1.SelectedItem) 22．答案：ComboBox1.Items.Add(“计算机学院”) 23．答案：LargeChange 24．答案：Minimum 25．答案：Tick 26．答案：500 7．2 选择题 1．答案：d 2．答案：b 3 答案：c 4．答案：a 5. 答案：c 6．答案：d 7．答案：d 8．答案：b 9．答案：d 10．答案：c 11．答案：c 12．答案：a 13．答案：a 14．答案：d 15．答案：c 16．答案：c 17．答案：b 18．答案：d 19．答案：a 20．答案：c 21．答案：d 22．答案：a 7．3 问答题 略 7．4 编程题 1. 解答： (1)界面设计和属性设置 在窗体上建立两个标签、两个文本框和一个命令按钮。窗体和窗体上控件的主要属性设置如下表所示。 属性设置 Form1 Text 英文单词翻译为中文单词 Label1 Text 英文 Label2 Text 中文 TextBox1 Text 空串 TextBox2 Text 空串 Button1 Text 翻译 (2)程序代码 Public Class Form1 Private Sub Form1_Load(ByVal sender As Object, _ ByVal e As System.EventArgs) Handles Me.Load TextBox1.Text = : TextBox2.Text = End Sub Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click Select Case LCase(Trim(TextBox1.Text)) Case china TextBox2.Text = 中国 Case france TextBox2.Text = 法国 Case england TextBox2.Text = 英国 Case america TextBox2.Text = 美国 Case india TextBox2.Text = 印度 Case Else TextBox2.Text = 找不到该单词 End Select End Sub Private Sub TextBox1_Click(ByVal sender As Object, _ ByVal e As System.EventArgs) Handles TextBox1.Click TextBox1.Text = : TextBox2.Text = End Sub End Class (3)运行情况 上机运行程序后，屏幕出现用户界面。把鼠标移到TextBox1文本框并单击，然后输入英文国家名，例如，China。英文国家名输入后，单击标题为“翻译”的命令按钮Butt