-
vb.net 教程 5-16 图像处理例子 1 半透明的文字水印
所属栏目：[大数据] 日期：2020-12-16 热度：69
之前的教程中曾使用Graphics.DrawString绘制文字，这个示例来说明如何绘制一个透明的文字水[详细]
-
vb.net 教程 5-16 图像处理例子 2 半透明的图片水印
所属栏目：[大数据] 日期：2020-12-16 热度：111
图片水印有两种方法，一是读取水印的所有像素颜色，颜色上加上设置的alpha值，然后将每个像素绘制到指定的位置；二是使用颜色矩阵（ 如果忘记了如何使用颜色矩阵的朋友，可以参看《 vb.net 教程 5-16 图像处理之ImageAttributes 类1 颜色矩阵1 》开始的内容[详细]
-
VB vs C#：为什么这可能？
所属栏目：[大数据] 日期：2020-12-16 热度：123
这里有一些代码，每当我想到这件事时，都会让我烦恼。 Option Strict OnModule Module1 Sub Main() For Each i As Integer In New String() {"why","is","this","tolerated?"} ' compiles just fine. Next End SubEnd Module C#根本不允许隐式转换为整数的字[详细]
-
为什么这个扩展方法在VB.NET中抛出NullReferenceException？
所属栏目：[大数据] 日期：2020-12-16 热度：67
从以往的经验来看，我一直觉得在null实例上调用扩展方法是完全合法的(尽管也许不太可取)。所以在C#中，这段代码编译并运行： // code in static classstatic bool IsNull(this object obj) { return obj == null;}// code elsewhereobject x = null;bool exi[详细]
-
.net – 格式化负的TimeSpan
所属栏目：[大数据] 日期：2020-12-16 热度：148
我正在与.Net中的Timespans进行一些数学计算，有时候这个数字会导致负的Timespan。当我显示结果时，我无法格式化它以包括否定指示符。 Dim ts as New Timespan(-10,0)ts.ToString() 这将显示“-10：00：00”，这是很好的，但我不想显示这样尝试的秒数。 ts.T[详细]
-
VB代码片总结
所属栏目：[大数据] 日期：2020-12-16 热度：163
1. 特殊符号的限制 （1）需设定是哪几个特殊符号 Dim a As String ,b As Long ,c As Long Dim i As Integer a = "'!@#$%^*()_+ " For i = 1 To 20 txtPassword. Text = Replace(txtPassword. Text , Mid (a,i, 1 ), "" ) Next （2）ASCII码限制输入符号 事件[详细]
-
机房收费系统小结一
所属栏目：[大数据] 日期：2020-12-16 热度：162
一、新数据写入表中 txtSQL = "select*from 数据库中表名称 " Set mrcc = ExecuteSQL(txtSQL,msgtext) mrcc.AddNew 重新插入数据 mrcc.Fields(1) = 要输入的数据 。。。 mrcc.Update 更新数据库 二、更改指定行的某一指定数据 txtSQL = "select*from 数据库[详细]
-
VB—代码片总结
所属栏目：[大数据] 日期：2020-12-16 热度：55
前言 自己从最开始接触的VB百例、红皮书、学生管理系统到前一段时间结束的机房收费系统。来给大家分享在机房收费系统的代码片段！ - VB中的EOF与BOF EOF含义：当前记录位置位于Recordest对象的最后一个记录之后 返回值类型：布尔类型 作用：确定Recordest对[详细]
-
VB.NET总结
所属栏目：[大数据] 日期：2020-12-16 热度：135
对VB.NET的理解 随着面向对象应用的广泛，面向对象越来越符合需要，所以由VB进一步转化，结合面向对象的思想，成为VB.NET,VB.NET是一种编程语言. VB.NET概要 VB.NET中的词与我们的语言偏差 其实因为VB.NET视频中的俩位老师是来自台湾的，所有有好多词，我们[详细]
-
VB代码块总结
所属栏目：[大数据] 日期：2020-12-16 热度：170
1、字体颜色变化代码： Private Sub Timer1_Timer() Label1.ForeColor = RGB(255 * Rnd + 5,255 * Rnd + 5,255 * Rnd + 5) End Sub 2、导出Excel表单： Public Sub ExportToExcel(FormName As Form,FlexgridName As String) '导出Excel表的过程 Dim xlApp As[详细]
-
VB学习-基础
所属栏目：[大数据] 日期：2020-12-16 热度：97
新建工程 1、新建 2、保存：点击保存按钮即可。 3、运行：F5 4、生成.exe文件：保存-生成xx.exe 5、退出：Alt + Q 数据类型 1、数值型（Numeric） Dim a As Interger = 123Dim b As Long = 2222222222Dim c As Single = 1.23 2、字符型（String） Dim str As[详细]
-
VB机房收费系统05——一般用户模块逻辑问题总结
所属栏目：[大数据] 日期：2020-12-16 热度：71
内容 确认按钮不管用 这个问题在别的窗体里也遇见过，当时只记得删除窗体，新建窗体，删除里面的代码，从新输入代码后问题解决，但具体问题在哪里还是不得而知。今天遇到问题后我依据老法子尝试后仍然没有效果。之后变逐个分析造成此问题的原因。 1.首先我想[详细]
-
VB与数据库学习项目总结
所属栏目：[大数据] 日期：2020-12-16 热度：79
背景： 历时8月，进入提高班的第二个大项目终于完成！ 总结： 说来惭愧，按照培养计划的时间来算，整个大项目的时间不过49天，而我用了8个月！之前一直感觉是自己学的扎实，所以学得慢，现在发现，不是自己扎实（ 因为很多之前学的东西到用的时候还是没想起[详细]
-
VB中常用的函数（一）
所属栏目：[大数据] 日期：2020-12-16 热度：77
前言 学习VB很长时间了，有些函数虽然很简单，但是记得还不是很清楚，所以干脆在总结一次。 Msgbox函数 这些不同的弹出的提示框，就是我们常用的msgbox函数，Message Box的简写。语法:MsgBox (Prompt [,Buttons] [,Title] [,Helpfile,Context])，想要更改不[详细]
-
如何使用.NET Framework验证电子邮件地址格式？
所属栏目：[大数据] 日期：2020-12-16 热度：184
我想要一个函数来测试一个字符串是一个格式化的电子邮件地址。 什么是内置的.NET框架来做这个？ 这工作： Function IsValidEmailFormat(ByVal s As String) As Boolean Try Dim a As New System.Net.Mail.MailAddress(s) Catch Return False End Try Return[详细]
-
在VB.NET中声明和初始化字符串数组
所属栏目：[大数据] 日期：2020-12-16 热度：143
我试图从一个函数返回一个字符串数组，并得到一个错误感到惊讶。 我会希望这个工作，但它会产生一个错误： Public Function TestError() As String() Return {"foo","bar"}End Function 这工作： Public Function TestOK() As String() Dim ar As String() =[详细]
-
vb.net 教程 8-3 数据库操作10-1
所属栏目：[大数据] 日期：2020-12-16 热度：57
数据库数据的修改可以直接使用sql update 语句， 在使用command时和查询略有区别： 查询使用的是 command.ExecuteReader 返回一个 DbDataReader 修改使用的是command.ExecuteNonQuery 可以返回受此操作影响的数据条数，当然也可以不用返回值。 以一个实例来[详细]
-
vb.net 教程 8-3 数据库操作10-2
所属栏目：[大数据] 日期：2020-12-16 热度：152
接上一节，下面开始正式进行修改： 使用sql的update语句： Private Sub btnEdit1_Click(sender As Object,e As EventArgs) Handles btnEdit1.Click Dim id As Integer = cbEmployee.SelectedIndex + 1 Dim odcommand As New OleDbCommand() odcommand.Comman[详细]
-
vb.net 教程 8-3 数据库操作11
所属栏目：[大数据] 日期：2020-12-16 热度：108
数据新增、删除和修改操作差不多。 无非就是新建sql语句，执行command.ExecuteNonQuery 本节例子使用的是NorthWind中的类别表。 有了前面查询和修改的知识，相信大家可以看懂下面的代码： Private Sub btnAdd_Click(sender As Object,e As EventArgs) Handle[详细]
-
在VB.NET中没有下划线字符的单行语句
所属栏目：[大数据] 日期：2020-12-16 热度：129
有没有方法可以有一个语句跨多行没有下划线字符？ 它在多行字符串，如SQL语句，尤其是LINQ查询真的很烦人。 除了在改变线条时的丑陋和困难(没有什么排队了)，你不能在多行语句的中间使用注释。 我的日常个人地狱的例子。 dim results = from a in articles _[详细]
-
VB版机房管理系统-添加子窗体的问题
所属栏目：[大数据] 日期：2020-12-16 热度：197
我在将子窗体创建好的时候，运行时不显示，查阅后才知道是因为在 MDI 窗体上添加了 Picture 控件的原因， Picture 把子窗体给挡住了 解决方法如下 1. 首先要在模块中声明一个 Set Parent 函数（该函数的功能就是改变某个子窗口的父窗口），我是用的 API 文本[详细]
-
VB版机房管理系统-学习感受
所属栏目：[大数据] 日期：2020-12-16 热度：50
这两天机房终于敲完，并且完成了师傅的验收，总体感觉很好，主要是还是开头难 ，在前期的时候有畏难的心里，感觉难，没有头绪，所以不想敲，可是越不敲就越不会，感觉越难，就这么的拖了下来，直到在师徒会交流还有小伙伴的帮助下，开好了头，一步步的完成了[详细]
-
机房收费系统—日结账单
所属栏目：[大数据] 日期：2020-12-16 热度：114
前言 ??这个星期机房敲完了日周结账单和上下机，但是不同的人看待问题的角度不一样，所以大家做出来的机房也有一些差别，下面我就说一说我的想法。 问题的由来 ??经过机房收费系统的尝试，相信大家都对原来的系统有了一些想法，或许原来的系统有些地方优化的[详细]
-
vb.net 教程 3-8 窗体编程 容器 1 Panel & GroupBox
所属栏目：[大数据] 日期：2020-12-16 热度：138
之前有网友留言问Panel控件的讲解，其实我感觉Panel和GroupBox用法差不多。这里就列在一起讲一下。 上面的图片，能看出来那个是Panel，哪个是GroupBox吗？ 其实下面的那个容器是Panel加上一个Label做的。 基本上，容器都是用来放置其它控件的，在容器中的控[详细]
-
VB6 - FileSystemObject Write Error : “invalid procedure cal
所属栏目：[大数据] 日期：2020-12-16 热度：146
VB6 中使用以下方式读取一个 UTF-8 文件后，另存为一个新文件时出错 “invalid procedure call or argument ” ‘ 读取 Dim adoS As Object Set adoS = CreateObject("adodb.stream") With adoS .Charset = "utf-8" .Type = 2 .Open .LoadFromFile sUTF8File[详细]
