Rekan-rekan sekalian mohon bantuannya ya.. buat skripsi ni..

klo ada peringatan Run Time Error "401"
can't show non modal form when non modal form is displayed

Private Sub cmdgo_Click()
Dim unknown As Integer
unknown = CInt(txtVar.Text)
If (unknown >= 2 And unknown < 254) Then
    Var = unknown
   frmhitung.Show >>>> Debug nya nunjuk disini
    Me.Hide
ElseIf unknown < 2 Then
    MsgBox "Range must be between 2 and 253", vbExclamation, "Invalid range"
    txtVar.SetFocus
    SendKeys "{Home}+{End}"
End If
End Sub

ini kenapa ya...
ohya saya lagi buat matriks dengan MsFlexg
Sebelumnya terima kasih

Wassalam



      
___________________________________________________________________________
Yahoo! sekarang memiliki alamat Email baru.
Dapatkan nama yang selalu Anda inginkan di domain baru @ymail dan @rocketmail. 
Cepat sebelum diambil orang lain!
http://mail.promotions.yahoo.com/newdomains/id/

Kirim email ke