窗体与常用控件.pptxVIP

会计学;学习目的;控件(Control)和工具箱;控件的基本操作;名称(Name)属性和命名约定;窗 体(Form);窗体基本操作;窗体常用属性;窗体常用事件;窗体常用方法;基础控件—Label;基础控件—TextBox;基础控件—TextBox;基础控件—Button;【例5.1】设计一个数制转换程序，要求： 单击“转换”按钮或按Alt+C组合键，可将输入的十进制整数转换为十六进制整数，同时该按钮变为无效； 在上面的文本框中输入数据时，可自动将转换结果文本框清空，同时使“转换”按钮变为有效； 单击“退出”按钮或按Alt+E组合键，可关闭??体(即退出程序) 。;界面设计：窗体上添加2个标签、2个文本框和2个命令按钮 属性设置：如下表 ;Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim x As Integer x = CInt(txt10.Text) txt16.Text = Hex(x) Button1.Enabled = False End Sub Private Sub txt10_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles txt10.TextChanged txt16.Text = Button1.Enabled = True End Sub Private Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click Me.Close() End Sub End Class;拓展思考; Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim x As Integer If IsNumeric(x) = True Then x = CInt(txt10.Text) txt16.Text = Hex(x) Button1.Enabled = False Else MsgBox(“您输入的数据不合法，请重新输入！”) txt10.Text = “” txt10.Focus( ) End If End Sub ;【例5.2】设计一个登录窗体(图1)，要求： 单击“登录”按钮后出现图2所示对话框； 若用户名或密码有一个为空，则出现图3所示对话框； 单击“退出”按钮可关闭窗体(即退出程序) 。;界面设计：窗体上添加2个标签、2个文本框和2个命令按钮 属性设置：如下表 ;3. 编写事件过程：;练习作业;单选按钮控件——RadioButton;复选框控件——CheckBox;分组控件——GroupBox;【例5.3】设计一个如下图的简易计算器。要求： 单击“计算”按钮后根据选择的运算符给出操作结果(保留2位小数) 单击复选框可根据选择改变“操作结果”文本框的前景色和背景色 单击“清除”按钮将文本框中数据清除，同时清除单选按钮和复选框的选择状态 单击“退出”按钮可关闭窗体(即退出程序)。;“计算”按钮的Click事件过程代码：;“字体红色”复选框的CheckedChanged事件过程代码：;拓展思考和练习;列表框控件——ListBox;列表框控件——ListBox;列表框控件——ListBox;【例题】设计一个如下图的点菜程序。要求： 在“本店菜单”列表框中选择某一菜名后单击“选择”按钮可以点菜 在“已点菜色”列表框中选择某一菜名后单击“删除”按钮可以取消点菜 单击“下单”按钮弹出对话框告知用户已下单，并清空“已点菜色”列表框 单击“退出”按钮可关闭窗体(即退出程序)。;窗体的Load事件过程代码：;“删除”按钮的Click事件过程代码：;拓展思考;Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArg