（已解决，请结贴）数组表示有问题

feicuiboy · 发表于 2010-7-7 12:54:50

本帖最后由 feicuiboy 于 2010-7-7 16:01 编辑

貌似数组表示有问题，帮我看下。
问题出在 $dataA[$h]=GUICtrlRead($A[$h])
$datab[$h]=GUICtrlRead($b[$h])

这样的表示是有问题的，该如何表示呢

代码如下：

#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=..\..\..\..\..\..\..\3.study\3.1学习AU3\AU\Aut2Exe\Icons\bomb.ico
#AutoIt3Wrapper_outfile=D:\Personal\Desktop\777.exe
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <GuiTab.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ###
$Form1_1 = GUICreate("数据录入程序 ", 982, 642, 187, 116)
GUISetBkColor(0xA6CAF0)
$Edit2 = GUICtrlCreateEdit("", 0, 512, 417, 129)
$Button1 = GUICtrlCreateButton("录入数据库", 112, 480, 81, 25)
$Button2 = GUICtrlCreateButton("检查是否有错", 16, 480, 81, 25, 0)

$Tab1 = GUICtrlCreateTab(8, 8, 577, 417)


GUICtrlSetFont(-1, 12, 400, 0, "新宋体")
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)

;=========================================
$TabSheet1 = GUICtrlCreateTabItem("A尺寸")
$Group1 = GUICtrlCreateGroup("基本尺寸", 24, 48, 321, 369)
GUICtrlSetFont(-1, 10, 800, 0, "隶书")
$AA1= GUICtrlCreateLabel("A1", 24, 72, 52, 17)
$AA2 = GUICtrlCreateLabel("A2", 24, 104, 52, 17)
$AA3 = GUICtrlCreateLabel("A3", 24, 134, 52, 17)
$AA4 = GUICtrlCreateLabel("A4", 24, 164, 52, 17)
$AA5 = GUICtrlCreateLabel("A5", 24, 194, 52, 17)
$AA6 = GUICtrlCreateLabel("A6", 24, 224, 52, 17)
$AA7= GUICtrlCreateLabel("A7",184, 72, 52, 17)
$AA8 = GUICtrlCreateLabel("A8", 184, 104, 52, 17)
$AA9 = GUICtrlCreateLabel("A9", 184, 134, 52, 17)
$AA10 = GUICtrlCreateLabel("A10", 184, 164, 52, 17)
$AA11 = GUICtrlCreateLabel("A11", 184, 194, 52, 17)
$AA12 = GUICtrlCreateLabel("A12", 184, 224, 52, 17)
$A1 = GUICtrlCreateInput("", 88, 72, 89, 21)
$A2 = GUICtrlCreateInput("", 88, 104, 89, 21)
$A3 = GUICtrlCreateInput("", 88, 134, 89, 21)
$A4 = GUICtrlCreateInput("", 88, 164, 89, 21)
$A5 = GUICtrlCreateInput("", 88, 194, 89, 21)
$A6 = GUICtrlCreateInput("", 88, 224, 89, 21)
$A7 = GUICtrlCreateInput("", 248, 72, 89, 21)
$A8 = GUICtrlCreateInput("", 248, 104, 89, 21)
$A9 = GUICtrlCreateInput("", 248, 134, 89, 21)
$A10 = GUICtrlCreateInput("", 248, 164, 89, 21)
$A11 = GUICtrlCreateInput("", 248, 194, 89, 21)
$A12 = GUICtrlCreateInput("", 248, 224, 89, 21)

GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("上下差", 352, 48, 217, 369)
GUICtrlSetFont(-1, 10, 800, 0, "隶书")
$tolerA1=GUICtrlCreateInput("", 432, 72, 81, 21)
$tolerA2=GUICtrlCreateInput("", 432, 102, 81, 21)
$tolerA3=GUICtrlCreateInput("", 432, 135, 81, 21)
$tolerA4=GUICtrlCreateInput("", 432, 165, 81, 21)
$tolerA5=GUICtrlCreateInput("", 432, 195, 81, 21)
$tolerA6=GUICtrlCreateInput("", 432, 225, 81, 21)
$tolerA7=GUICtrlCreateInput("", 432, 255,81, 21)
$tolerA8=GUICtrlCreateInput("", 432, 285, 81, 21)
$tolerA9=GUICtrlCreateInput("", 432, 315, 81, 21)
$tolerA10=GUICtrlCreateInput("", 432, 345, 81, 21)
$tolerA11=GUICtrlCreateInput("", 432, 375, 81, 21)
$tolerA12=GUICtrlCreateInput("", 432, 405, 81, 21)





$AP1_1=GUICtrlCreateLabel("A1_1", 368, 72, 52, 25)
$AP2_1=GUICtrlCreateLabel("A2_1", 368, 104, 52, 26)
$AP3_1=GUICtrlCreateLabel("A3_1", 368, 135, 52, 27)
$AP4_1P=GUICtrlCreateLabel("A4_1", 368, 165, 52, 28)
$A5_1P=GUICtrlCreateLabel("A5_1", 368, 195, 52, 29)
$A6_1P=GUICtrlCreateLabel("A6_1", 368, 225, 52, 30)
$A7_1P=GUICtrlCreateLabel("A7_1", 368, 255, 52, 31)
$A8_1P=GUICtrlCreateLabel("A8_1", 368, 285, 52, 32)
$A9_9P=GUICtrlCreateLabel("A9_1", 368, 315, 52, 33)
$A10_1P=GUICtrlCreateLabel("A10_1", 368, 345, 52, 34)
$A11_1P=GUICtrlCreateLabel("A11_1", 368,375, 52, 35)
$A12_1P=GUICtrlCreateLabel("A12_1", 368, 405, 52, 36)
GUICtrlCreateGroup("", -99, -99, 1, 1)

;=====================================================================
$TabSheet2 = GUICtrlCreateTabItem("B尺寸")

$Group3= GUICtrlCreateGroup("基本尺寸", 24, 48, 321, 369)
GUICtrlSetFont(-1, 10, 800, 0, "隶书")
$Labe1l1= GUICtrlCreateLabel("B1", 24, 72, 52, 17)
$Label12 = GUICtrlCreateLabel("B2", 24, 104, 52, 17)
$Label13 = GUICtrlCreateLabel("B3", 24, 134, 52, 17)
$Label14 = GUICtrlCreateLabel("B4", 24, 164, 52, 17)
$Label15 = GUICtrlCreateLabel("B5", 24, 194, 52, 17)
$Label16 = GUICtrlCreateLabel("B6", 24, 224, 52, 17)
$Labe117= GUICtrlCreateLabel("B7",184, 72, 52, 17)
$Labe118 = GUICtrlCreateLabel("B8", 184, 104, 52, 17)
$Labe119 = GUICtrlCreateLabel("B9", 184, 134, 52, 17)
$Labe1110 = GUICtrlCreateLabel("B10", 184, 164, 52, 17)
$Labe1111 = GUICtrlCreateLabel("B11", 184, 194, 52, 17)
$Labe1112 = GUICtrlCreateLabel("B12", 184, 224, 52, 17)

$B1= GUICtrlCreateInput("", 88, 72, 89, 21)
$B2= GUICtrlCreateInput("", 88, 104, 89, 21)
$B3= GUICtrlCreateInput("", 88, 134, 89, 21)
$B4= GUICtrlCreateInput("", 88, 164, 89, 21)
$B5= GUICtrlCreateInput("", 88, 194, 89, 21)
$B6= GUICtrlCreateInput("", 88, 224, 89, 21)
$B7= GUICtrlCreateInput("", 248, 72, 89, 21)
$B8= GUICtrlCreateInput("", 248, 104, 89, 21)
$B9= GUICtrlCreateInput("", 248, 134, 89, 21)
$B10= GUICtrlCreateInput("", 248, 164, 89, 21)
$B11= GUICtrlCreateInput("", 248, 194, 89, 21)
$B12= GUICtrlCreateInput("", 248, 224, 89, 21)



GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group4 = GUICtrlCreateGroup("上下差", 352, 48, 217, 369)
GUICtrlSetFont(-1, 10, 800, 0, "隶书")

$tolerB1=GUICtrlCreateInput("", 432, 72, 81, 21)
$tolerB2=GUICtrlCreateInput("", 432, 102, 81, 21)
$tolerB3=GUICtrlCreateInput("", 432, 135, 81, 21)
$tolerB4=GUICtrlCreateInput("", 432, 165, 81, 21)
$tolerB5=GUICtrlCreateInput("", 432, 195, 81, 21)
$tolerB6=GUICtrlCreateInput("", 432, 225, 81, 21)
$tolerB7=GUICtrlCreateInput("", 432, 255,81, 21)
$tolerB8=GUICtrlCreateInput("", 432, 285, 81, 21)
$tolerB9=GUICtrlCreateInput("", 432, 315, 81, 21)
$tolerB10=GUICtrlCreateInput("", 432, 345, 81, 21)
$tolerB11=GUICtrlCreateInput("", 432, 375, 81, 21)
$tolerB12=GUICtrlCreateInput("", 432, 405, 81, 21)



$MM_1=GUICtrlCreateLabel("B1_1", 368, 72, 52, 25)
$MM_2=GUICtrlCreateLabel("B2_1", 368, 104, 52, 26)
$MM_3=GUICtrlCreateLabel("B3_1", 368, 135, 52, 27)
$MM_4=GUICtrlCreateLabel("B4_1", 368, 165, 52, 28)
$MM_5=GUICtrlCreateLabel("B5_1", 368, 195, 52, 29)
$MM_6=GUICtrlCreateLabel("B6_1", 368, 225, 52, 30)
$MM_7=GUICtrlCreateLabel("B7_1", 368, 255, 52, 31)
$MM_8=GUICtrlCreateLabel("B8_1", 368, 285, 52, 32)
$MM_9=GUICtrlCreateLabel("B9_1", 368, 315, 52, 33)
$MM_10=GUICtrlCreateLabel("B10_1", 368, 345, 52, 34)
$MM_11=GUICtrlCreateLabel("B11_1", 368,375, 52, 35)
$MM_12=GUICtrlCreateLabel("B12_1", 368, 405, 52, 36)

GUICtrlCreateGroup("", -99, -99, 1, 1)









$TabSheet3 = GUICtrlCreateTabItem("C尺寸")
$Group5= GUICtrlCreateGroup("基本尺寸", 24, 48, 321, 369)
GUICtrlSetFont(-1, 10, 800, 0, "隶书")
$xl1= GUICtrlCreateLabel("C1", 24, 72, 52, 17)
$xl2 = GUICtrlCreateLabel("C2", 24, 104, 52, 17)
$xl3 = GUICtrlCreateLabel("C3", 24, 134, 52, 17)
$xl4 = GUICtrlCreateLabel("C4", 24, 164, 52, 17)
$xl5 = GUICtrlCreateLabel("C5", 24, 194, 52, 17)
$xl6 = GUICtrlCreateLabel("C6", 24, 224, 52, 17)
$xl7= GUICtrlCreateLabel("C7",184, 72, 52, 17)
$xl8 = GUICtrlCreateLabel("C8", 184, 104, 52, 17)
$xl9 = GUICtrlCreateLabel("C9", 184, 134, 52, 17)
$xl10 = GUICtrlCreateLabel("C10", 184, 164, 52, 17)
$xl11 = GUICtrlCreateLabel("C11", 184, 194, 52, 17)
$xl12 = GUICtrlCreateLabel("C12", 184, 224, 52, 17)

$C1= GUICtrlCreateInput("", 88, 72, 89, 21)
$C2= GUICtrlCreateInput("", 88, 104, 89, 21)
$C3= GUICtrlCreateInput("", 88, 134, 89, 21)
$C4= GUICtrlCreateInput("", 88, 164, 89, 21)
$C5= GUICtrlCreateInput("", 88, 194, 89, 21)
$C6= GUICtrlCreateInput("", 88, 224, 89, 21)
$C7= GUICtrlCreateInput("", 248, 72, 89, 21)
$C8= GUICtrlCreateInput("", 248, 104, 89, 21)
$C9= GUICtrlCreateInput("", 248, 134, 89, 21)
$C10= GUICtrlCreateInput("", 248, 164, 89, 21)
$C11= GUICtrlCreateInput("", 248, 194, 89, 21)
$C12= GUICtrlCreateInput("", 248, 224, 89, 21)


GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group6 = GUICtrlCreateGroup("上下差", 352, 48, 217, 369)
GUICtrlSetFont(-1, 10, 800, 0, "隶书")
$tolerC1=GUICtrlCreateInput("", 432, 72, 81, 21)
$tolerC2=GUICtrlCreateInput("", 432, 102, 81, 21)
$tolerC3=GUICtrlCreateInput("", 432, 135, 81, 21)
$tolerC4=GUICtrlCreateInput("", 432, 165, 81, 21)
$tolerC5=GUICtrlCreateInput("", 432, 195, 81, 21)
$tolerC6=GUICtrlCreateInput("", 432, 225, 81, 21)
$tolerC7=GUICtrlCreateInput("", 432, 255,81, 21)
$tolerC8=GUICtrlCreateInput("", 432, 285, 81, 21)
$tolerC9=GUICtrlCreateInput("", 432, 315, 81, 21)
$tolerC10=GUICtrlCreateInput("", 432, 345, 81, 21)
$tolerC11=GUICtrlCreateInput("", 432, 375, 81, 21)
$tolerC12=GUICtrlCreateInput("", 432, 405, 81, 21)




$MMM_1=GUICtrlCreateLabel("C1_1", 368, 72, 52, 25)
$MMM_2=GUICtrlCreateLabel("C2_1", 368, 104, 52, 26)
$MMM_3=GUICtrlCreateLabel("C3_1", 368, 135, 52, 27)
$MMM_4=GUICtrlCreateLabel("C4_1", 368, 165, 52, 28)
$MMM_5=GUICtrlCreateLabel("C5_1", 368, 195, 52, 29)
$MMM_6=GUICtrlCreateLabel("C6_1", 368, 225, 52, 30)
$MMM_7=GUICtrlCreateLabel("C7_1", 368, 255, 52, 31)
$MMM_8=GUICtrlCreateLabel("C8_1", 368, 285, 52, 32)
$MMM_9=GUICtrlCreateLabel("C9_1", 368, 315, 52, 33)
$MMM_10=GUICtrlCreateLabel("C10_1", 368, 345, 52, 34)
$MMM_11=GUICtrlCreateLabel("C11_1", 368,375, 52, 35)
$MMM_12=GUICtrlCreateLabel("C12_1", 368, 405, 52, 36)

GUICtrlCreateGroup("", -99, -99, 1, 1)

$TabSheet4 = GUICtrlCreateTabItem("配置说明")
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
                                        case $Button2
                                                 read()
EndSwitch
WEnd




dim    $h,$dataA[15],,$datab[15],,$datac[15],$tolerA[15],$tolerb[15],$tolerc[15]
FUNC read()
FOR $h=1 TO 12  ;读取数值
        $dataA[$h]=GUICtrlRead($A[$h])
        $datab[$h]=GUICtrlRead($b[$h])
        $datac[$h]=GUICtrlRead($c[$h])
        $tolerA[$h]=GUICtrlRead($tolerA[$h])
        $tolerB[$h]=GUICtrlRead($tolerB[$h])
        $tolerC[$h]=GUICtrlRead($tolerC[$h])
Next
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
if $dataA[1]="" then $dataa[1]="空白" 
if $datab[1]="" then $datab[1]="空白" 
if $datac[1]="" then $datac[1]="空白" 
if $tolerA[1]="" then $tolerA[1]="空白" 
if $tolerb[1]="" then $tolerb[1]="空白" 
if $tolerc[1]="" then $tolerc[1]="空白" 
  $TOTAL_A_=$data_A[1]
  $TOTAL_b_=$data_b[1]
  $TOTAL_c_=$data_c[1]
  $TOTAL_toler_A=$data_toler_A[1]
  $TOTAL_toler_B=$data_toler_B[1]
  $TOTAL_toler_C=$data_toler_C[1]

FOR $X=2 TO 12
  If $data_A[$X]="" THEN $data_A[$X]="空白"   
  If $data_B[$X]="" THEN $data_B[$X]="空白" 
  If $data_C[$X]="" THEN $data_C[$X]="空白" 
  If $data_toler_A[$X]="" THEN $data_toler_A[$X]="空白" 
  If $data_toler_B[$X]="" THEN $data_toler_B[$X]="空白" 
  If $data_toler_C[$X]="" THEN $data_toler_C[$X]="空白" 
    
$TOTAL_A&="|"&$data_A[$X]
$TOTAL_B&="|"&$data_B[$X]
$TOTAL_C&="|"&$data_C[$X]
$TOTAL_toler_A&="|"&$data_toler_A[$X]
$TOTAL_toler_B&="|"&$data_toler_B[$X]
$TOTAL_toler_C&="|"&$data_toler_C[$X]
Next
;;;;;;;;;;;;;;;;;;;;;读取总数;;;;;;;;;;;;;;;;;;;;;;
$total=$TOTAL_A&"|"&$TOTAL_toler_A&$TOTAL_b&"|"&$TOTAL_toler_b&$TOTAL_c&"|"&$TOTAL_toler_c
msgbox(0,"",$total)
EndFunc

afan · 发表于 2010-7-7 13:04:27

将 246行移到主循环前面
另外，249行后面的$A之类的并不是数组
问题比较多，需自己慢慢改之

feicuiboy · 发表于 2010-7-7 13:48:13

回复 2# afan
抛开这个问题，
假如不是数组，比如用循环表示 $A1,$A2,$A3这样的变量的话，怎样递增表达变量$Ai

for $i =1 to 4
$A&$i= （这里怎么写）

next

afan · 发表于 2010-7-7 13:52:00

本帖最后由 afan 于 2010-7-7 13:55 编辑

Eval('A' & $i)

afan · 发表于 2010-7-7 13:56:08

$A1 = 'aaa1'
$A2 = 'aaa2'
$A3 = 'aaa3'
$A4 = 'aaa4'

for $i =1 to 4
        Msgbox(0, 0, Eval('A' & $i))
next

feicuiboy · 发表于 2010-7-7 16:00:21

afan无所不能。。。困扰的问题一下解决了。。谢谢啦

afan · 发表于 2010-7-7 16:09:04

回复 6# feicuiboy

_ _ || 能解决的极其有限……

zcx880517 · 发表于 2010-7-9 08:10:00

回复 7# afan

这还叫有限啊，，你总是出现在第一时间，，

jinyue115 · 发表于 2010-7-22 23:09:48

支持顶起好样的

		自动登录	找回密码
密码			加入

[AU3基础] （已解决，请结贴）数组表示有问题

本帖子中包含更多资源

评分

评分