tcpuuu 发表于 2012-1-22 13:32:52

[已解决]求助大家 數值分割 分別寫入 3個框內 該如何?

本帖最后由 tcpuuu 于 2012-1-24 21:26 编辑



7123.7526.5236(這個點 是 數字鍵0 旁邊那個.)
輸入之後 按 1BUTTER
第一個 . 左邊4位數 寫入底下第1個框
第二......................
第三................................
不是都固定4位數
例如:721.5236554.32655
也可變成
721    5236554   32655GUICreate('EDIE',400,300)      
$A1 = GUICtrlCreateInput("",5,5,220,23)
$A2 = GUICtrlCreateInput("",5,30,50,23)
$A3 = GUICtrlCreateInput("",70,30,50,23)
$A4 = GUICtrlCreateInput("",135,30,50,23)

For $i = $A1 to $A4
GUICtrlSetFont($i,12)
Next

$1But= GUICtrlCreateButton("輸入數值",280,4,66,30)

GUISetState()
While 1

      $msg = GUIGetMsg()
      Switch $msg
                Case -3
                        Exit


Case $1But



EndSwitch
WEnd

lpxx 发表于 2012-1-22 15:50:35

是这样？

                Case $1But
                        $p = StringSplit(GUICtrlRead($A1), Chr(46), 1)
                        GUICtrlSetData($A2, $p)
                        GUICtrlSetData($A3, $p)
                        GUICtrlSetData($A4, $p)
        EndSwitch

tcpuuu 发表于 2012-1-22 16:27:36

本帖最后由 tcpuuu 于 2012-1-22 16:33 编辑

謝謝LPXX我的問題 已解決

高手真多

請問
$p = StringSplit(GUICtrlRead($A1), Chr(46), 1)
Chr(46), 1 是什麼意思
取4~6位數 ?   1是?

user3000 发表于 2012-1-22 16:32:03

謝謝LPXX我的問題 已解決

高手真多
tcpuuu 发表于 2012-1-22 16:27 http://www.autoitx.com/images/common/back.gif

唉, 其实是你.....还太菜啊, 大哥!
看你注册时间, 跟你水平一比... 惨不忍睹!

tcpuuu 发表于 2012-1-22 17:35:16

再請教一下.....

IF   $A1框裡沒有2個點THEN
MsgBox(48,"","尚未輸入或格式錯誤",3)
ELSE
$p = StringSplit(GUICtrlRead($A1), Chr(46), 1)
                        GUICtrlSetData($A2, $p)
                        GUICtrlSetData($A3, $p)
                        GUICtrlSetData($A4, $p)
ENDIF
=======================================
以上這段 該如何敘述?

user3000 发表于 2012-1-22 17:55:09

再請教一下.....

IF   $A1框裡沒有2個點THEN
MsgBox(48,"","尚未輸入或格式錯誤",3)
ELSE
$p = Str ...
tcpuuu 发表于 2012-1-22 17:35 http://www.autoitx.com/images/common/back.gif


    If not StringInStr(GuiCtrlRead($A1), '.', 0, 2) Then ; 保证至少有两个 '.'
            If not StringRegExp(GuiCtrlRead($A1), '\d+\.\d+\.\d+') Then ; 最准确的判断...

tcpuuu 发表于 2012-1-22 18:40:34

摁! 這個好
感謝 各位 解說

jtw 发表于 2012-1-23 13:10:23

学习了....................................

49666684 发表于 2012-1-23 14:02:04

学习了....................................

chinafla 发表于 2012-1-23 22:16:26

还可以做成自动填写

yyy910 发表于 2012-1-24 22:47:29

这个是不是有点像注册码得感觉？
页: [1]
查看完整版本: [已解决]求助大家 數值分割 分別寫入 3個框內 該如何?