Foxtable(狐表)用户栏目专家坐堂 → [求助]文字编码转换


  共有2494人关注过本帖树形打印复制链接

主题:[求助]文字编码转换

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/10/8 14:22:00 [显示全部帖子]

Dim url As String = "http://hq.sinajs.cn/list=CON_OP_10001331"
Dim hc As New HttpClient(url)
hc.ResponseEncoding = "GB2312"
Dim str = hc.GetData()
Dim tex1 As WinForm.TextBox = e.Form.Controls("TextBox1")
tex1.value = str
[此贴子已经被作者于2018/10/8 14:22:17编辑过]

 回到顶部