Question

VB语言，“编辑”按钮的初始状态可用，而“保存”的初始状态不可用。修改text中内容，“保存”变为可用；

按“保存”时，text文本不可编辑，且“保存”变成不可用

Answer 1

Private Sub Command1_Click()
Text1.Enabled = True
End Sub
Private Sub Command2_Click()
Text1.Enabled = False
Command2.Enabled = False
'这里写你的保存代码
End Sub
Private Sub Form_Load()
Command1.Caption = "编辑(&E)"
With Command2
.Caption = "保存(&S)"
.Enabled = False
End With
End Sub
Private Sub Text1_Change()
If Not Command2.Enabled Then Command2.Enabled = True
End Sub

追问

Private Sub Command1_Click()

Private Sub Command2_Click()

Private Sub Text1_Change()

只用这三个怎么编呢

追答

Private Sub Form_Load()
Command1.Caption = "编辑(&E)"
With Command2
.Caption = "保存(&S)"
.Enabled = False
End With
End Sub
你把上面这个过程去除，但在属性窗口里先把command2的enabled设为false

追问

“这里写你的保存代码”是什么意思啊，我是新手，麻烦您了

追答

'你自己写的，一起写一下吧，看看c:\目录下是否有a.txt文件
Private Sub Command2_Click()
Text1.Enabled = False
Command2.Enabled = False
Open "c:\a.txt" For Output As #1
Print #1, Text1
Close #1
End Sub