VB关于记事本的小问题。

来源:百度知道 编辑:UC知道 时间:2024/05/16 11:20:36
自动换行设置是复选的。怎么点一下就不选中。不点一下就选中。还有代码啊
谢谢饿。
还有查找 继续查找 替换 用text的怎么做呢??
Private Sub zidonghuanhang_Click()
If zidonghuanhang.Value = 1 Then Text1.ScrollBars = 2
If zidonghuhang.Value = 0 Then Text1.ScrollBars 3
End Sub

还有不能拖拽他的大小 就是我设计那个大小 不能拉大小
是在菜单里的啊!!

Private Sub zidonghuanhang_Click()
zidonghuanhang.checked=not zidonghuanhang.checked'加入该语句
If zidonghuanhang.Value = 1 Then Text1.ScrollBars = 2
If zidonghuhang.Value = 0 Then Text1.ScrollBars=3

End Sub

在FORM_LOAD里写上zidonghuanhang.Value = 1
默认的就是选中了
再点一下不就是不选中了么