99问答网
所有问题
当前搜索:
vb数组控件使用方法
VB
传递整个
控件数组
的问题
答:
Private Sub ImageCommandMove(ByRef img As Object, ByRef images As Object)Dim i As Integer Dim j As Integer For j = 0 To images.count - 1 If images(i) = img Then img.Picture = LoadPicture(App.Path & "\scro_" & i & "_on.jpg")Else images(i).Picture = LoadPicture(...
VB中
的
控件数组
是由什么构成的
答:
顾名思义,控件数组就是由多个同类控件组成的组合。比如下面虽然都是文本框控件,但它们都是互不相关的单个控件:Text1、Text2、Text3、Text4……如果把它们都改名为Text1,Index属性分别改为0、1、2、3……,就变成控件数组了:Text1(0)、Text1(1)、Text1(2)、Text1(3)……
使用控件数组
的...
关于
VB控件数组
的一点小问题
答:
看这个合不合你的意:Private Sub Picture1_Click(Index As Integer)Dim i As Integer For i = 0 To Picture1.UBound If i <> Index Then Picture1(i).BorderStyle = 1 Picture1(i).BackColor = &H8000000F Shape1(i).BorderColor =
vb
Black Else Picture1(i).BorderStyle = 0 Picture...
关于
VB中
的括号是什么意思?
答:
可以这么理解 里面有参数 表示输入的参数 里面是空 表示输入的参数没有,就是表示没有参数 private sub form_load() 这个表示窗体载入事件,是个过程,是不需要提供参数的,所以是空的。private sub command_click(index as integer) 这个表示你创建了一个按钮
控件数组
,表示同样名字的按钮控件很多,那么...
VB中
Unload语句的
使用方法
及作用
答:
VB使用
Unload 语句来卸载 Form 对象或控件。其语法:Unload objectobject 所在处是要卸载的 Form 对象或
控件数组
元素的名称。只有在运行时添加到窗体上的控件数组元素才能用 Unload 语句卸载。重新加载被卸载的控件时,其属性会被重新初始化。例Unload 语句来卸载 Form :Private Sub Form_Click ()Dim ...
VB
如何保存文本框
数组控件
的内容
答:
Private Sub Form_Load()For e = 0 To 299 Text1(e).Text = GetSetting(App.Title, "Text1", "Text" & e, "")doevents Next End Sub Private Sub Command1_Click()'保存 For e = 0 To 299 SaveSetting App.Title, "Text1", "Text" & e, Text1(e).Text DoEvents Next End ...
VB
6.0未找到
方法
或数据成员 下面是代码
答:
如果定义模块级变量则将 Dim m As Integer Dim f As Integer 定义在所有代码之前,如果是局部变量,则将其定义在过程或函数首行。而你讲上两句定义在load事件中,则在text1的change事件中就无法
使用
上面的两个变量。而text1是一个
数组控件
,所以你在text1_change(index as integer)的过程中m=Cint(...
Vs 2012(Basic)中,如何创建
控件数组
。(TextBox数组)
答:
没有index属性了,
VB
.net的改变很大,1楼的答案就是最接近楼主的要求,我再补充一下完整
的用法
,比如每个textbox如何返回事件,这段代码直接复制到窗体代码中,可以调试运行。注意代码实际创建了21个文本框,VB.net现在也不支持
数组
下标自己定义起始值,如果只要20个,可以放弃第一个,保持1到20的下标,...
VB 数组
添加的问题
答:
Private Sub Commandy_Click()Dim h As LongIf Text1y(Text1y.UBound).Text <> "0" Or Text2y(Text2y.UBound).Text <> "0" Then If Text1y.UBound = 9 Then Unload Text1y(9) If Text2y.UBound = 9 Then Unload Text2y(9) If Label3y.UBound = 9 Then Unload Label3y...
vb
WithEvents声明
控件数组
答:
使用
withevents应注意下面的限制条件:1、withevents不能派生对象变量 2、不能把withevents变量声明为 as new 【【【3 、不能用withevents创建变量
数组
!!】】】看来你只能一个一个的声明了!!
棣栭〉
<涓婁竴椤
8
9
10
11
13
14
15
16
17
涓嬩竴椤
12
灏鹃〉
其他人还搜