11问答网
所有问题
当前搜索:
VB6定义几个数的数组
VB6
多个窗体怎样共用一
个数组
?
答:
窗体内的变量数组是本窗体的全局数组 别的窗体是无法被调用的 既然,你需要变量被不同的窗体复用!那么你就应该想到 模块啊 建立模块 声明
个数组
级变量 你就可以调用了
在一个数组中找出比第一
个数组
元素的值大的所有数组元素中值最小的元素...
答:
楼上的代码中有一些小问题,应做如下修改方可正确运行:在
vb6的
默认窗体form1中画一个命令按钮command1和一个文本框text1,一切默认;将以下修改过的代码复制到form1的代码框中运行即可(本代码不包括等于 a(0)的数)。Private Sub Command1_Click()Form1.Cls: Form1.AutoRedraw = True Dim a(0...
vb 让一个
数组
合成高4位,低4位的 形式
答:
a=right("0000" & "6a2",4)b=right("0000" & "5b",4)c="&H" & a & b 虽然笨了点儿,但这方法比较可靠。例如坐标为x,y a=right("0000" & hex(x),4)b=right("0000" & hex(y),4)c="&H" & a & b 就行了,对于x,y的提取,用len判断长度,然后mid方式安位取数,...
一个
VB
.net的菜鸟问题
答:
UniCode = "W"c ASCIICode = "W"【3】花括号为初始一个新数组时的语法,括号中可以用逗号分隔开数组的初始值。对比:
VB6
:Dim k() As String k = Array("a","b","c")VB.net:Dim k As String(){"a","b","c"} 而数组作为参数传递时,在过程的一开始就
定义
一个传递用
的数组
是很...
VB6
.0自
定义
过程如何传递对象参数?
答:
Private Sub txtXXXX(txtOBJ As Object, Index As Integer, KeyAscii As Integer)If KeyAscii = 13 Then n = txtOBJ.Count i = (Index + 1) Mod n txtOBJ(i).SetFocus txtOBJ(i).SelStart = 0 txtOBJ(i).SelLength = Len(txtOBJ(i).Text)End If End Sub Private Sub txtA_Key...
VB6
.0
定义
变量的问题
答:
因为涉及中文,中文码是8bit双字节码。要用 unsigned char 或 TCHAR 型 字符
数组
。TCHAR 有对应 的 _tscanf 等函数。中文码 有 unicode endian,UTF-*,GB,BIG5 等不同编码,查找时要转换。(有许多工作量)没问题,但是……最好别用!根据编程规则:不要用拼音命名变量,更不要用起汉字,用汉字...
VB6
判断输入的
数字
是否为
数组
中的某个元素值
答:
先判断输入是否为
数字
:text1=trim(text1) '去除空格if isnumeric(text1)=False then exit sub '不是数字结束然后与
数组
的所有值比较,看是否相同即可。'SZ 数组名称For i= 0 to Ubound(SZ) '循环所有数组if SZ(i)=Cstr(text1) then '比较是否相同Msgbox "数组中有相同值" & Text1 '相同...
VB6
.0 列表框列表项的分类移动
答:
MsgBox "请选中一个球员"End If End Sub Private Sub Command2_Click()Dim s As String If List2.ListIndex <> -1 Then s = List2.List(List2.ListIndex)List2.RemoveItem List2.ListIndex List1.AddItem s End If End Sub Private Sub Form_Load()Command1.Caption = "从LIST1移动到...
vb6
把字符串改为字节
数组
答:
在字符串前加"&H"再转换为数值即可按16进制进行转换.如:Text1.Text = "123456"Msgbox CLng("&H" & Text1.Text)
VB6
怎样把大string
数组
连在一个字符窜中
答:
用&符,字符串的连接,
数组
的话,最多用上循环语句 dim s as string for i=0 to 数组下标 s=s & 数组(i)next
棣栭〉
<涓婁竴椤
6
7
8
9
11
12
13
14
10
15
涓嬩竴椤
灏鹃〉
其他人还搜