ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] ·í«ö¤U«ö¶s°õ¦æµL»~¡A¦ý¬O³z¹LÂà´«¡A«o¥X²{¤£¦Pªºµ²ªG¡C


  ¦h°µ¦h·Q¦h¾Ç²ß¡A¤Ö¬Ý¤Ö¿ù¤Ö°g³~

  ¦h°µ=¦h¦h½m²ß¡A¦h¦h½s¼g¡C
  ¦h·Q=·Q·Q¬°¤°»ò¤H®aµ{¦¡­n¨º¼Ë¼g¡A¦pªG´«¦¨¦Û¤v¡A¤S·|«ç¼g¡C
  ¦h¾Ç²ß=¾Ç²ß¤H®aªºµo°Ý¨Ã¸Ñµª¡A¾Ç²ß¤H®aªº¼gªk

  ¤Ö¬Ý=¥u¬Ý¤£°µ¤]ªPµM

TOP

¥H¤U¼g¦bUserFrom1¤ºªºN¬O¤u§@ªí("A")ªºN¥i¬O·|¥X¿ù~³o°ÝÃD­«½Æ¤F@
av8d µoªí©ó 2013-3-19 14:32



    °ÝÃD­«½Æ? ¬O«ü¥H«e¦³¬Û¦P©«? ¦pªG¦³ ¥i¥H¥h§ä¤å..
¬õ¦â³¡¤À¥Nªí¬Æ»ò?? ¨S¦³¥ô¦ó«ü¦V ·íµM¿ù»~
Á`¤£¥i¯à ¥ô¤@²Å¸¹  ´N­n³sµ²§a...
­nªº¥\¯à¬O¬Æ»ò?
³æ°j°é Âù­«°j°é?


Private Sub CommandButton1_Click()
    For i = 2 to 4
    If ComboBox1 = N & i Then
        If TextBox1 = O & i Then
        Username = ComboBox1
        Unload Me
        Else
        MsgBox ("±K½X¿ù»~¡I")
        End If
    End If
    Next i
   
End Sub

  ¦h°µ¦h·Q¦h¾Ç²ß¡A¤Ö¬Ý¤Ö¿ù¤Ö°g³~

  ¦h°µ=¦h¦h½m²ß¡A¦h¦h½s¼g¡C
  ¦h·Q=·Q·Q¬°¤°»ò¤H®aµ{¦¡­n¨º¼Ë¼g¡A¦pªG´«¦¨¦Û¤v¡A¤S·|«ç¼g¡C
  ¦h¾Ç²ß=¾Ç²ß¤H®aªºµo°Ý¨Ã¸Ñµª¡A¾Ç²ß¤H®aªº¼gªk

  ¤Ö¬Ý=¥u¬Ý¤£°µ¤]ªPµM

TOP

UserFrom1¤º¨Ï¥ÎFor°j°é

¥»©«³Ì«á¥Ñ av8d ©ó 2013-3-19 14:38 ½s¿è

¥H¤U¼g¦bUserFrom1¤ºªº
  1. Private Sub CommandButton1_Click()
  2.     For i = 2 to 4
  3.     If ComboBox1 = N & i Then
  4.         If TextBox1 = O & i Then
  5.         Username = ComboBox1
  6.         Unload Me
  7.         Else
  8.         MsgBox ("±K½X¿ù»~¡I")
  9.         End If
  10.     End If
  11.     Next i
  12.    
  13. End Sub
½Æ»s¥N½X
N¬O¤u§@ªí("A")ªºN¥i¬O·|¥X¿ù~³o°ÝÃD­«½Æ¤F@

TOP

        ÀR«ä¦Û¦b : ¤£­nÀH¤ß©Ò±ý¡A­nÀH¤ß±Ð¨|¦Û¤v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD