-
vb.net 四舍五入& 格式化显示
所属栏目:[大数据] 日期:2020-12-16 热度:83
1,格式化显示,如:122,则显示为122.00 textbox1.text=Format(Convert.ToDecimal(textbox1.text),"0.00") 2,小数点四舍五入,如,3.12634精确小数点后2位,则显示为3.13 TextBox2.Text = System.Math.Round(Val(Trim(TextBox1.Text)),x) 此处用到函数,sy[详细]
-
SerialPort类的常用属性及方法
所属栏目:[大数据] 日期:2020-12-16 热度:54
SerialPort类的常用属性及方法 分类: 排队叫号 VB.NET 2011-04-05 21:17 36人阅读 评论(0) 收藏 举报 一、 SerialPort类的常用属性 名 称 说 明 BaseStream 获取 SerialPort 对象的基础 Stream 对象 BaudRate 获取或设置串行波特率 BreakState 获取或设置中[详细]
-
vb中修改屏幕分辨率
所属栏目:[大数据] 日期:2020-12-16 热度:81
在窗体上画一个按钮和四个文本框,运行如下代码:启动时,显示相应数据。修改后,单击按钮改变设置。 Option Explicit Private Declare Function GetDeviceCaps Lib "gdi32" ( ByVal hdc As Long , ByVal nIndex As Long ) As Long Private Declare Function[详细]
-
VB.NET 调用外部程序
所属栏目:[大数据] 日期:2020-12-16 热度:64
Process.Start(command 指令) 或用以下方法等待命令执行完 Dim objProcess = New System.Diagnostics.Process() objProcess.StartInfo.FileName = "cmd.exe - command argument" objProcess.StartInfo.WindowStyle = ProcessWindowStyle.Normal objProcess.S[详细]
-
稳压管和TVS管的工作原理
所属栏目:[大数据] 日期:2020-12-16 热度:151
转自 http://blog.21ic.com/user1/4818/archives/2008/53699.html TVS和一般的稳压二极管有什么区别: http://blog.21ic.com/user1/5877/archives/2010/67146.html 稳压管和 TVS 管的工作原理 稳压二极管(又叫齐纳二极管)它的电路符号是:此二极管是一种直到临[详细]
-
VB的农历算法(1900-2090)
所属栏目:[大数据] 日期:2020-12-16 热度:177
从网上找到的VB农历代码收藏备用 Option Explicit Public LunarInfo(1 To 191) As Double '从1900-2090年这150年的农历信息码 'PublicSolarMonth(1To12)AsInteger'阳历12个月的天数 Public Gan(1 To 10) As String '农历的天干 Public Zhi(1 To 12) As Strin[详细]
-
VB自定义类来替换collection设置Key和Value值
所属栏目:[大数据] 日期:2020-12-16 热度:177
创建一个类模块,命名为MyCollection 代码如下: Option Explicit Private colKey As New Collection Private colVal As New Collection Public Property Get Count() As Long Count=colKey.Count End Property Public Property Get RealCol() As Collection[详细]
-
vb的property和event
所属栏目:[大数据] 日期:2020-12-16 热度:119
把MSDN抄下来备用.呵呵 Event 语句 定义用户自定义的事件。 语法 [Public] Event procedurename [(arglist)] Event 语句包含下面部分: 部分 描述 Public 可选的。指定该 Event 在整个工程中都是可见的。缺省情况下 Events 类型是 Public。应注意,事件只能[详细]
-
学习简单工厂模式
所属栏目:[大数据] 日期:2020-12-16 热度:189
初识这个词语,并不知道他说的是什么,而将这一章看完之后,才初步了解到什么是简单工厂模式,以及为什么会出现这种模式,下面先看看什么是简单工厂模式吧: ***********************************************************************************简单工厂[详细]
-
hdu_1069 LIS变形
所属栏目:[大数据] 日期:2020-12-16 热度:115
类似LIS的思想,只能用LIS的 O(n2)的算法,O(nlogn)的算法用不了,因为每个数值加了权值!其实我感觉可以用树形dp的,因为他们是偏序关系,可以建一个hash图,复杂度O(nlogn)绝对可以,然后dp过程只要O(n)的复杂度,可以每次判断hash图中被自己覆盖[详细]
-
VB Excel限制问题
所属栏目:[大数据] 日期:2020-12-16 热度:130
近期做项目中,发现VB在导数据时(Excel),当超出65535行时,竞然死机,苦闷中! 目前解决的方案,将记录分页,分页导出,不知道有没有更好的解决方法。[详细]
-
vb.net2008 DataTable的一行复制到新DataTable
所属栏目:[大数据] 日期:2020-12-16 热度:157
If tmpDataTable.Columns.Count = 0 Then tmpDataTable = dt入出庫履歴.Clone() End If tmpDataTable.Rows.Add(dt入出庫履歴.Rows(0).ItemArray)[详细]
-
vb.net用来获取网页的类
所属栏目:[大数据] 日期:2020-12-16 热度:104
Imports System.Net Imports System.IO Public Class HttpDriverClass HttpDriver Public Function GetPage()Function GetPage(ByVal url As String,Optional ByRef postPara As String = "",Optional ByRef encType As String = "GB2312") As String Return[详细]
-
vb查看窗口句柄
所属栏目:[大数据] 日期:2020-12-16 热度:172
WinAPI: FindWindow、FindWindowEx - 查找窗口 http://www.cnblogs.com/del/archive/2008/02/28/1085432.html FindWindow( lpClassName, {窗口的类名} lpWindowName: PChar {窗口的标题} ): HWND; {返回窗口的句柄; 失败返回 0} //FindWindowEx 比 FindWindo[详细]
-
实例67:读写INI文件
所属栏目:[大数据] 日期:2020-12-16 热度:52
实例67:读写INI文件 实例说明 在本实例中,我们将应用VB.NET制作一个能够实现读写INI文件的应用程序。程序运行结果如图67-1所示。 图67-1 运行结果 技术要点 ? INI文件的格式 ? GetPrivateProfileInt()和GetPrivateProfileString()函数 ? WritePrivateProfil[详细]
-
VB.NET里设置程序的开机自动运行
所属栏目:[大数据] 日期:2020-12-16 热度:117
imports microsoft win32 dim dir as string= directory.getcurrentdirectory() dim exedir as string=dir "xxx.exe" dim key1 as registrykey=registry.localmachine dim key2 as registrykey=key1.createsubkey("software") dim key3 as registrykey=key2.[详细]
-
VB.net 2008实例:读写注册表与获取系统信息
所属栏目:[大数据] 日期:2020-12-16 热度:94
Visual Studio2008正式发布后吸引了大量的编程人员,为了由原来的Visual Studio2005转换为最新的Visual Studio2008不少公司也重新配置了计算机硬件设备,从而得以正常平稳的使用最新的开发工具。Visual Studio2008在一些特性上也做出了许多的改进,访问注册[详细]
-
mencoder和ffmpeg分割合并视频
所属栏目:[大数据] 日期:2020-12-16 热度:168
1. mencoder (1) mencoder分割视频命令 view plain print ? miko@bogon:~/Videos mencoder -ss 1:00 -endpos 3:00 -oac pcm -ovc copy orgin.mp4 -o 1.mp4 选项说明: -ss 1:00 指定视频分割开始的时间 -endpos 3:00 指定视频分割结束的时间(自分割开始的[详细]
-
VB replace 函數用法
所属栏目:[大数据] 日期:2020-12-16 热度:67
今天想用vb中的replace 字符串替換函數,發現了一個問題 那就是替換後的字符串前部分會被截掉 目的把str中的234換成555 str=111234 find=234 str1=555 st=4 BARCODE = Replace(str,find,str1,st,1) 結果BARCODE =555 前半部分被截掉 所以只能用left()函數[详细]
-
vb.net 修改图片大小
所属栏目:[大数据] 日期:2020-12-16 热度:184
Dim cmicImg As System.Drawing.Image Dim mWidth,mHeight As Integer cmicImg = System.Drawing.Image.FromFile("c:temp.bmp ") '读入图片 '变化大小 'mWidth = CInt(cmicImg.Width / 2) 'mHeight = CInt(cmicImg.Height / 2) mWidth = CInt(384) mHeight[详细]
-
vb 获取窗口句柄 并发信息
所属栏目:[大数据] 日期:2020-12-16 热度:163
(本文中部分使用繁体字,如果在简体系统下请将第三部实例程序记事本标题换成相对应的简体名称) 第一部分: 常用的与窗体相关的API函数 Public Declare Function ShowWindow Lib"user32" (ByVal hwnd As Long,ByVal nCmdShow As Long) As Long (根据句柄控[详细]
-
vb/vb.net开发精粹(21)
所属栏目:[大数据] 日期:2020-12-16 热度:63
vb用copymemory 读取内存数据问题 vb中 Len(Str(15))应该等于多少? 请问该语句是什么意思??? 求一断开外网连接的思路 谁有VB调用 7-ZIP 动态连接库实现解压缩的代码? 发个试题测试系统(适合新手,纯自制控件打造) 求VB程序的算法 AES加解密控件V1.1 VB.NE[详细]
-
VB中输入和输出数据的总结
所属栏目:[大数据] 日期:2020-12-16 热度:185
VB中的数据输出: 1,使用标签控件(label), 例子:labe1.caption="Visual Bisic(简称VB)是Microsoft推出的基于Windows操作系统环境下的软件开发工具。" 2,使用print方法, print方法用于在窗体(form),立即窗口(Debug),图片框(picturebox)或打印机(print[详细]
-
Ansistring的类型转换与使用
所属栏目:[大数据] 日期:2020-12-16 热度:172
//Ansistring 转 charvoid __fastcall TForm1::Button1Click(TObject *Sender){ AnsiString Test = "哈哈"; char *chr = Test.c_str();}//char转Ansistring#include windef.hvoid __fastcall TForm1::Button1Click(TObject *Sender){ AnsiString str = "Samp[详细]
-
VB通过代码对Access数据库的操作
所属栏目:[大数据] 日期:2020-12-16 热度:97
转csdn帖子中faysky2、lihonggen0的答案,不过自己还未测试,先记录下来 用ADOX: '菜单“工程”-- "引用 "-- Microsoft ADO Ext.2.7 for DDL ado Security Private Sub Form_Load() Dim cat As ADOX.Catalog Set cat = New ADOX.Catalog '在当前目录下建立名[详细]
