vb中的resize 是啥意思,怎么用

Posted 2023-05-08

参考技术A resize顾名思义，就是尺寸改变。
在form中，只要尺寸改变，就会引发这个事件。
注意，每次窗口启动时，也会引发这个事件的。
一般用在调整窗口尺寸时，控件的位置和尺寸也相应改变（例如窗口最大化时，所有按钮都自动靠边，pictureBox尺寸增大） 参考技术B resize事件是窗口大小改变时发生的事件，resize(1,8),1是高度，8是宽度
resize(height
as
single,
width
as
single)，height
指定控件新高度的数，width
指定控件新宽度的数

vb中flag是啥意思有啥作用

vb中flag用于记录一个状态，具体flag的意义要视实际情况而定。
例如在循环中有时候flag用于记录 一组数据是否有一项达到了要求。
Flag 属性
返回或设置显示系列的是哪条统计线。
语法
object.Flag [ = lines]
Flag 属性的语法包含下面部分：
部分 描述
object
对象表达式，其值是“应用于”列表中的对象 参考技术A 第一个flag是初始化用的，默认用户身份不是合法的。
第二个flag是用来标识判断用户身份的，判断用户输入的用户名是否为自定义username中的一个元素，是的话说明用户身份是合法的，总共判断4次，如不是username数组的中的元素，则将标志位flag【第三个flag】设置为false，说明用户输入的身份不合法。 参考技术B Option ExplicitDim username(3) As String '变量数组UserName(3)存储四个用户名DIm flag As Boolean '变量Flag用于判定用户身份是否合法Dim inputname As string '变是InputName用于存储用户录入的用户名Private Sub Form_Load()username(1) = "lImIng"username(2) = "wangfang" username(3) = "zhangsan" username(0) = "xuhua"Flag=FalseInputname = InputBox("请输入用户名称", "用户身份确认", "") Dim i As Integer For I = 0 To 3 If Inputname = username(i) Then flag = True End IfNextIf flag = False ThenMsgBox "用户身份确认失败！退出应用", vbOKOnly, "警告"ExIt SubEnd IfEnd SubPrivate Sub Picture1_Paint() PictUre1.Print "欢迎你！" + Iputname + "先生"本回答被提问者采纳