个人中心
我的提问
我的回答
今日任务
我的设置
退出
文档资料
电脑网络
体育运动
医疗健康
游戏
社会民生
文化艺术
电子数码
娱乐休闲
商业理财
教育科学
生活
烦恼
资源共享
其它
歪果仁看中国
爱问日报
精选问答
爱问教育
爱问公益
爱问法律
一个一个提取,然后反过来组合。
1个回答
用字符串语句也有很多用途,例如inputbox语句或提示语句等等
3个回答
BASIC语言定义字符及字符串赋值给字符变量须用2个双引号" "标识.
百度去搜,多的是...
Private Const str1 As String = "/25/12/98/20/36/58/65"Private str2 As StringPrivate Sub Command1_Click() Dim i As Integer Dim count As Integer ...
4个回答
s = "" For i = 1 To 20 s = s & Chr(Int(Rnd * 26) + Asc("A")) Next Print s 以上代码生成一个长度为20的由随机的大写字母组成的字符串
你把VB中的"工程属性"和"部件'之类里的属性,设置一下,里面有好多的要设置以后,才能有显示的效果的,要不然不能识别有的东西的
声明一个长度为10个字符的字符串变量 str Dim str As String * 10
Private Sub Command1_Click() Dim AAA, BBB As String Dim I, JJ As Integer I = 0 BBB = "" AAA = "sd12f5/6t/0/20f100" For JJ = 1 To Len(AAA) If Asc(Mid(A...
这个符号&是字符串连接符,用于连接字符串,比如:"A" & i & "B",当i=2时,将显示:A2B,又比如:"北京" & "上海",可显示:北京上海
字符串转换为字节数组?存储ASCII码吧。 用Asc(字符)可以将字符转换成ASCII码。
很简单,自己写一个循环累加语句就可以了,VB中并没有提供这样的函数
用replace(str,xxx,yyy)函数替换就行了 或者用mid(str,m.n)函数提取 方法很多,法无定法。 你到EXCEL的帮助里面找一下,有教程,函数用法。 一看就会。
爱问知识人提供的是一个知识交流的平台.如果各位没有能力,请不要发贴,因为这样会误导提问者.爱问本来就很让人失望,提的问题都没有得到解决,全都是一些灌水帖子,如果再这样下去,谁还来这里提问?我发现这里的某些人,明明自己没有能力,可是为什么不虚心求学呢?为什么偏要来这里灌水,而且偏要显示自己的能力呢?符...
基本思路: A = 待处理字符; B = 待过滤字符; n = instr(1, A, B); 如果n不为0就循环: A = left(A,n-1)+ mid(A, n+1, len(A)-n); n = instr(1, A, B); 循环体结束。 返回A;
也许是你的vb没有打补丁,vb也需要补丁,最新版是SP6,可以到微软网站免费下载。
如果是字符数,用Mid函数; 如果是实际宽度,用Do循环.
你去下载这个,看看就100%知道了!
答案:C 实际输入3E1后,VB自动将其转换为30#,这是指数形式的数值,不可能是整型和字符串。而#号表示是Double的类型声明字符,所以C。
richtext控件可以实现的 text 是没有这个功能的!
AC
2个回答
MsgBox?"abcdefg"?&?vbNewLine?&?"123456"
$在QB中是字符串的意思,VB就不用了
在文本框中输入n1的值. Dim st1 As String st1= "/25/12/98/20/36/58/65" Dim n1 As integer n1= val(TextBox1.Text) Dim x x = Split(st1, "/") Dim n2 As String n2= x(...
Private Sub mand1_Click()Dim strIn As String, I As Integer, T As String, strOut As StringstrIn = InputBox("请输入字符串:")For I = 1 To Len(strIn) T = Mid...