经验分享
happybasic
永远相信美好的事情即将发生
展开
-
DXF文件版本判断~
R10 --- AC1006R11/R12 --- AC1009R13 --- AC1012R14 --- AC1014AutoCAD 2000 --- AC1015AutoCAD 2004 --- AC1018AutoCAD 2007 --- AC1021AutoCAD 2010 --- AC1024AutoCAD2013 --- AC1027AutoCAD2018 --- AC1032这个参数暂时不清楚,麻烦知道的留言一下,谢谢!原创 2023-12-12 18:11:14 · 189 阅读 · 0 评论 -
解决汉荣达HRD-700背光灯和数字灯干涉的问题~
汉荣达HRD-700是一款非常经典的蓝牙/音乐播放/收音机一体机,自发布以来受到了广大粉丝的喜爱。但是,这个款收音机也有一个小小的不足,就是它的背光灯和数字灯存在干涉的问题。很明显,背光灯和数字灯干涉的原因就在这里,因为他们挨得太近了。所以,我们只需要在背光灯和数字灯之间加一个档板即可。注意第二张图蓝色圈的位置是没有螺丝的,只是个定位柱,看起来有点像有螺丝。要解决这个问题,首先我们得拆开收音机。松开以下红圈中的两个螺丝,可以拆开收音机背壳。很明显,我们可以看到背光灯和数字灯不再干涉了。原创 2022-11-08 12:04:22 · 1449 阅读 · 1 评论 -
终极解决【剪映电脑版】无法打开的问题~~~
step3点击【测试程序】后,剪映会成功打开,关掉后再执行step4。关闭后,然后重新去打【剪映电脑版】,就可以了。原创 2022-02-17 19:10:45 · 52747 阅读 · 0 评论 -
Keil 工程文件uVision Project显示成“礦ision Project“的解决方法
Keil 工程文件uVision Project在文件浏览和属性中会显示成"礦ision Project",虽然不影响实际使用,但是让人感觉很不舒服。这个情况,只需要在注册表中修改一下就可以了。(将以下文本内容保存成 对应的.reg,然后双击打开导入即可。)文件名称:UV2&3 fixed.reg文件内容:Windows Registry Editor Version 5.00[HKEY_CLASSES_ROOT\UV2FILE]@="uVision2 & ..原创 2021-06-28 17:35:34 · 3549 阅读 · 5 评论 -
VB6升级到VB2010之十三: 更改文本框字体~
VB6中,要更改一个文本框的字体属性,很简单,比如要更改字体大小Text1.Font.Size = 9但是,到VB2010中,你会发现这样用会出错,并提示.Size属性是只读属性。翻遍百度发现Microsoft.VisualBasic.Compatibility.VB6里面有一个FontChangeSize的函数可用于更改文本框的字体,格式如下:VB6.FontChangeSize(T原创 2012-11-15 12:32:06 · 2234 阅读 · 0 评论 -
VB6升级到VB2010之十一: 复杂的鼠标指标升级
MousePointer 升级为 Cursor所以,Me.MousePointer 就要写成Me.Cursor看起来是简写了是吧,OK, Me.MousePointer =11 ,原来可以用数字简写的,现在要写出来就是:System.Windows.Forms.Cursors.WaitCursor晕吧。。原创 2012-11-15 12:28:20 · 937 阅读 · 0 评论 -
VB6升级到VB2010之九: Debug.Print
原来的Debug.Print,现在的System.Diagnostics.Debug.Write哪个更nice, 我不得不说是Debug.Print原创 2012-11-15 12:15:43 · 1136 阅读 · 0 评论 -
VB6升级到VB2010之八: PopUpMenu升级~
vb2010将菜单控件化了,所以原来的PopUpMenu就无法使用了。。需使用ContextMenuStrip控件,然后用:ContextMenuStrip1.Show 弹出。原创 2012-11-15 12:06:20 · 1041 阅读 · 0 评论 -
Windows Virtual PC如何瘦身~
用过Windows Virtual PC的朋友应该注意到,Windows Virtual PC用一段时间之后,硬盘的可用空间不断变小。这是因为Windows Virtual PC反复安装或卸载程序后导致占用空间越来越大。下面介绍一个简单的瘦身方法:1.首先,关闭Windows Virtual PC在Windows Virtual PC环境中,同时按CTRL + ALT + END,原创 2012-12-03 23:38:46 · 908 阅读 · 0 评论 -
VB6升级到VB2010之十二: CheckBox控件
创建一个Checkbox, 并写以下代码:Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChangedMsgBox("CheckedChanged")End SubPrivate Sub原创 2012-11-15 12:30:51 · 1169 阅读 · 0 评论 -
GetStr: 一个自创蛮有用的字符串函数~
作用:用于截取一个字符串中,两个标识符中间的字符串。 Public Function GetStr(ByVal InputString As String, ByVal String1 As String, ByVal String2 As String) As String Dim i As Integer Dim j As Inte原创 2015-01-02 18:52:34 · 2512 阅读 · 0 评论 -
How to use VarPtr in VB.NET ?
Imports rtis = System.Runtime.InteropServices Function VarPtr(ByVal e As Object) As Integer Dim GC As rtis.GCHandle Dim GC2 As Integer GC = rtis.GCHandle.Alloc(e, ...原创 2019-05-27 22:48:23 · 787 阅读 · 0 评论 -
VB6升级到VB2010之十四:与运算和逻辑运算判断失误导致升级出错~
玩VB6的同学,升级到VB2008或VB2010。。。一般会先用用升级向导... 偶然的机会,发现VB2008的升级向导关于与运算和逻辑运算有一个大大的臭虫。。原代码:Public Const READ_CONTROL = &H20000Public Const STANDARD_RIGHTS_READ = (READ_CONTROL)Public Const STANDARD原创 2012-11-15 12:33:19 · 1048 阅读 · 0 评论 -
VB6和VB2010在Windows XP/7下的剪贴板操作问题~
这段时间在写一个叫做Dingcrown KD Print的软件,灰常灰常意外的发现一个BUG: 在VB6做的dll插件中copy的数据在Win7下贴上时出现乱码现象。dll中VB6的代码:Clipboard.SetText Addr主程序中VB2010代码:ProductInfo = Clipboard.GetText()--------------------------原创 2012-11-15 13:01:39 · 1564 阅读 · 0 评论 -
VB6升级到VB2010之六: 最嗦哆的升级~
Doevents升级到VB2010后的写法: System.Windows.Forms.Application.DoEvents()绝对是称得上最最嗦哆的升级吧 还有,用于防止程序重复运行的App.PrevInstance,在.net中不再支持,不过,博主找到了一个替代方案:UBound(Diagnostics.Process.GetProcessesByName(Diagnost原创 2012-11-15 12:00:22 · 1348 阅读 · 0 评论 -
VB6升级到VB2010之一:变量升级~
因为Visual Basic 2010已经对Integer (已升级为4字节)和Long(已升级成8字节)变量进行了升级,并增加了Short (2字节)类型。所以VB6升级到VB2010时需作如下修改:VB6 Integer ===> VB2010 ShortVB6 Long ===> VB2010 Integer当然,不修改也没关系,但是程式升级后会花费超过你预期的内存。*另原创 2012-11-15 11:22:28 · 2169 阅读 · 0 评论 -
VB6升级到VB2010之三:旧的VB6函数和语句升级~
因为VB2010已经支援了.net framework 4.0,所以原有的VB6函数不能继续采用,但是为了兼容性,Microsoft将旧的VB6函数或语句集中到一个叫Microsoft.VisualBasic的类。以便于我们可以方便的升级原来的代码。以下列出一些常用的变化。为简化操作,请在Class最顶端加上一句:Imports VB6 = Microsoft.VisualBasic1原创 2012-11-15 11:51:37 · 2677 阅读 · 0 评论 -
VB6升级到VB2010之七: 剪贴板操作升级~
1. Clipboard.Clear 升级为:My.Computer.Clipboard.Clear()2. Clipboard.GetData 升级为:My.Computer.Clipboard.GetImage() ,看来起vb2010的Get分不同的类型。原创 2012-11-15 12:02:04 · 961 阅读 · 0 评论 -
VB6到VB2010的一些怪怪的TextBox升级~
接前篇,列一些从VB6到VB2010的一些TextBox属性的怪怪的升级, 如下:TextBox1.MousePointer改成TextBox1.CursorTextBox1.SetFocus 改成 TextBox1.Focus有的人可能要说了。。很明显,是为了缩短语句嘛。。。那么,我们再看看下面的:TextBox1.SelText 改成 TextBox1.SelectedText原创 2012-11-15 13:04:37 · 1173 阅读 · 0 评论 -
从TextBox的升级看VB6与VB2010的不同~
从VB6升级到VB2010,很多人不习惯。。。说不习惯,其实也有很大一个原因:就是不知道VB2010好在哪里。。那么,本文将以最常用的TextBox的升级为例让你领略一下VB2010的魅力...1. 清除文本框内容。VB6 : TextBox1.Text=""VB2010: TextBox1.Clear()2. 取消选择文本。VB6 : TextBox1.SelLength=0原创 2012-11-15 13:03:29 · 2638 阅读 · 2 评论 -
VB6升级到VB2010之十五: 缺省值传递未进行推断直接默认为ByRef导致错误~
再说一说VB6到VB2008/VB2010升级向导的问题:原VB6代码:Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, lpTyp原创 2012-11-15 12:58:26 · 1237 阅读 · 0 评论 -
VB6升级到VB2010之四:App对象升级~
VB6的App对象,提供App.ExeName等众多的功能。现VB2010已升级到My名字空间My.Application, 用于提供当前应用程序的信息,包括标题,目录,版本号等。因此,1. 象原来的代码:App.ExeName在VB2010中就要写成,My.Application.Info.AssemblyName2. App.hInstance 则没有升级到My名字空间原创 2012-11-15 11:54:09 · 1410 阅读 · 0 评论 -
如何解决VB6程序在Win7不能运行的问题~
因为Windows7的UAC机制限制非Admin权限的程序存取Program Files和Windows目录的文件等一些限制,因此导致很多旧的VB6(包括所有Visual系列)程序在Windows7无法运行或运行异常。原因是这些旧的程序默认是没有权限申请设置的,所以当然就没有Admin权限了。因此,您必须通用采用右键“以管理员身分运行”的方式解决。但依然有一些程序还是无法运行,这时原创 2012-11-17 08:14:25 · 9998 阅读 · 2 评论 -
VB6升级到VB2010之十: 一些常量的升级~
1. vbLeftButton ===> VB6.MouseButtonConstants.LeftButton2. vbOKOnly ===> MsgboxStyle.OKOnly3. vbRed ===> System.Drawing.Color.Red4. READYSTATE_COMPLETE ===> System.Windows.Forms.WebBrowserRead原创 2012-11-15 12:22:27 · 1092 阅读 · 0 评论 -
VB6升级到VB2010之二:控件属性升级~
从VB6到VB2010除了功能的强大,也可以看到Microsoft对于细节的重视,例如,不少控件的属性就做了细微的调整。如:1. Option的Value 属性更改为Checked,也就是说原来的Option1.Value在VB2010中,就应该写成Option1.Checked他们的值均是Boolean, 可以为True, 也可以为False, 但是很明显Checked更原创 2012-11-15 11:28:08 · 1781 阅读 · 0 评论 -
VB6升级到VB2010之五: 从Unload 升级成Me.Close看VB2010有多类~
新版本的Visual Basic 2010,你会发现原来用于关闭窗口的Unload Me无法使用了...没错,Unload Me 现在已经升级为Me.Close()看到了没有,Visual Basic 2010类吧。 其实,你再往下看... 你会发现Visual basic 2010更类 VB6: List1.AddItem "item1" VB2010: List1.原创 2012-11-15 11:58:03 · 2342 阅读 · 0 评论 -
Windows7下VB6的安装方法~
之前写过一篇日志,关于VB6程序在Windows7下运行的问题(http://www.dingcrown.com/soft/blog/Log/?/ID/28.html) 。那么,如果要在Windows7下进行VB6开发,那该怎么办呢?首先,Windows7已经不象Vista那样,可以通过acmsetup的办法安装。装双系统吧,用起来麻烦。其实,Windows 7已经提供了一个叫Windows原创 2012-11-16 12:56:03 · 4694 阅读 · 4 评论