vb第16单选按钮、复选框控件(3)

简要介绍资料的主要内容,以获得更多的关注

Image1.Picture = LoadPicture("d:\hua.jpg") End Sub

Private Sub Option2_Click() Form1.WindowState = 2 Image1.Top = 0 Image1.Left = 0

Image1.Height = Form1.Height Image1.Width = Form1.Width Form1.Picture

LoadPicture("d:\hua.jpg") End Sub

二、选择控件—复选框 例：使用复选框显示文本框中的字体分别为下划线、倾斜、粗体

Private Sub Check1_Click() Text1.FontUnderline = True End Sub

Private Sub Check2_Click() Text1.FontItalic = True End Sub

Private Sub Check3_Click() Text1.FontBold = True End Sub

该例在运行时复选框取消时有何表现？

问：复选框取消时如何设置代码，使其没有下划线等效果？ Private Sub Check1_Click()

If Check1.Value = 1 Then

=

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说教育文库vb第16单选按钮、复选框控件(3)在线全文阅读。