一、vb中tab是什么?
Tab函数是与Print方法有关的一个函数
格式: Tab[(n)]
其功能是在指定的第n个位置上输出数据。
其中参数n可以有如下三种情况:
1)n<当前位置: 打印位置为下一行的第n列
2)n<1: 打印位置为第1列
3)n省略: 打印位置为下一个打印区的起点(每14个字符为一个打印区)
二、vb中tab如何使用?
tab:
与 Print # 语句或 Print 方法一起使用,对输出进行定位
语法
Tab[(n)]
可选的 n 参数是在显示或打印列表中的下一个表达式之前移动的列数。若省略此参数,则 Tab 将插入点移动到下一个打印区的起点。这就使 Tab 可用来替换国别中的逗号,此处,逗号是作为十进制分隔符使用的。
说明:如果当前行上的打印位置大于 n,则 Tab 将打印位置移动到下一个输出行的第 n 列上。如果 n 小于 1,则 Tab 将打印位置移动到列 1。如果 n 大于输出行的宽度,则 Tab 函数使用以下公式计算下一个打印位置:
n Mod width
例如,如果 width 是 80,并指定 Tab(90),则下一个打印将从列 10 开始(90/80 的余数)。如果 n 小于当前打印位置,则从下一行中计算出来的打印位置开始打印。如果计算后的打印位置大于当前打印位置,则从同一行中计算出来的打印位置开始打印。
输出行最左端的打印位置总是 1。在使用 Print # 语句将数据写入文件时,最右端的打印位置是输出文件的当前宽度,这一宽度可用 Width # 语句设置。
注意 要确保表格列的宽度足以容纳较宽的字符串。
当 Print 方法与 Tab 函数一起使用时,打印的外观将会被分割为均匀、定宽的列。各列的宽度等于选用字体内以磅数为单位的所有字符的平均宽度。但是,在已打印字符的个数与那些字符所占据的定宽列的数目之间不存在任何关系。例如,大写字母 W 占据超过一个定宽的列,而小写字母 i 则占据少于一个定宽的列。
2.
你输入的数据太大。将 s(10) As Integer改为Long就行了。
代码:
Private Sub cmdsortshow_Click()
Dim k, p, intplace As Long, inttemp As Long, s(10) As Long
For k = 1 To 10
s(k) = InputBox("data=")
Next k
For k = 1 To 9
intplace = k
For p = k + 1 To 10
If s(intplace) > s(p) Then
intplace = p
End If
Next p
inttemp = s(k)
s(k) = s(intplace)
s(intplace) = inttemp
If k < 9 Then
lblsortprompt.Caption = "排序中。。。第" + Str(k) + "趟比较后结果为:"
Else
lblsortprompt.Caption = "排序完成,结果为:"
End If
lblsortingdata.Caption = " "
For p = 1 To 10
lblsortingdata.Caption = lblsortingdata.Caption + Str(s(p))
Next
MsgBox "请观察排序数据变化情况"
Next k
End Sub
三、vb字符串加法的运算?
比如:Text3.Text = Text1.Text + Text2.Text 是字符串相加,结果就是把两个字符串连起来,正确应该是Text3.Text = val(Text1.Text) +val(Text2.Text)注意:+运算在VB中有两种定义,一个是正常的加法,一个是字符串相连。VB会自动根据情况选择,Text3.Text 是字符串,因此VB自动选择第二种定义来算。 但-和*运算只有一种定义,那就是数字相差和相乘,因此VB会自动把Text3.Text 转换成数字运行运算。
四、vb截取字符串函数?
VB 从右边截取字符串可以使用Right函数:
Private Sub Command1_Click()
s = "1234567890"
s1 = Right(s, 4)
Print s; "的右边4个字符是"; s1
End Sub
五、vb中的查询字符串?
查找字符串的函数是 instr,替换字符串的函数是replace,用法:instr(n , S1 , S2) 在字符串S1中,从左边第n个字符向后搜索S2第一次出现的位置,例如i = instr ( 3, "abcbcbc", "b" ),此时 i = 4replace(s,s1,s2) 在字符串s中搜索s1,如果搜索到就将s1替换成s2,例如replace("asdfasdfasfas","asd","m") 结果是 mfmfasfas希望对你有用
六、vb字符串函数怎么看?
VB.Net 提供了格式化方法 如果数据类型是 a.ToString("D5") 如果数据类型是 integer, decimal, single, double: a.ToString("00000") 如果数据类型是string iif(len(a)< 5, "00000".Substring(0,5 - len(a)) + a, a)
七、vb编程怎么截取字符串?
VB6里
right的函数是取一段字符串的右边几个字符
比如
dim a as string
dim b as string
a="12345678"
b=right(a,4)
那么b的值是5678
八、VB.NET字符串如何显示引号?
因为VB.NET的源码中字符串常量是用英文双引号开始和结束的,如:"abc",如果要显示引号,输入"""是错误的,要4个英文双引号才能显示一个正确的英文双引号,如:MsgBox("""")。
九、vb如何查找指定字符串的个数?
Dim str As String Dim n As Integer str = "abbcccd" n = Len(str) - Len(Replace(str, "c", ""))
十、VB中怎么判断字符串是否相等?
直接用=号判断,比如Private Sub Command1_Click()If InputBox("输入字符串") = "123" ThenGoTo AElseGoTo BEnd IfA:Print 1GoTo CB:Print 2C:End Sub
- 相关评论
- 我要评论
-