社区
VB基础类
帖子详情
怎样把"Label1.left" 这个字符串转换为 Label.left
lihaocity
2004-11-16 09:04:40
因为在数据库中有一个字段的值是"Lable1.left", 另一个字段值是"123"
想读出后 有 Label1.left = 123 的效果? 谢谢。
...全文
255
9
打赏
收藏
怎样把"Label1.left" 这个字符串转换为 Label.left
因为在数据库中有一个字段的值是"Lable1.left", 另一个字段值是"123" 想读出后 有 Label1.left = 123 的效果? 谢谢。
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
9 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
lihaocity
2004-11-16
打赏
举报
回复
可以了, 谢谢northwolves(狼行天下) 。
northwolves
2004-11-16
打赏
举报
回复
可以将数据库读出的 "Lable1.left"分成lable1 和 left 两部分,再用上述CALLBYNAME方法。
northwolves
2004-11-16
打赏
举报
回复
callbyname:
Private Sub Command1_Click()
Dim x As String, y As String, z As String
x = "label1"
y = "left"
z = "123"
Dim obj As Object
Set obj = CallByName(Me, x, VbGet)
CallByName obj, y, VbLet, CInt(z)
End Sub
lihaocity
2004-11-16
打赏
举报
回复
用 Case的方法要写很长的代码, 而数据库里有许多控件记录,但我想用这样的方式会很简单
!name = !value (注: !name = "Label1.left " !value = "123 " )
但这里需要一个转换的东西,有这样的东西吗?或别的更好的办法?
lihaocity
2004-11-16
打赏
举报
回复
用 Case的方法要写很长的代码, 而数据库里有许多控件记录,但我想用这样的方式会很简单
!name = !value (注: !name = "Label1" !value = "123" )
但这里需要一个转换的东西,有这样的东西吗?或别的更好的办法?
二师兄的老公
2004-11-16
打赏
举报
回复
同意楼上。
真要使用,可以用Case方式,但也不是很好:
Case "Label1.left"
Label1.left=123
viena
2004-11-16
打赏
举报
回复
不可能直接实现吧,源代码编译以后已经是二进制的机器语言,Label1.left = 123运行时已不再是Label1.left = 123
aiur2000
2004-11-16
打赏
举报
回复
sql="select 字段2 from 表 where 字段1='label1.left'"
其实这样就行了,中间取rs略
label1.left=rs!字段2
aiur2000
2004-11-16
打赏
举报
回复
select 字段2 from 表 where 字段1='" & "label1.left" & "'"
matlab yticklable,Matlab绘制XTick
Label
有效
字符串
(Matlab Plot XTick
Label
valid strings)
Matlab绘制XTick
Label
有效
字符串
(Matlab Plot XTick
Label
valid strings)我有一个情节:x = [0 1 2 3];y = [0 0 1 1];plot (x, y, 'k');我想在X轴上使用标签,它可以工作:set(gca,'XTick',[0:3]) % This automatically sets
label
s = ['0'; 'T'; 'T...
标签(
Label
、J
Label
)
构造函数
Label
( )
Label
(String str)
Label
(String str, int how) 第一种形式生成一个空白标签;第二种形式生成一个包含由参数str所设定的
字符串
的标签,这个
字符串
是左对齐的;第三种形式生成一个包含由参数str所设定的
字符串
的标签,并由整数how决定了对齐方式。How的值必须为以下常量之一:
Label
.
LEFT
,
Label
.RIGH...
VB6实现字幕滚动效果
VB6实现字幕滚动效果 设置Timer1的Interval值,每隔Interval会执行一次Timer()过程 Private Sub Form_Load() '设置前进时间,单位是毫秒 Timer1.Interval = 5 End Sub 如果想产生滚动效果,只需要每隔固定时间向左移动一些值就可以。 Private Sub Timer1_Timer()
Label
1.
Left
=
Label
1.
Left
- 10 '这里是考虑到滚动结束之后重新出现的效果 If
Label
1.
Left
+
Label
1
Java GUI 实现一个简单的
字符串
转换
器
用户通过界面输入一串英文
字符串
,然后选择所需要的
转换
器对输入
字符串
进行
转换
。 可供选择的
转换
器有3个:
转换
为大写、
转换
为小写以及去除空格前缀。 import javax.swing.*; import java.awt.*; import java.awt.event.ActionEvent; public class StringConverterFrame { private final JFrame jf = new JFrame("
字符串
变换器"); private final J
VBA进度条
**一共三个控件:**ScrollBar1、
Label
1、
Label
2Private widthSum#Private Sub ScrollBar1_Change()
Label
1.width = ScrollBar1.Value
Label
2.width = widthSum - ScrollBar1.Value
Label
2.
Left
=
Label
1.
Left
+ La
VB基础类
7,763
社区成员
197,609
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章