正文
vb.net小程序源码 vb60简单的小程序
提示：扫一扫查出行【扫一扫了解最新限行尾号】
复制提示
如何用vb.net获得网页的源代码
Dim url As String=" 网址"
Dim httpReq As System.Net.HttpWebRequest
Dim httpResp As System.Net.HttpWebResponse
Dim httpURL As New System.Uri(url)
httpReq = CType(WebRequest.Create(httpURL), HttpWebRequest)
httpReq.Method = "GET"
httpResp = CType(httpReq.GetResponse(), HttpWebResponse)
httpReq.KeepAlive = False ' 获取或设置一个值，该值指示是否与
Internet资源建立持久连接。
Dim reader As StreamReader = _
New StreamReader(httpResp.GetResponseStream,
System.Text.Encoding.GetEncoding(-0))
Dim respHTML As String = reader.ReadToEnd() 'respHTML就是网页源代码
相关问答
Q1: 关于VB.NET实现求和小程序的疑问，大侠帮我解答下呗
lblresult是一个label控件vb.net小程序源码，确定vb.net小程序源码你vb.net小程序源码的设计界面加入vb.net小程序源码了一个label控件并将其命名为lblresult
Q2: VB 获取网页源码 你的这个是怎么解决的.能和我说一下吗.谢谢
1、提取：用这个vb小程序可以！
2、网页显示(必须先用上面程序将源码保存为txt，并且在打开窗口里选择该txt文件！)：
拖进一个webbrowser1，一个commondialog1，一个command1.
Private Sub Command1_Click()
CommonDialog1.ShowOpen
WebBrowser1.Navigate (CommonDialog1.FileName)
End Sub
Q3: 求vb.net的源代码，最好说明其解决问题，越多越好，满意加50分。
下面这段代码，是我用来计算每个月存500元进银行，连续30年，最后连本带利能有多少钱。这里面涉及复利计算。界面中右边的文本框用来输出每一次计算的结果。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim nianxian As Integer '年限变量
Dim dingcun As Integer '定存变量
Dim fuli_big As Long '大复利
Dim fuli_small As Long '小复利
Dim i As Integer '循环变量
Dim DATAstring As String '数据字符串
nianxian = Val(年限_TextBox.Text)
dingcun = Val(定存_TextBox.Text)
DATAstring = ""
For i = 1 To nianxian
fuli_small = dingcun * (1 + 0.1875)
dingcun = fuli_small
fuli_big = fuli_big + fuli_small
DATAstring = DATAstring + "[" + Trim(Str(i)) + "]" + Str(fuli_big) + Chr(13) + Chr(10)
'DATAstring = DATAstring + "[" + Trim(Str(i)) + "]" + Str(fuli_small) + Chr(13) + Chr(10)
Next
'fuli_big = fuli_small
TextBox1.Text = DATAstring
结果_TextBox.Text = Str(fuli_big) + "元"
End Sub
vb.net小程序源码的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vb60简单的小程序、vb.net小程序源码的信息别忘了在本站进行查找喔。
