你是没选择你要改颜色的按钮，而是误选择了窗体吧
Private Sub Command1_Click()Label1.Caption = Date & " " & TimeCommand2.Visible = TrueEnd SubPrivate Sub Command2_Click()Unload MeEnd SubPrivat...
简单,定义一下图片的两个属性height(高度)和width(宽度),例如 单击“变大”按钮,图片.height = 图片.height + 90 图片.width = 图片.width + 90 . 就放大了. 如果想单击一次放大一次,可以 ...... +90x, ..........
定义一个静态变量 static?a? 点一下，a=a 1 if?a=11?then?command1.enable=false
自己画一个吧,然后在属性栏里面,把原来的Caption=Command1改成Cmd1就可以了. Private Sub Command1_Click() Command1.Visible = False End Sub
利用VB提供的shell函数调用word，例如： Private Sub command1_click() x = Shell("C:\Program Files\Microsoft Office\OFFICE11\winword.exe", 1) End Sub 要注意的是，写对winword文件...
你再详细的描述一下吧！！！！！
最大化和最小化都会导致以下事件： Form_Resize 然后你再用WindowState 来判是否是正常大小。
回答你的问题 第一个 Private sub Command1_Click() dim x x=shell("calc.exe") End Sub 第二个： Private sub Command1_Click() dim x x=Shell("C:\Program Files\Internet E...
基于三种基本结构写，一般编程都这样，用结构控制程序运行的流程
比如有3个按钮，1，2，3，3在1，2之间。 取得1按钮的右边位置，left属性+width属性，2按钮的左位置，就是left属性。 再定位3的left就可以了。 Dim a Private Sub Command2_Click() Timer1.Enabled = True End Sub Pri...
比如有3个按钮，1，2，3，3在1，2之间。 取得1按钮的右边位置，left属性+width属性，2按钮的左位置，就是left属性。 再定位3的left就可以了。 Dim a Private Sub Command2_Click() Timer1.Enabled = True End Sub Pri...
比如有3个按钮，1，2，3，3在1，2之间。 取得1按钮的右边位置，left属性+width属性，2按钮的左位置，就是left属性。 再定位3的left就可以了。 Dim a Private Sub Command2_Click() Timer1.Enabled = True End Sub Pri...
