关于vb的一大堆问题！（看此留言这要求有好的耐心和江湖郎中的技术）

[wuchunlei]

关于vb的一大堆问题！（看此留言这要求有好的耐心和江湖郎中的技术）
一.如何使用vb调出双击右下角有时间的地方所出现的对话框(时间/日期 属性).
二.如何使用vb运行ie4或ie5,并把地址栏信息改为www.netease.com
三.如何用vb改变系统日期.
四.这两条语句是什麽意思?其中Kernel32与user32有什麽作用?
Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
五.要想用vb编程序安装modem的驱动程序,应怎麽作?
六.为什麽使用以下程序写c:\windows\system.ini文件后计算机没完没了的重新启动(自动关机,手动打开机器,在自动关机,在手动打开...死循环)
open "c:\windows\system.ini" for input as #1
do while not eof(1)
line input#1,n
textfile=textfile & n
loop
close #1

open "c:\windows\system.ini" for output as #1
?#1,textfile
close #1
我终于学会给分了，这是我所有的分了。83分，惭愧！

[mafangsan]

1.如何使用vb调出双击右下角有时间的地方所出现的对话框(时间/日期 属性).
Private Sub Command1_Click()
Shell "c:\windows\control.exe timedate.cpl"
End Sub

[Wingsun]

3.Date=#1999-9-9#.

[bobar]

4.GetWindowsDirectory 的到系统安装路径(c:\windows)
SetWindowPos设置窗口位置，（top,topmost)

3 Declare Function SetSystemTime Lib "kernel32" Alias "SetSystemTime" (lpSystemTime As SYSTEMTIME) As Long

[bobar]

2.Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Sub Form_Load()
ShellExecute Me.hwnd, "open", "http://www.sina.com.cn", "", "", 0

End Sub

[Nicrosoft]

回答如下：
2。用API函数ShellExecute()可以执行URL，自动调用默认浏览器。
3.系统日期可以用函数：date=某日期类型的变量。
4.这两条语句是声明Windows API函数（VB中只有声明API函数后才能使用）。这两条API函数分别封装在kernel32.dll和user32.dll两个动态连接库中。
5.不知道
6.将程序改成这样试试。
open "c:\windows\system.ini" for input as #1
do while not eof(1)
line input#1,n
textfile=textfile & chr(13)+chr(10) + n
loop
close #1

open "c:\windows\system.ini" for output as #1
?#1,textfile
close #1

不过象system.ini这类系统文件，最好不要轻易修改。如果要
改动，最好使用API

[Nicrosoft]

回答如下：
2。用API函数ShellExecute()可以执行URL，自动调用默认浏览器。
3.系统日期可以用函数：date=某日期类型的变量。
4.这两条语句是声明Windows API函数（VB中只有声明API函数后才能使用）。这两条API函数分别封装在kernel32.dll和user32.dll两个动态连接库中。
5.不知道
6.将程序改成这样试试。
open "c:\windows\system.ini" for input as #1
do while not eof(1)
line input#1,n
textfile=textfile & chr(13)+chr(10) + n
loop
close #1

open "c:\windows\system.ini" for output as #1
?#1,textfile
close #1

不过象system.ini这类系统文件，最好不要轻易修改。如果要
改动，最好使用API