77问答网
所有问题
当前搜索:
vb把数据读入数组
vb
的一道题目,怎样把一个
数组
的
数据
存入到另一个数组。
答:
Private Sub Form_Click() Dim a%(), c$(), i%, j%, S$, temp$, w$, y$ Print "国家" & Space(16) & "首都" w = "=" y = String(40, w) Print y S = "中国:北京,日本:东京,俄罗斯:莫斯科,印度尼西亚:雅加达,丹麦:哥本哈根,瑞典:斯德哥尔摩,...
vb
怎么把1至1000内的素数放到
数组
内
答:
'运行效果如上,代码如下所示。'逐行手敲,亲测可用。Private Sub Command1_Click() Dim Inversion As Integer Dim arr(1000) As Integer Dim k, a As Integer k = 1 For i = 1 To 1000 If IsPrimeNumber(i) Then arr(k) = i '
将
1000以内的素数放入
数组
k = k + ...
VB
中怎么将文本框中的内容写入
数组
中
答:
……如果你的几个文本框是控件
数组
,就更好办了,比如有6个文本框且为控件数组,则可以 For i=1 to 6 A(i)=Text(i).text next i 如果你只有一个文本框,想输如一个数字点下 按钮,然后加入数组,加个文本框和命令按钮,然后 Dim a(1 To 5)'这个你需要自己定义大小,否则
数据
超过5个就...
vb
中如何对
数组
中的
数据
进行访问
答:
知道确切位置的话就用mid(chr(2),2,1)可以了 不知道B在第几个位置的话mid(chr(2),instr(chr(2),"B"),1)
VB
中怎样将新添元素加入
数组
答:
例如
数组
1到7位置存有数,要插入元素到数组第5个位置,先把第7个,第6个,第5个依次后移1个位置,然后把要新添的元素赋到数组第5个位置。
怎么把文本框中的内容赋给
数组
VB
答:
首先要确定,文本框里输入的一串字符,
数据
之间要用固定的、相同的分隔符隔开,否则一切免谈。比方说用逗号分开(要注意逗号也分全角和半角的,不能混用):dim s()as string s = split(text1.text,",")
vb
如何把excel一列的值赋给
数组
答:
ReDim cellxd(1 To 200)For i = 1 To 200 cellxd(i) = xlSheet.Cells(i, 1)Next xlBook.Close (True)xlApp.Quit Set xlBook = Nothing Set xlBook = Nothing Set xlApp = Nothing '释放xlApp对象 MsgBox "已经把第1列的值赋给
数组
!", vbInformation, "提示"Unload Me End Sub ...
vb 将
记录集赋给一个
数组
答:
定义class 成员属性分别为字段名称 然后保存到该类的
数组
中即可。'定义存储的结构体 Type ff f1 As String f2 As String f3 As String f4 As String End Type '以下是实现的主要功能代码 Dim count As Long While Not rs.EOF count = count + 1 rs.MoveNext Wend rs.MoveFirst Dim allRs(...
VB
如何把ACCESS
数据
库中的记录给
数组
啊
答:
rs.MoveLast For j = rs.RecordCount To 1 step -1 rs.MovePrevious daozhan(j) = rs.Fields(2)liangshu(j) = rs.Fields(5)Next
VB
中怎么把多个textbox里面的
数值
存放到一个
数组
中
答:
用3个控件
数组
吧 Private Sub Command1_Click()Dim x(0 To 7), y(0 To 7), z(0 To 7)For i = 0 To 7 x(i) = Text1(i)Next For i = 0 To 7 y(i) = Text2(i)Next For i = 0 To 7 z(i) = Text3(i)Next End Sub ...
棣栭〉
<涓婁竴椤
2
3
4
5
6
7
8
9
10
11
涓嬩竴椤
灏鹃〉
其他人还搜