好的程序跟你一起分享,已经验证OK了!
Private Sub Command1_Click()
Label2.Caption = "VB的全称:Visual Basic"
End Sub
Private Sub Form_Load()
Label1.Caption = "VB的全称是什么呢?"
End Sub
你在窗体上添加两个label控件,一个command控件,把代码复制进去就OK!!!
Private Sub Command1_Click()
Label2.Caption = Rnd
End Sub
这个就是变化的数字了!
在你要显示的位置加一个文字标签:Label1
在点击命令按钮后的事件中加入:
Label1.Caption="你的答案"
这个问题不难,你看看书上都有解释的,只要看看如何在标签中显示文字,然后道理都差不多,用命令把这些连接起来就是了
private
sub
command1_click()
static
flag
as
boolean
if
flag
then
label1.visible=true
flag=not
falg
end
sub