vb中的for 和 next 问题

vb中的for 和 next 问题,第1张

因为你的if没有endif,在next i前加一个endif即可。

VB对语法的检查是按堆栈方式进行的。如果将你的程序按正确缩进,应该是这样:

dim a%,……

min=100

for i=1 to 20

a=rnd90+10

print a

if a<min then

min=a:j=i

next i

从这里就可以看出来为什么next i 没有for了。

Sub 随机缩进()

    Dim myParagraph As Paragraph

    Randomize

    For Each myParagraph In ThisDocumentParagraphs

        myParagraphCharacterUnitFirstLineIndent = Int(Rnd()  10)  '在每个段首随机缩进0~9个字符

    Next

End Sub

>

这个要用到的是层叠样式表,也就是CSS,和VB无关,比如: <div style="text-indent:24px">欢迎参加第二期问问达人计划活动,回答问题有奖励。活动详情</div> 以上就可以使所显示的文字首行缩进24个像素

RichTextBox1SelHangingIndent = Val(TextFText) 首行缩进

RichTextBox1SelIndent = Val(TextLText) 左

RichTextBox1SelRightIndent = Val(TextRText) 右

用该控件比较方便 用textbox得自己写函数过程

问题1:——把三个窗口的startupposition属性都设为2。或在form_load中把三个窗口的left设为相等的值,top也设为相等的值。

问题2:——在“格式”里有“对齐”,但只能在设计阶段,并且行距两个以上的控件时才能使用。

以上就是关于vb中的for 和 next 问题全部的内容,包括:vb中的for 和 next 问题、word宏如何编写随机缩进的VB代码、vb 代码自动缩进工具等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zz/10127644.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-05
下一篇 2023-05-05

发表评论

登录后才能评论

评论列表(0条)

保存