=97AndAsc(Mid(Text1,Val(Text2),1))<=122ThenLabel2.Caption="位为小写"EndIfEndIf需要更多代码请下载本源码实例包。-IMDN开发者社群-imdn.cn"> =97AndAsc(Mid(Text1,Val(Text2),1))<=122ThenLabel2.Caption="位为小写"EndIfEndIf需要更多代码请下载本源码实例包。 - IMDN开发者社群-imdn.cn">
登录
首页 » VB源码 » VB整源码判断字符串中某一字符是否大写

VB整源码判断字符串中某一字符是否大写

于 2022-06-27 发布 文件大小:2.39 kB
0 87
下载积分: 2 下载次数: 1

代码说明:

VB编写完整源码判断字符串中某一字符是否大写,执行下面的代码,这个例子简单哦,不多介绍了,直接看代码吧:   If Asc(Mid(Text1, Val(Text2), 1)) >= 65 And Asc(Mid(Text1, Val(Text2), 1)) = 97 And Asc(Mid(Text1, Val(Text2), 1))

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • VB.net 绘制实时曲线
    VB.net 绘制实时曲线,是一个实时曲线控件的DEMO测试,使用这个控件,可以生成适时曲线 、历史曲线 、动态历史曲线。可用于流量 监控、访问量统计、员工绩效排名等众多场合中。   CEGraphControl目录中为控件的源代码,DeviceApplication1为使用此控件的示例,测试时要把CEGraphControl目录中生成的CEGraphControl.dll文件拷贝到测试源码的Bin同级目录中。
    2022-07-26 13:54:49下载
    积分:1
  • VB6.0检查是否有拨号连接
    VB6.0检查你的电脑是否有拨号连接,获取本机的网络连接列表,重点是检测是否有拨号网络连接。
    2022-07-25 20:56:18下载
    积分:1
  • VB 实现FTP功能的小程序 包括FTP操作类
    VB 实现FTP功能的小程序 包括FTP操作类,将诸多功能收集到一块,实现了一个简单的FTP客户端程序,可用来下载和上传一些文件,该程序由busywxp改编,修复了源程序中的一些bug。现在可程序可完成文件编码类型的切换,比如ASCII、二进制的转换,还可选择传输的类型是主动类型或是被动类型,程序窗口基于分隔条进行分割,用于显示不同的功能,你可了解超多的VB网络编程知识和窗口可视化的相关操作。
    2022-06-30 23:29:33下载
    积分:1
  • VB制作圆形窗体界面
    VB6.0制作圆形窗体界面,打开后是一个矩形窗体,双击后变为一个圆形窗口,创建一个矩形区域的API函数,用来将窗口恢复为矩形,同时创建一个椭圆形区域的API函数,圆形应该是一个规则的矩形窗口,代码还是挺简单的,而且还有注释,非常适合学习研究VB的窗体制作,有兴趣的下载源码。
    2022-04-14 23:47:36下载
    积分:1
  • 日常考勤程序 基于VB.NET实现附
    一款基于VB.NET和sqlserver数据库实现的考勤程序,实现公司员工的日常考勤功能,可实现指定日期的员工考勤,考勤时可选择考勤天数、考勤人,可查询本人的考勤记录,实现的是挺基本的考勤模块,还可显示当前用户的历史记录。   本实例的数据库文件在db文件夹下,请自行添加,并配置数据库信息。   源代码运行于VS2015环境下。
    2022-12-02 11:45:03下载
    积分:1
  • VB演示操作存储过程的方法
    VB演示操作带参数和不带参数的存储过程的方法,通过一个数据库查询来体现功能的差别。同时还包括了创建存储过程信息。   我们从打开数据链接开始,演示如何简单创建一个存储过程,下面是核心的几何代码:   con.Open   con.Execute ("Create Procedure book1 @price int As Select * From 书名 where 单价>=@price")   MsgBox "成功创建存储过程"   con.Close   SQL语句是一个查询书名对应价格的例子,仅供参考。
    2022-01-25 20:38:51下载
    积分:1
  • VB Seek语句设置随机访问文件的读取位置
    VB 设置随机访问文件的读取位置,本例中是使用Seek语句来设置随机访问文件的读取位置,代码编写方面,主要是掌握Seek的用法,以下代码将用户的单击行为作为触发Seek的事件条件:   Private Sub Command1_Click()    Dim str As String * 10    Open App.Path & "MyFile.txt" For Binary As #1    Seek #1, 5    Get #1, , str    Text1.Text = str    Close #1   End Sub   当用户单击按钮后,执行seek语句。
    2022-03-24 08:37:41下载
    积分:1
  • vb 通过程序设置系统日期和时间的格式
    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
    2023-06-21 17:25:03下载
    积分:1
  • VB.NET 软件在线自动升级功能演示
    VB.NET 软件在线自动升级功能演示,含源代码,程序自动更新版本源码中核心文件为UpdatingForm.vb,此文件包括了程序自动升级的主要功能,比如更新显示信息、删除不需要的文件、查找客户端需要更新的文件和需要删除的文件、查找服务器端新增需要下载的文件、版本控制文件为必须下载文件、设置当前下载的文件序数、强制结束进程等。   本程序需要一个存放软件最新版本的服务器或者是网址,程序运行后最先检测该网址下的软件是否是最新,若该网址不存在或出错,程序将不再继续,直接退出,如图所示。
    2022-07-23 12:00:34下载
    积分:1
  • visual studio VB 学生信息管理系统
    用visual studio VB语言编写的学生信息管理系统 WINFORM 数据库采用的是ORACLE 
    2022-02-24 12:49:02下载
    积分:1
  • 696516资源总数
  • 106679会员总数
  • 14今日下载