VB实验3习题.pptxVIP

使用单选钮，复选框设置文本框中文字的状态（下划线、删除线，字体）。;代码如下：;2.框架例题;框架例题;代码如下：;3.滚动条例题 ;4.例题：在窗体上显示当前系统时间;建立对象：在窗体上建立一个时钟控件和一个标签控件。设置属性：时钟控件 Interval:1000 标签控件 Borderstyle:1 编写代码： Private Sub tmrclock_Timer() label1.Caption = Time$ ‘time$为日期函数，返回值为系统时间。 End Sub ;5.菜单设计例题;解题步骤;设计菜单：打开菜单编辑器，按下表对每个菜单项作设置。 ;编写事件过程代码： ;Private Sub div_Click() ‘乘法 x = Val(Txtno1.Text) * Val(Txtno2.Text) lblresult.Caption = Str$(x) End Sub Private Sub mul_Click() ’除法 x = Val(Txtno1.Text) / Val(Txtno2.Text) lblresult.Captio