=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 76
下载积分: 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 个回复

  • VB6 给窗体添加滚动条
    VB6 给窗体添加滚动条,调整水平滚动条的一些属性。当窗体的大小发生变化时发生,垂直滚动条与窗体相对位置不变,滚动条的大小随着窗体大小的改变而改变,命令按钮作水平滚动条与垂直滚动条交接处的填充。   因代码注释较多,详细代码情况请您下载本源码包,自行解压查看。
    2023-02-22 07:50:04下载
    积分:1
  • VB 利用Tag属性存储用户名
    VB 利用Tag属性存储用户名   If Text1.Text = "" Or Text2.Text = "" Then    MsgBox "用户名或密码不能为空", vbCritical, "信息提示"    Exit Sub   Else    If Text1.Text = "TSoft" And Text2.Text = "111" Then    Me.Tag = Text1.Text    Frm_Main.Show 1    Unload Me    Else    MsgBox "输入的名户名或密码不正确", vbCritical, "信息提示"    End If   End If
    2022-02-04 07:45:58下载
    积分:1
  • VB6.0 获取网络连接信息
    VB6.0 获取网络连接信息,在如图所示的窗口中,点击按钮即可获取显示本机的网络连接信息,这些信息包括:   是否通过LAN连接、是否通过Modem连接、是否通过Proxy连接、是否在线连接、是否安装了网络RAS等信息。获取完成最后可提示:“系统通过LAN与Internet连接,系统安装了远程访问服务”。
    2023-05-26 06:40:02下载
    积分:1
  • VB6.0 如何计算加权平均值
    VB6.0 代码演示如何计算加权平均值,计算加权平均值可编写以下代码实现:   Private Sub Command1_Click()    Text7.Text = jiaquan(Text1, Text2, Text3, Text4, Text5, Text6)   End Sub   Private Function jiaquan(ByVal a As Integer, ByVal b As Integer, ByVal c As Integer, ByVal d As Integer, ByVal e As Integer, ByVal f As Integer)    Dim sum As Integer    sum = (a * b + c * d + e * f) / (b + d + f)    sum = Round(sum, 2)    jiaquan = sum   End Function
    2022-02-25 12:19:27下载
    积分:1
  • vb.net 串口通讯测试项目
    vb.net 串口通讯测试项目源码,本源码用于练习SerialPort控件、DataReceived事件、16进制操作,同时用于工程需要。作者:李潇海。   运行后先检测测试需用的COM端口是否打开,弹出提示。   测试时请确保发送周期为正整数!串口测试窗口中,可配置参数:端口、波特率、检验位、数据位、停止位等,支持以十六进制发送和接收数据,还可以毫秒定时发送数据。操作方式上,可设置自动清空测试数据,发送文件或发送数据等。右侧为串口测试时的结果显示区。
    2023-02-14 09:00:03下载
    积分:1
  • vb 6.0 排队叫号系统
    vb 排队叫号系统源代码,Cobeyond排队系统,程序分为了中心控制端、CyMobile管理系统、系统通讯端口设置、系统数据库设置、最大终端客户数设置、检查服务器名和端口号等众多子程序。本排队叫号系统可广泛应用于银行大厅排队叫号、便民服务大厅排队叫号等公共服务场所,系统涉及硬件、数据库及网络各方面的编程知识,是一套比较综合的VB管理系统。其中服务人员子程序打开后的界面如截图所示,源码包中还包括了排队叫号系统设计的流程图、网络拓扑结构图等编程资料,请下载源码包查看详情。
    2022-02-21 04:44:48下载
    积分:1
  • VB.net与OMRON CP系列PLC通讯的实例
    VB.net与OMRON CP系列PLC通讯,截图是辅助程序:FCS校验计算器的运行效果,与PLC通讯的实例在PLC-PC文件夹下,源码在VB.NET环境编译。   LBIndustrialCtrls.dll放在debug目录中,与exe文件同级。
    2023-03-30 11:55:03下载
    积分:1
  • VB将程序图标添加到托盘
    VB将程序图标添加到托盘,任务栏的系统托盘上有本程序的图标,并可通过图标的右键菜单,调出程序主窗口、退出关闭程序等功能,是一种比较常见的添加系统托盘的示例。
    2022-03-24 10:49:35下载
    积分:1
  • VB Windows文件操作监视程序
    VB Windows操作监视程序,一个 Windows的文件目录操作即时监视程序,可以监视在Explore中的重命名、新建、删除文件或目录;改变文件关联;插入、取出CD和添加删除网络共享都可以被该程序记录下来。源程序来源于国外,注释英文。运行界面效果如图所示。当有文件操作时,在程序运行窗口中会有所提示。
    2023-06-19 19:00:03下载
    积分:1
  • VB删除指定路径下的文件夹【目录】
    VB6.0 删除指定路径下的文件夹【目录】 ,删除时请输入要删除文件夹的所在路径和名称,单击按钮即可。支持遍历目录删除文件,我觉得这是一个挺好的使用FSO操作的VB范例,对于VB新手学习相关的文件操作有很好的帮助。
    2022-03-19 05:31:28下载
    积分:1
  • 696518资源总数
  • 106182会员总数
  • 24今日下载