VB设计题,,求教

单击时窗体中以红色、15磅、隶书,显示“VisualBasic程序设计”,并且窗体标题为“VB程序1”,如下图。(2)双击时清除窗体中文字。2.在上题的窗体中继续添加下图... 单击时窗体中以红色、15磅、隶书,显示“Visual Basic 程序设计”,并且窗体标题为“VB程序1”,如下图。
(2)双击时清除窗体中文字。

2. 在上题的窗体中继续添加下图功能,要求完成以下功能:
(1)初次运行时,标签文字“Hello”不显示,“显示”按钮可用,“隐藏”按钮不可用,标题设为"单击“显示”按钮显示文字",如图2所示。
(2)单击“显示”按钮后,“Hello”标签显示,“显示”按钮不可用,“隐藏”按钮可用,标题设为"单击“隐藏”按钮隐藏文字",如图3所示。
(3)单击”隐藏“按钮后,”Hello“标签不显示,”显示“按钮可用,”隐藏“按钮不可用,标题设为"单击“显示”按钮显示文字",如图2所示。

求12题衔接的详细步骤
展开
 我来答
明恬谧09G
2018-12-10
知道答主
回答量:35
采纳率:37%
帮助的人:5.6万
展开全部

Option Explicit

Private Sub Command1_Click()

Label2.Caption = "Hello"

Command1.Enabled = False

Command2.Enabled = True

Me.Caption = "单击“隐藏”按钮隐藏文字"

End Sub

Private Sub Command2_Click()

Label2.Caption = ""

Command1.Enabled = True

Command2.Enabled = False

Me.Caption = "单击“显示”按钮显示文字"

End Sub

Private Sub Form_Click()

Label1.FontName = "新宋体"

Label1.FontSize = 15

Label1.ForeColor = RGB(255, 0, 0)

Label1.Caption = "Visual Basic 程序设计"

Me.Caption = "VB程序1"

End Sub

Private Sub Form_Load()

Label1.Caption = ""

Label2.Caption = ""

Command2.Enabled = False

Me.Caption = "单击“显示”按钮显示文字"

End Sub

推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式