- 博客(14)
- 资源 (3)
- 收藏
- 关注
原创 vb中调用存储过程并返回一个DataTable结果集
Public Function getNotParameterPR() As DataTable Dim cmd As SqlCommand = getCommand("存储过程名") cmd.CommandType = CommandType.StoredProcedure Dim read As SqlDataReader = Nothing Dim dt A...
2018-08-30 09:58:03 2042
原创 SQL 解决INSERT EXEC 语句不能嵌套问题
--创建无参数的表值函数,不要使用存储过程--在需要调用的存储过程中 insert into #tempTable select * from [dbo.][FUNC_SaveData]()CREATE FUNCTION FUNC_SaveData()returns tableasreturn( select * from tableName) ...
2018-08-29 10:26:31 5876
原创 SQL临时表的创建和删除
if OBJECT_ID ('tempdb..#t1') is not null begin drop table #t1 endelse begin create table #t1( s_no char(8), s_day char(8), s_money int, err text ) ...
2018-08-29 08:14:41 14477
原创 SQL语句中EXCEPT和INTERSECT用法
--EXCEPT 取两个查询结果的差集select sale_no ,sale_day ,sale_money from saleManageexceptselect sale_no ,sale_day ,sale_money from incomeManage --INTERSECT 取两个查询结果的交集select sale_no ,sale_day ,sale_mo...
2018-08-28 13:31:26 11074 3
原创 SQL中在查询结果中新增一列自定义的值
select sale_no,cast('自定义的值' as '自定义的字段类型') as '列名' from incomeManagewhere sale_no not in ( select sale_no from saleManage )
2018-08-28 13:18:43 26200 1
原创 vb.net中DataTable输出定长TXT文件或者CSV文件方法和使用Format占位(0和半角空格)
'DataTalbe输出到TXT/CSV文件Dim fs As FileStream = New FileStream(path, FileMode.Create, FileAccess.Write)Dim sw As StreamWriter = New StreamWriter(fs, System.Text.Encoding.Default)'列名For i = 0 To data...
2018-08-28 10:01:58 1159
原创 vb.net修改DataGridView列名、手动向DataTable添加列数据和行数据
'添加列名Dim dt As New DataTabledt.Columns.Add(New DataColumn("列名1"))dt.Columns.Add(New DataColumn("列名2"))dt.Columns.Add(New DataColumn("列名3"))'从数据库中提取出来DataTalbe显示到DataGridView修改列名dgv.DataSource ...
2018-08-28 09:57:48 7581 1
原创 vb.net中DataTable取交差集和遍历DataRow的方法
Dim row As DataRowDim rows As DataRow()For Each row In DataTable1.Rows rows = DataTable2.Select("DataTable1的列名=" & row(0).ToString.Trim ) '条件 If Not rows.Length = 0 Then '差集 ...
2018-08-28 08:52:43 4814
原创 vb手动输入字符串(SQL语句)太长时 怎么换行输入
Dim str As String = "abc" & "def" & "ghi"
2018-08-28 07:50:40 6740
原创 vb 把Form窗体嵌入到Panel中
Private Sub btnOtherOperation_Click(sender As Object, e As EventArgs) Handles btnOtherOperation.Click rightPanel.Visible = True Dim form2 As New Form2 form2.TopLevel = False...
2018-08-07 09:27:07 2058
原创 用vb创建一个控制台应用程序
Module Module1 Sub Main() Dim strTmp As String = "abcdefg某某某" Dim i As Integer = System.Text.Encoding.Default.GetBytes(strTmp).Length Dim j As Integer = strTmp.Length ...
2018-08-06 16:57:36 3353
原创 判断日期格式的正则表达式
Imports VBScript_RegExp_55'正则表达式() Dim b As Boolean Dim res As New RegExp res.Pattern = "\d{4}\-(0?[1-9]|[1][012])\-(0?[1-9]|[12][0-9]|3[01])" b = res.Test(tbBirthd...
2018-08-02 19:41:30 9940
原创 vb 插入sqlserver数据库中文乱码问题
VS2012 strSql = "insert into stuInfo values(" & id & ",N'" & tbName.Text & "',N'" & sex & "','" & birthday & "'," & age & &
2018-08-02 13:47:00 925
centos7.7环境 python3.6.8 rpm离线安装包
2023-02-07
Qt5:多文档功能查看器(新增视频文件播放)
2018-07-10
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人