vb.net 字典排序
作者:admin 日期:2023-02-26
在 VB.NET 中，可以使用 System.Linq 命名空间中的 orderBy 方法和 ToList 方法对字典进行排序，并将排序结果转换为列表形式。以下是一个对字典按照键或值进行排序的示例代码：
vb.net
Copy code
Dim dict As New Dictionary(Of String, Integer)() ' 创建一个字典
dict.Add("apple", 2) ' 向字典中添加元素
dict.Add("orange", 3)
dict.Add("banana", 1)
' 对字典按键进行升序排序
Dim sortedByKey = dict.OrderBy(Function(x) x.Key).ToList()
' 对字典按键进行降序排序
Dim sortedByKeyDescending = dict.OrderByDescending(Function(x) x.Key).ToList()
vb.net 如何将一个100行的文本文件导入到列表中
作者:admin 日期:2023-02-26
在 VB.NET 中，可以使用 System.IO 命名空间中的 File 类和 StreamReader 类来读取文本文件，并将每行数据添加到列表中。以下是一个将文本文件导入列表的示例代码：
vb.net
Copy code
Dim filePath As String = "path/to/your/file.txt" ' 文件路径
Dim list As New List(Of String)() ' 创建一个字符串列表
Using reader As New StreamReader(filePath) ' 创建一个文件读取器
While Not reader.EndOfStream ' 循环读取每一行数据
Dim line As String = reader.ReadLine() ' 读取一行数据
list.Add(line) ' 将数据添加到列表中
End While
End Using
上述代码中，我们首先定义了一个名为 filePath 的字符串变量，用于保存待读取的文本文件路径。然后，我们创建了一个名为 list 的字符串列表，用于保存文本文件中的每一行数据。接下来，我们使用 Using 语句创建一个文件读取器 reader，并打开待读取的文本文件。使用 While 循环读取文本文件中的每一行数据，使用 ReadLine 方法读取一行数据，并将其添加到列表中。最后，我们使用 End Using 结束文件读取器的使用。
注意，在使用 StreamReader 读取文本文件时，如果文件不存在或者文件读取发生错误，可能会抛出异常。因此，在实际应用中，需要根据具体情况添加异常处理机制。
vb.net 计算2000000条数据中每条数据的重复次数
作者:admin 日期:2023-02-26
可以使用字典（Dictionary）来实现统计每条数据的重复次数，具体实现如下：
vb.net
Dim data As New List(Of String) ' 保存2000000条数据的列表
' 假设数据已经保存在 data 列表中
Dim countDict As New Dictionary(Of String, Integer) ' 字典用于保存每条数据的重复次数
For Each item As String In data
If countDict.ContainsKey(item) Then
countDict(item) += 1 ' 如果字典中已经存在这条数据，重复次数加1
Else
countDict(item) = 1 ' 如果字典中不存在这条数据，添加到字典中并初始化重复次数为1
End If
Next
lnmp重新安装mysql
作者:admin 日期:2023-02-23
全网最全超详细.htaccess语法讲解
作者:admin 日期:2023-02-20
安装腾讯云开发者工具套件 PHP SDK 3.0
作者:admin 日期:2023-02-11
参考地址：https://cloud.tencent.com/document/sdk/PHP
Centos：
步骤1：安装 Composer
- Windows 环境请访问 Composer 官网下载安装包安装。
- Unix 环境在命令行中执行以下命令安装：
curl -sS https://getcomposer.org/installer | php
sudo mv composer.phar /usr/local/bin/composer
步骤2：添加镜像源
中国大陆地区的用户可以使用腾讯云镜像源提高下载速度，在打开的命令窗口执行以下命令：
composer config -g repos.packagist composer https://mirrors.tencent.com/composer/
JS使用正则表达式校验手机号码
作者:admin 日期:2023-02-09
检验的格式为
开头数字必须为1，第二位必须为3至9之间的数字，后九尾必须为0至9组织成的十一位电话号码
- //JS使用正则表达式校验电话号码
- function checkModbile(mobile) {
- var re = /^1[3,4,5,6,7,8,9][0-9]{9}$/;
- var result = re.test(mobile);
- if(!result) {
- alert("手机号码格式不正确！");
- return false;//若手机号码格式不正确则返回false
- }
- return true;
- }
js 操作（数字前端去0、文字去除空格、截取字符串、保留几位小数、数字不足位数前补0）
作者:admin 日期:2023-02-07
- //1、数字前端去0
- var num = number.replace(/\b(0+)/gi,"")
- //2、文字去除空格
- var str = str.replace(/(^\s*)|(\s*$)/g, "")
- //3、截取字符串
- var str = abcdef
- str = str.substr(2,3) //cde
- //4、保留小数
- //保留4位小数
- var number = 12.3321432;
- number = String(number).replace(/^(.*\..{4}).*$/,"$1");
- number = Number(number); // number = 12.3321
- //保留2位小数
- var reg = /^(.*\..{2}).*$/;
- var number2 = 12.3;
- number2 = String(number2).replace(reg ,"$1");
- number2 = Number(number2); // number2 = 12.3 不足保留位数不补0
- //5、数字不足位数前补0
- var number = 100
- var num = (Array(5).join(0) +number).slice(-5) //num = 00100
js控制div内的滚动条的位置
作者:admin 日期:2023-02-07
通过div的scrollTop变动控制垂直滚动条位置。
通过div的scrollLeft变动控制水平滚动条位置。
示例：
<body>
//d1是外层div，带滚动条
<div id='d1' style='height:200px;width:100px;overflow:auto;background:blue;'>
<div style='height:500px;width:500px;background:yellow'>2222</div>
</div>
</body>
<script>
document.getElementById('d1').scrollTop=100;//通过scrollTop设置滚动到100位置
document.getElementById('d1').scrollLeft=200;//通过scrollTop设置滚动到200位置
</script>
.
cefsharp winfrom 保存用户登录状态
作者:admin 日期:2023-02-06
winfrom 使用cefsharp作为内嵌浏览器,要求是保存用户登录,在下次启动时不要要再输入用户名和密码,
CefSettings _settings = new CefSettings();
_settings.PersistSessionCookies = true;
但是无效
回答：
保持登录状态需满足
网站返回的 cookie 不带过期时间
设置缓存路径 CefSettings.CachePath
存储会话 cookie CefSettings.PersistSessionCookies
vb.net unicode编码转中文字符
作者:admin 日期:2023-02-04
Private Function UniTostr(ByVal body As String)
Dim S2 As String
Dim S3 As String = ""
Dim I1 As String
body = Trim(body)
Do While Len(body) > 1
I1 = InStr(1, body, "\u")
If I1 > 0 Then
S3 = S3 & Strings.Left(body, I1 - 1)
S2 = "&H" & Mid(body, I1 + 2, 4)
S2 = ChrW(S2)
S3 = S3 & S2
body = Strings.Right(body, Len(body) - I1 - 5)
Else
S3 = S3 & body
body = ""
End If
Loop
UniTostr = S3
End Function
PHP CURL使用POST发送json数据
作者:admin 日期:2023-02-01
因项目的需要，PHP调用第三方 Java/.Net 写好的 Restful Api，其中有些接口，需要 在发送 POST 请求时，传入对象。
Http中传输对象，最好的表现形式莫过于JSON字符串了，但是作为参数的接收方，又是需要被告知传过来的是JSON！
其实这不难，只需要发送一个 http Content-Type头信息即可，即 “Content-Type: application/json; charset=utf-8”，参考代码如下：
- /**
- * PHP发送Json对象数据
- * @param $url 请求url
- * @param $jsonStr 发送的json字符串
- * @return array
- */
- function http_post_json($url, $jsonStr)
- {
- $ch = curl_init();
- curl_setopt($ch, CURLOPT_POST, 1);
- curl_setopt($ch, CURLOPT_URL, $url);
- curl_setopt($ch, CURLOPT_POSTFIELDS, $jsonStr);
- curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
- curl_setopt($ch, CURLOPT_HTTPHEADER, array(
- 'Content-Type: application/json; charset=utf-8',
- 'Content-Length: ' . strlen($jsonStr)
- )
- );
- $response = curl_exec($ch);
- $httpCode = curl_getinfo($ch, CURLINFO_HTTP_CODE);
- curl_close($ch);
- return array($httpCode, $response);
- }
- $url = "http://www.baidu.com"; //请求地址
- $arr = array('a' => 1, 'b' => 2, 'c' => 2); //请求参数(数组)
- $jsonStr = json_encode($arr); //转换为json格式
- $result = http_post_json($url, $jsonStr);
- print_r($result);
广告位
