显示网页用webbrowser控件,引用microsoft internet controls 操作ini文件用api函数: Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, lpKeyName As Any, ByVal lpDefault As String, ByVal lpRetunedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long Public Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lplFileName As String) As Long得到系统时间直接用now即可,即:a=now,即为系统当前时间
1、WebBrowser,在Microsoft Internet Controls(在Shdocvw.dll中) 2、WritePrivateProfile....查查Msdn中的Api吧 3、now();
1.加入:Microsoft Internet control 3.函数:now,time,date
操作ini文件用api函数:
Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, lpKeyName As Any, ByVal lpDefault As String, ByVal lpRetunedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
Public Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lplFileName As String) As Long得到系统时间直接用now即可,即:a=now,即为系统当前时间
2、WritePrivateProfile....查查Msdn中的Api吧
3、now();
3.函数:now,time,date