Currently browsing

November 9, 2008

VB problem, file system control

Private Sub Dir1_Change () File1.Path = Dir1.Path End Sub Private Sub Drive1_Change () Dir1.Path = Drive1.Drive End Sub Private Sub File1_Click () Dim STR As String * 3 ChDrive Drive1.Drive ChDir Dir1.Path STR = UCase (Right (File1.FileName, 3)) Select Case STR Case “BMP” Image1.Picture = LoadPicture (File1.FileName) Case “DOC” MsgBox …

~ Life-saving applications unusual, Zaban ah? ?

My computer has recently appeared on the boot not long: application anomaly occurred unknown software exception (0xc00000fd) for the location of the Ox5fde87ad, Zehui Shi ah? Is “OK” or “cancel” Death must save Help me ~ of poisoning, killing 360 Guardian of the virus and malicious plug-in. Another loaded card …