A. vb中如何一次性输入大量数据并把这些数据依次赋给数组
2种方法
1.
直接赋值,此法只适合和小数组
dim
myarray()
as
integer
={1,2,3,4,5}
或铅握dim
myarray(5)as
integer
myarray(0)=1
myarray(1)=2
myarray(2)=3
myarray(3)=3
myarray(4)=5
myarray(5)=6
2.最常用的for
next循环赋值
dim
myarray()as
integer
for
intcount
as
integer=
0
to
5
myarray(intcount)=你要赋值的东西
next
如果你要禅激改每个都不同那就贺判这样:
dim
myarray()as
integer
dim
fu
as
integer
for
fu
as
0
to
5
for
intcount
as
integer=
0
to
5
myarray(intcount)=fu
next
intcount
next
fu
B. 如何在vb中输入大量数据
窗体上放一个文本框TEXT1用来输入需要输入几个(x,y)
一个命令按钮
再放一个文本框TEXT2。Index属性设为0,Visible设为False
在按钮添加Command1_Click()事件,输入命令。
On Error GoTo a
Dim b As Integer
b = 1
Do
Unload Text2(b)
b = b + 1
Loop
a:
For i = 1 To Text1.Text
Load Text2(i)
Text2(i).Left = Text2(0).Left
Text2(i).Top = Text2(i - 1).Top + Text2(0).Height
Text2(i).Text = "Text" & i
Text2(i).Visible = True
Next i
问题解决,不过要注意你的窗体是否能显示全部文本框。而且要是多次点击按此知中钮的话,需猛御要森山在加载TEXT控件前先把已加载的控件UnLoad掉。另外控件最多加载32767个,要不就是32766个,不是因为前面b定义为Integer,而是控件最多加载那么多。好象是MSDN说的,我试的时候到9800多的时候就报错了,哈哈
C. VB中数据输入有哪几种方法
这个就不用变量了,直接用text1.text就可橡宽以了,例谈弯如:
data1.refresh
data1.recordsource="select * from 表名 where name=" & "'" text1.text & "'"
其中表名是access中表含如闷,name是字段.
D. 怎么在VB中的一个按钮中实现,按一下按钮然后输入一批数据
可以用InputBox实现数物逗薯据的输入,输入时用","隔指灶开,用Split函数将输入分隔成字罩者符数组
那你可以设一个全局变量,每按一次加1,这样行号就有了。
E. 各位大虾: 在VB中怎样实现DataGrid中数据的批量录入,即可以录入多行后一次提交
可以啊,你直接用循环语句调用数据库里的数据来实现录宴衫入啊,包括删除及新增都可以实现,我喊祥祥以前用VB做过程序的,就经常使用郑搏DataGrid控件。
F. VB怎么 输入一连窜数据
多用几个text 控件,输入起来能简单一点。
G. vb中怎样实现一次向数据库中添加多条记录
通过ADO技术对数据库进行操作
例子如下(定义连接串与记录集和打开连接串忽略):
rs1.open "select * from 课程 inner join 成绩 inner join 班级 inner join 学生 on (关系条件) where 1=2",conn,3,2,-1'用静态集悲观锁打开记录集,用空集来添加记录
然后通过逗rs("字段名称")=要赋予字段的值地来赋予相关的值,如果要添加多条,那么使用条件循环,直到循环结束,在循环体结束的地方加上逗rs.movenext地即可
H. 如何在vb中输入大量数据
可以这样让用户在一个文本框中输入:
(1,1)|(2,1)|(3,7)
这样的以某个分隔符分开的喊烂数据,然后郑磨漏再用split和for...next得到你游配想要的数据。