⑴ 关于VB源代码
一般源代码是没问题的.当然也不排除有问题的.
如果你下的源代码不能载入,你应该去看看每个
控件的名称是否和代码中的名称一致,如果不一致
当然就不能加载了
⑵ 那里有VB源代码软件
如果是初学的话，没有必要去买软件的。因为买的话一般是比较难的软件，你初学也看不懂的；另外，这也浪费钱。所以建议你去买几本书就行了，要源代码的话直接上网搜吧，很多免费的呢，比如上源码天空~~另外推荐几本书
网络群飞度编程学社&1195277 希望可以帮到你
******** 这本是最菜的菜鸟最合适的一本书 ***************
1.世界图书出版公司, 文魁资讯股份有限公司, 书名:精通Visual Basic 6.0, 作者:洪锦魁. 标价 108元. 电脑编号:ISBN 7-5062-4649-X/TP.37
这本书又厚又重,印刷与纸张质量与内容我都认可,值得推荐.
这是台湾的出版社有繁体与简体版,很难买了,如果它有再版或你还找得到的话,注意一下别买错了
****************** 中,高级的两本好书 ******************
2.书名:Visual Basic 6 使用详解,机械工业出版社, 作者:王道义 乔陶鹏
等5人, 标价 43元. 电脑编号:ISBN 7-111-07264-2/TP.1102
*******************************************************
3.书名:Visual Basic 与 RS232 串行通讯控制
中国青年出版社 文魁资讯股份有限公司
作者:范逸之 电脑编号:ISBN 7-5006-3934-1 /TP.77
定价: 59元含一张CD
**********************************************************
⑶ 求VB 6.0的源代码下载
连金币都没 自己下去
⑷ 现成的VB源代码
'缺陷是没有屏蔽掉WIN键,而采用了时钟检测的方法
Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long
Private Declare Function ClipCursor Lib "user32" (lpRect As rect) As Long
Private Type rect
left As Long
top As Long
right As Long
bottom As Long
End Type
Dim mouse As rect
Private Sub Command1_Click()
Label2.Caption = "锁机成功!"
'Shell "C:\Program Files\TTPlayer\TTPlayer.exe"
Timer1.Enabled = True
'MsgBox "锁机成功!", vbOKOnly, "提示"
End Sub
Private Sub Command2_Click()
If Val(Text1.Text) = 1963331 Then
Label2.Caption = "解机成功!"
Timer1.Enabled = False
mouse.left = 0
mouse.top = 0
mouse.right = Screen.Width
mouse.bottom = Screen.Height
ClipCursor mouse
Command3.Enabled = True
'MsgBox "解机成功!", vbOKOnly, "提示"
End If
End Sub
Private Sub Command3_Click()
If Val(Text1.Text) = 1963331 Then
End
End If
End Sub
Private Sub Form_Load()
Open "c:\\windows\\system32\\taskmgr.exe" For Input Lock Read Write As #1
Command3.Enabled = False
Timer1.Enabled = False
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Cancel = 1
End Sub
Private Sub Timer1_Timer()
mouse.left = Me.left / Screen.TwipsPerPixelX
mouse.top = Me.top / Screen.TwipsPerPixelY
mouse.right = (Me.left + Me.Width) / Screen.TwipsPerPixelX
mouse.bottom = (Me.top + Me.Height) / Screen.TwipsPerPixelY
ClipCursor mouse
End Sub
给你一个我才遍的简单的小程序吧~~~呵呵,就这水平了,希望各位老大不要见笑
⑸ vb 源代码
不用webbrowser就用 inet,
⑹ VB的源代码和源文件
源文件：指编程者做好的工程文件，包含对程序进行修改、编译所需的全套代码和组件（例如图标、可视界面、第三方控件、数据库）。
源代码：仅仅是编程者所写的程序代码，不包含界面和控件等，需要用户自行完成相关操作。可能不完整，一般用于提供编程思路。
【对补充的解答】
我上面已经说过了，源代码可能不完整。可能是整个工程的源代码，也可能只是几个主要窗体的源代码。究竟是哪种要由提供代码者决定。考虑到时间、精力等问题，他可能只提供比较难编的主要部分的代码，而将剩下的简单代码留给用户自行完成。一般提供代码者会同时说明情况。
如果你想要完整的代码，可以搜索其它人提供的代码，或者直接找源文件。
⑺ VB下载+VB源码下载
http://down.csdn.net/
这里学习的机会很多，别总想拿别人的程序用，
主要还是要多读，多些才好啊
谢谢啊
⑻ vb文件保存源码下载
CommonDialog1.Filter = "bmpfile|*.bmp"
CommonDialog1.FileName = ""
CommonDialog1.ShowSave
If CommonDialog1.FileName <> "" Then
SavePicture Picture1.Image, CommonDialog1.FileName
End If
⑼ 用VB快速下载[网页源代码]
后台下载
声明：
Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
'//调用
然后在代码里直接调用：
Call URLDownloadToFile(0, "网页地址", "保存到本地文件名和地址", 0, 0)
如
Call URLDownloadToFile(0, "http://www..com/", "c:\1.htm", 0, 0)
相当于另存为
声明：
Private Declare Function DoFileDownload Lib "shdocvw.dll"(ByVal lpszFile As String) As Long
'//调用
然后在代码里直接调用：
Dim gourl As String
AdUrl = StrConv("网页地址", vbUnicode)
Call DoFileDownload(gourl)