11问答网
所有问题
当前搜索:
窗体中有命令按钮command1
VB中本窗口如何调用其它窗口,请大家帮忙
答:
你的调用方法,zhichi确实没有定义,这样名为ai的
窗体
必须在你的程序中存在才行。要从Form1调用名为Form2的窗体,可用以下两种方法:form2.show form2.sho2
1
第
一
种方法调用成功后,用户可以自由操作Form1和Form2窗体,关闭Form2后自动回到Fomr1 第二种方法调用成功后,用户不能再操作Fomr1,必须...
vb 实现获得
窗体
名
答:
他们都好麻烦!你只是需要获取窗体名字而已是吧?很简单'在模块中添加下面的API函数Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long 然后在FORM
1窗体
添加个
command按钮
和label标签Private Sub
Command1
_Click(...
...
1
、(1)新建
一
个“标准EXE工程”。(2)向
窗体
添加一个TextBox控件,更改...
答:
1,打开vb ,选择 标准exe工程 创建 2,打开工具箱,选中textbox,鼠标指针变为十字,在
窗体
上拖拽画出文本框,大小可调整 3,在工具箱中选中commandbox,鼠标指针变为十字,在窗体上画出
命令按钮
,大小可调 点击命令按钮,按F4调出属性页,第一项,名称默认
command1
,改为cmdshow。找到 caption 项...
VB中当先点击
command1
后,弹出msgbox,当msgbox关闭后,点击command2,关闭f...
答:
'定义
窗体
级全局x,用来描述三种状态'起始状态 x = 0 ,两个
按钮
都没有点过'x=1 点过
command1
'x=2 点过command2Dim x As IntegerPrivate Sub
Command1
_Click()'点击command1判断一下点击前的状态 If x = 0 Then MsgBox "先点command1" End If x = 1End SubPrivate Sub...
VB中怎样单击
按钮
出现一个图片
答:
用vb编写一个点击
按钮
随机出现一张图片的软件,例如:
窗体
上一个picture1和
command1
的控件。1、有四张图片,他们的后缀名不相同,用户可以问这样写:Dim a$(3)Private Sub Form_Load()Randomize a(0) = "D:\xuexi.gif"a(1) = "D:\002.jpg"a(2) = "D:\房子.png"a(3) = "D:\4....
在VB中
command按钮
的作用是什么?
答:
一、
Command
Button 的主要属性:1、Cancel(取消)属性:当一个按钮的 Cancel 属性设置为 True 时,按 ESC 键与单击此
命令按钮
的作用相同,因此,这个命令按钮被称为取消按钮。在一个
窗体中
,只允许一个命令按钮的 Cancel 属性为 True 。2、Default(默认)属性:当一个按钮的 Default 属性设置为 True...
...林按钮,程序运行后,在文本框输入1后,单击
命令按钮
,标签文本框消失...
答:
窗体
Form1 文本框 Text1 标签 Lable1
命令按钮 Command1
Private Sub Command1_Click()If Text1.Text = "1" Then Lable1.Visible = False Form1.Print Text1.Text End If End Sub
VB中如何实现文本查找功能?
答:
下面举例说明:放置一个文本框TEXT1供用户输入文本或调入文本文件,用来做在其中查找文本的验证,放置另一个文本框TEXT2供用户输入要查找的字符串,放置两个
命令按钮
,
Command1
、Command2,其标题分别为“查找”、“查找下一个”。在
窗体
的总体声明部分写如下代码 :Option Explicit '定义目标位置变量 Priva...
如何在VB中打开一个记事本窗口并获取窗口句柄,向其中发送富文本框中的...
答:
1.新建三个
命令按钮Command1
命名“写字”,Command1命名“禁用”,Command1命名“关闭”;2.在
窗体
写下如下代码:Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Function FindWindowEx Lib...
在
一
个数组中找出比第一个数组元素的值大的所有数组元素中值最小的元素...
答:
楼上的代码中有一些小问题,应做如下修改方可正确运行:在vb6的默认
窗体
form1中画一个
命令按钮command1
和一个文本框text1,一切默认;将以下修改过的代码复制到form1的代码框中运行即可(本代码不包括等于 a(0)的数)。Private Sub Command1_Click()Form1.Cls: Form1.AutoRedraw = True Dim a(0...
棣栭〉
<涓婁竴椤
2
3
4
5
6
7
8
9
10
11
涓嬩竴椤
灏鹃〉
其他人还搜