就是一个窗口,放上一个按钮,
按一下,隐藏窗口的一半,再按一下,又显示出来成一个完整大小都窗口
If Me.Height = 300 Then Me.Height = 600 Else Me.Height = 300
if me.left=0 then
me.left=-300
else
me.left=0
endif
VB code:
Dim a As Double
Private Sub Co ......
我winform画面上有很多控件 现在有一个按钮 我想当按下它的时候 所有的控件都不可编辑 但除过ToolStrip上面的button
我使用下面的方式不可以 求知道的帮我下 谢谢了
C# code:
Private Sub 全画面不可编辑ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArg ......
Private Sub Check1_Click()
If Check1.Value = 1 Then
DTP1.Enabled = True
Else
DTP1.Enabled = False
End If
End Sub
Private Sub Check2_Click()
If Check2.Value = 1 Then
DTP2.Enabled = True
Else
DTP2.Enabled = False
End If
End Sub
Private Sub cmd_Click()
Set cn = New ADODB.Connection
Set ......
我制作了个用户控件,需要动态加载到窗体上
Set objExt = Controls.Add("工程1.meActiveX", argName)
objExt.Visible = True
程序一次能加载N个, 现在想对某一个用户控件中的Text赋值,应该怎么做呢? 用 argName.Text1.Text=".." 会报错呢,请高手指点 ......
查看指定excel文件是否打开 如果打开 保存并关闭
出现的问题是:
如果打开文件后没有任何修改 可以正常操作
一旦有修改 就会出现不响应 但是在excel里任意地方点两下鼠标 就又会响应
这个是跨窗体的操作
如果是一个窗体 同样没有任何问题 请教
num是个字符串 文件名字的一部分
If IsFileOpened(A ......
VB如何隐藏多个文件,我用以下这段代码,有时候后能隐藏,有时候又不能隐藏,三个文件
Private Sub Command1_Click()
Dim fs, f, r
Set fs = CreateObject("Scripting.FileSystemObject")
  ......