[帳號]
Text2=1
Text3=2
[密碼]
Text2=1
Text3=2
[確認密碼]
Text2=1
Text3=2
我遇到一個問題就是如何知道輸入的值是Text2的還是Text3的值
原始碼如下
Dim q1 As String '帳號
Dim q2 As String '密碼
Dim q3 As String '確認密碼
g = "c:\"
INI1.FileName = "c:\gjj.ini" '設定 .ini 屬性
If Right(App.Path, 1) = "\" Then
IniFile = g & "gii.ini"
Else
IniFile = g & "\gii.ini"
End If
INI1.FileName = IniFile
Tmp = INI1.GetKey("帳號", "Text" & q1)
If Tmp = "" Then Tmp = ""

Tmp = INI1.GetKey("密碼", "Text" & q2)
If Tmp = "" Then Tmp = ""

Tmp = INI1.GetKey("確認密碼", "Text" & q3)
If Tmp = "" Then Tmp = ""



arrow
arrow
    全站熱搜

    vbqa 發表在 痞客邦 留言(1) 人氣()