Question

vb 状态栏

我知道用statusBar控件,主要是:
给个代码,让状态栏显示你此刻所干的任务.如你鼠标放在新建文件上,状态栏就会显示新建,当你鼠标点了新建任务时,状态栏显示就绪.

Answer 1

难道是这样？友情帮顶

Dim bCmdClicked As Boolean

Private Sub cmdNew_Click()

'Task goes here

Me.StatusBar1.Panels(1).Text = "Task finished"

bCmdClicked = True

End Sub

Private Sub cmdNew_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Not bCmdClicked Then
Me.StatusBar1.Panels(1).Text = "New Task"
End If
End Sub

Answer 2

举例子吧
1.“新建文件”是按钮button的话，就是button_OnMouseOver事件里写
2.button_OnClick