网站首页

登录

vb 通过程序设置系统日期和时间的格式

于 2023-06-21 发布文件大小:3.20 kB

 0  100

下载积分: 2 下载次数: 1

我要下载

代码说明：

vb 通过程序设置系统日期和时间的格式，设定时可以改变长日期格式，短日期格式，改变时间格式，看着很像是以前Windows XP时候的时间设置窗口的功能。请注意，日期格式设置成功，需要重新启动计算机或注销后可以看到新的短日期格式！以下是改变日期格式其中的一个例子代码，仅供参考：　　Dim ret2 As Long 　　Dim sd As String 　　ret2 = RegOpenKey(HKEY_CURRENT_USER, "Control PanelInternational", hKey) 　　If ret2 = 0 Then 　　 sd = Combo1.Text 　　 RegSetValueEx hKey, "sShortDate", "0", REG_SZ, ByVal sd, LenB(StrConv(sd, vbFromUnicode)) 　　 MsgBox "日期格式已设置成功，重新启动计算机或注销后可以看到新的短日期格式！", , "提示窗口" 　　End If

下载说明：请别用迅雷下载，失败请重下，重下不扣分！

发表评论

0 个回复

在状态栏中显示当前状态-VB范例
VB6.0在状态栏中显示当前状态，演示程序以一个画图程序来演示窗口状态栏的变化，当我们画直线、执行操作：画正方形，执行操作：画圆的时候，会显示出状态，要注意观察窗口的状态栏上的文字提示信息。这种形式现在不算什么高大上功能了，很早的VB示例中就实现了，因此本源码比较基础了，高手请绕行。

2023-03-24 17:45:04下载

积分：1
VB6.0多选文件源代码实例
VB6.0多选文件源代码实例，在打开文件的对话框中，用户一次可选择多个文件，并不像平时那种一次只能打开一个文件。当然，这种打开文件需要程序的支持，而不仅仅是限制于打开多个文件而程序端不支持的现象。

2022-05-20 22:53:54下载

积分：1
分享一个VB Excel表格生成模块
分享一个VB Excel表格生成模块，借助了模块中的ChangeToExcel.ocx组件来生成，使用时需要引入此组件。该组件中具备创建Excel文件、向Excel文件中插入内容、出错处理等功能。　　Excel表格生成模块为该组件的源代码文件，你还可以通过源码对组件功能进行调整。　　Demo文件夹下是使用此组件导出Excel文件的例子，单击按钮即可生成Excel文件。

2022-11-26 13:10:03下载

积分：1
VB演示三种FileSystemObject文件操作方法
FSO对象模型提供了三种创建和打开文件的方法：其实本示例是创建了FileSystemObject对象，然后用FSO对象的FileExists、CreateTextFile、OpenTextFile方法，对文件进行操作，演示了三种FSO对象的操作方法，对学习初级的FSO文件操作有相当好的帮助作用。

2022-02-07 21:26:36下载

积分：1
VB6.0使用InPutBox显示密码输入框
VB6.0使用InPutBox显示密码输入框，InPutBox大部分情况下是用于输入数据，与用户交互，但这些数据并不是密码类型的，本实例是展示是使用InPutBox作为密码输入框，其实也是挺简单的：　　Private Sub Command1_Click() 　　 On Error GoTo Err_Out 　　 Dim lTemp As Long 　　 Dim sTemp As String 　　 lTemp = SetTimer(Me.hwnd, NV_INPUTBOX, 1, AddressOf TimerProc) 　　 sTemp = InputBox("请输入密码", "密码输入框") 　　Err_Out: End Sub

2023-02-13 07:30:04下载

积分：1
VB写的一个轻型仿写字板文档编辑器源码
VB6.0编写的一个轻型仿写字板的多功能文档编辑器源码，具备新建、打开、保存、打英剪切、复制、粘贴、粗体、斜体、下划线、左对齐、置中、右对齐等功能，界面还是挺友好的，文件格式支持DOC格式 (*.doc)|*.doc|RTF格式 (*.rtf)|*.rtf|文本文件 (*.txt)。　　注：如果这个工程没有帮助文件，显示消息给用户，可以在“工程属性”对话框中为应用程序设置帮助文件。完整源码请下载查看。

2022-03-15 05:13:20下载

积分：1
VB6.0 使用递归过程实现阶乘运算
VB6.0 使用递归过程实现阶乘运算　　Function F(n As Integer) As Single 　　 If n > 1 And n

2022-04-27 22:53:13下载

积分：1
VB 6.0 动态改变图表的比例
VB 6.0 动态改变图表的比例,改变图表的视图比例,默认是0.7,点击确认按钮后,图表会变大显示,减小数字,图表会紧接着变小.看了下代码,里面就是一行代码搞定: 　　MSChart1.RowLabel = "" 　　不过这个功能还是很实用的,当视图内容比较多的时候,图表显示的比较小,用这个功能可将图表放大显示. 　　MSChart主要用来生成一些简单的图表，包括饼图、曲线图、柱状图等，较复杂的图表就需要借助三方控件了。

2022-03-07 00:11:30下载

积分：1
VB.NET 超市管理系统
VB.NET 超市管理系统，数据库基于SQLSERVER，使Label透明显示，进货管理、售货管理、价格管理、进货查询、售货查询、增加用户管理等。这个示范代码主要是演示VB与SQLSERVER数据库之间的各种操作，大部分是一些数据的基础应用。测试前请先附加好数据库，否则会弹出出错提示。

2022-01-26 05:34:54下载

积分：1
VB.NET窗体Tab 读取ini文件界面滑动等功能集
本源码基于VB.NET编写，集合了VB.NET中的读取ini文件，窗体Tab标签，界面滑动等效果，界面看上去是一个音乐播放器，其实本程序是侧重于界面的编程设计，演示了窗口中TAB标签切换、界面滑动以及整体界面的美化的具体实现，使用了比较多的三方DLL，已经都打包了，感兴趣的下载源码，在VS2012版本以上的VS中打开并编译。

2022-01-26 07:32:46下载

积分：1

696516资源总数
106914会员总数
0今日下载